乌龟认为他们总是在黑色的补丁上

Question

我正在为netlogo中的一个类创建一个模型，但是我遇到了一个问题，每当一个乌龟问补丁它是什么颜色的时候，它认为它是黑色的，即使它是白色的

globals [var inside outside var1 ratio]
turtles-own [randomX randomY]

to setup
  reset-ticks 
  ask patches [set pcolor black]
  set var 0
  set var1 0
 while [var <= 360] [ask patch 0 0 [sprout 1 [set color white set heading var pd fd 100]]set var var + 0.15]
 ask turtles [die]
 tick
end 

to go
 ask patch 0 0 [sprout 1[]]
 check-location
 ask turtles [set randomX random 2000000 / 10000 - 100
 set randomY random 2000000 / 10000 - 100
 set xcor randomX
 set ycor randomY]
 tick
 reset-variables
end

to check-location
  ask turtles [ ask patch-here[if pcolor != black [set inside inside + 1]]]
  ask turtles [ ask patch-here[if pcolor != white [set outside outside + 1]]]
end

to reset-variables
  set outside 0
  set inside 0
end

我有一个设置按钮，一个永远检查的go按钮，一个显示内部变量的监视器，另一个显示外部变量的监视器，以及一个显示count turtles的监视器。外部监视器始终显示与总监视器相同的编号。任何帮助将不胜感激。

Answer 1

将海龟的颜色放在补丁上。它不会改变补丁的颜色。 （您再也看不到了。）要更改补丁颜色，请始终使用pcolor。