如何让海龟在Netlogo中以一种颜色移动

时间:2016-12-01 12:47:25

标签: netlogo

我开始使用Netlogo进行开发,我面临的问题是,我想让所有海龟以一种具有黑色颜色的方式移动。我怎样才能做到这一点 ?我试着提前补丁,但我没有取得成功。 有人有解决方案吗?我将不胜感激。

to setup


clear-all
  import-drawing "patch.png"
  create-turtles 10 [set xcor -10 set ycor -13]
  ask turtles [set color white]
  ask turtles [set shape "bug"]
  reset-ticks
end




to bouge
   ask turtles[

 fd 1
 ]


end

to go
  bouge
 ask turtles  [if [pcolor] of patch-ahead 6 != black [set heading heading - 100] ]



end

enter image description here

1 个答案:

答案 0 :(得分:0)

您应该使用以下内容:

使用[pcolor = black]

设置黑色补丁补丁 问问龟[问]   面对一片黑色斑块 ]

Bests,Ervin