netlogo:如何将不同颜色的海龟移向相同颜色的补丁
我是一个新的Netlogo学习者。我想让我的海龟们一起朝着补丁走去。每只海龟都能找到颜色相同的补丁。每只海龟每跳一步。我还计划为每只海龟添加一个状态,显示它需要多少步骤才能到达正确的补丁。我目前的代码是:netlogo:如何将不同颜色的海龟移向相同颜色的补丁,netlogo,Netlogo,我是一个新的Netlogo学习者。我想让我的海龟们一起朝着补丁走去。每只海龟都能找到颜色相同的补丁。每只海龟每跳一步。我还计划为每只海龟添加一个状态,显示它需要多少步骤才能到达正确的补丁。我目前的代码是: to setup clear-all ask patch 0 0 [ set pcolor 5 ] ask patch -5 0 [ set pcolor 15 ] ask patch 5 0 [ set pcolor 25 ] ask patch -10 0 [ set
to setup
clear-all
ask patch 0 0 [ set pcolor 5 ]
ask patch -5 0 [ set pcolor 15 ]
ask patch 5 0 [ set pcolor 25 ]
ask patch -10 0 [ set pcolor 35 ]
ask patch 10 0 [ set pcolor 45 ]
ask patch -15 0 [ set pcolor 55 ]
ask patch 15 0 [ set pcolor 65 ]
ask patch -20 0 [ set pcolor 75 ]
ask patch 20 0 [ set pcolor 85 ]
crt-turtle
reset-ticks
end
to crt-turtle
create-turtles 1000
ask turtles [ setxy random-xcor random-ycor
set shape "car"
set color one-of [ 5 15 25 35 45 55 65 75 85 ]
]
end
to go
ask turtles [
face min-one-of patches with [ pcolor = 35 ] [ distance myself ]
forward 1
]
end
谢谢。你就快到了。只需将
35
更改为我自己的[color]
,或者更明确一点:
to go
ask turtles [
let _mycolor color
face min-one-of patches with [pcolor = _mycolor] [distance myself]
forward 1
]
end
你可能会发现,问一个问题并解释什么东西没有按照你的预期工作是很有帮助的。目前,你只是简单地陈述你正在做的事情。