turtle粘合patch的运动问题

lincw

请问：
; h+ E% f3 E8 |; _# ~( n随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？


  ?: n) R. Y& tturtles-own [ energy ]
to setup
5 n7 H; s  j& p6 F0 Xclear-all
set-default-shape turtles "square"
crt nutrition
, ]+ d8 ?) n% m# U- ^/ Pask turtles[
, G: H/ E; f' v1 S    set color white
    setxy random-pxcor random-pycor]
  
  S" l% s3 V7 d, Jask n-of microbes-initialization patches
$ R- A: v. g  s    [ set pcolor green]
ask turtles [set energy  1]
end

$ o4 m) C6 J7 Q- M( Gto go
: D; M0 M7 I* g. L; a  K& }) k    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
, K0 g1 a/ |6 a2 f; d    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
2 D9 b4 y! t) M' ]& Q end
& H. e$ }) v% |3 J& Z
to tt
: A9 l# `; z5 x: N: nask patches [set pcolor gray ]
/ r* U: d+ i- Y" _& Q+ fask  turtles [set energy energy - 1]
end
" h4 E. {& ]" |* B

lincw

谢谢楼上两位，后来自己用两种turtle来表示暂时把问题解决了，以后再出现难题再向你们请教啊