Student project-Kinetic molecule model

globals [step]

to setup
clear-all
create-turtles number-of-molecules
[set color 85
set size 2
set shape "dot"
setxy -18 + random -3 random 5 - 2]
set step 0.05
  reset-ticks
end 

to move
if step < 0 [user-message "The water molecles cannot be chilled any more (they have stopped)" stop]
  ask turtles [fd step rt random 360]
end 

to attraction

ask turtles [
  let thing1 one-of other turtles in-radius 15
  if thing1 != nobody
    [ face thing1 fd 0.01 rt random 360]]
end 

to repulsion
  ask turtles[
    let thing2 one-of other turtles in-radius 1
    if thing2 != nobody
    [face thing2 fd -0.1 rt random 360]]
end