Square Spiral

turtles-own [stepsize] 

to setup
  clear-all
  setup-turtles
  ask turtles [ set shape "turtle" ];; turtles will be turtles 
  reset-ticks
end 

to go
  square_spiral ;; creating a variable for square spiral
  tick
end 

to setup-turtles
  create-turtles AmountTurtles [ setxy random-xcor random-ycor ;; puts the turtles in random positions before the start of the model
    set stepsize 10 ]
end 

to square_spiral ;; the variable square spiral
  ask turtles [ ;; start of the command to tell my turtles to move
    pd ;; fairly self explanitory, 
    right angle ;; instead of a number value, "angle" is the variable that can be found on the drop down menu on the interface tab
    fd stepsize
    if stepsize != 0 [ ;; this this what helps the agent do the victory dance, letting them know not to go any lower if the stepsize equals zero
      set stepsize stepsize - .5 ;; decrases step size to make accurate shapes and less space between the lines
      ] 
    
    if (count turtles-here > 1) [
      
      ask turtles-here [ set stepsize 10]
      
    ]
        
    if (count turtles-on neighbors > 0)[
     
     ask turtles-on neighbors [set stepsize 10]
     ask turtles-here [ set stepsize 10]
     
    ]

   
  
  ]

   tick
end