Netlogo 如何让乌龟在补丁等待10只蜱

Netlogo 如何让乌龟在补丁等待10只蜱,netlogo,Netlogo,我想让我的海龟们 1) 如果乌龟是红色的,遇到一块红色的斑块,停下来打十下 2) 在十次滴答声之后,我希望海龟继续寻找食物子程序,我已经有了这个子程序 实现这一点的简单方法是使用某种计数器。以下是一个完整的示例: turtles-own [ counter ] to setup clear-all create-turtles 100 [ set counter 0 setxy random-xcor random-ycor ] ask n-of 25 turt

我想让我的海龟们

1) 如果乌龟是红色的,遇到一块红色的斑块,停下来打十下
2) 在十次滴答声之后,我希望海龟继续寻找食物子程序,我已经有了这个子程序

实现这一点的简单方法是使用某种计数器。以下是一个完整的示例:

turtles-own [ counter ]

to setup
  clear-all
  create-turtles 100 [
    set counter 0
    setxy random-xcor random-ycor
  ]
  ask n-of 25 turtles [ set color red ]
  ask n-of 100 patches [ set pcolor red ]
  reset-ticks
end

to go
  ask turtles [
    ifelse counter = 0 [
      look-for-food
      if color = red and pcolor = red [
        set counter 10
      ]
    ] [
      set counter counter - 1
      set label counter ; just to show what's going on
    ]
  ]
  tick
end

to look-for-food
  ; your own look-for-food procedure is presumably different
  right random 20
  left random 20
  forward 1
end

请添加您迄今为止所做的尝试,然后人们可以帮助您找出为什么您没有实现您正在尝试的目标。为什么要投否决票?里面有什么东西不起作用吗?鉴于最初的问题相当模糊,我认为这是一个解决方案的总体框架。