Set goal for leader NetLogo -
Set goal for leader NetLogo -
i getting error in this. need inquire leaders move toward goal. getting error
face expected input agent got list [5 2] instead. error while turtle 63 running face called procedure leader-toward-goal called procedure go called button 'go'
here piece of code
patches-own [ is-visited? ] turtles-own [ is-leader? goals ] ;globals [ number ] setup allow number 70 ca inquire patches [set is-visited? false ] inquire n-of number patches [sprout 1 [set size 1 set is-leader? false ]] choose-leader inquire turtles [ set goals [ [15 10] [5 2] [0 0] ] ] ;tick end go ; inquire turtles [ is-leader? ] [ fd 1 ;let target one-of goals ;lt random 20 ;rt random 10 ;set is-leader? false] follow-leader visited-patch inquire turtles [ is-leader? ] [ leader-toward-goal] ;ask turtles [ tick ] end visited-patch if any? turtles-here [ set is-visited? true ] end choose-leader inquire max-n-of 7 turtles [ count turtles in-radius 6 ] [set is-leader? true set color reddish set size 0.7 ] end follow-leader allow nearby-leaders turtles [is-leader? , distance myself < 30] ;; find nearby leaders if any? nearby-leaders [ ;; avoid 'nobody'-error, check if there first face min-one-of nearby-leaders [ distance myself ] ] ; fd 1 end leader-toward-goal allow target one-of goals face target if patch-ahead 1 = target [ print "target achived" ] end
need help procedure
leader-toward-goal
listen netlogo. :-) set turtles goals list of lists, , seek face 1 of inner lists. not create sense face list. alter first line of leader-toward-goal
to
let xy one-of goals allow x item 0 xy allow y item 1 xy allow target patch x y
or improve yet, store patches rather coordinates.
netlogo
Comments
Post a Comment