如果补丁不存在，则随机左转。如果补丁确实存在，并且颜色为橙色或绿色，则移向该补丁

Question

我无法执行此代码，希望有人可以提供帮助。就像标题所说，我的问题是移动人（海龟）。如果前面的补丁不存在，则随机左转。如果前面的补丁确实存在，并且是绿色或橙色，则向该补丁移动，如果它不是绿色或橙色，则向左转动。

这是我的代码：

ifelse is-patch? patch-ahead 1
and member? pcolor [green orange]] of patch-ahead 1
[fd 1]
[lt random 1]

Answer 1

试试这个：

to setup
create-turtles 1 [ set color green ]
end

to move
ask turtles [
  let ahead patch-set patch-ahead 1
ifelse 
  any? ahead and any? ahead with [pcolor = black or pcolor = green]
  [fd 1]
  [lt random 1]
]
end