turtle粘合patch的运动问题

lincw

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


" T+ j3 z' s; ~0 pturtles-own [ energy ]
0 y$ B  s4 o7 N6 {! mto setup
clear-all
set-default-shape turtles "square"
# U6 x: x) B2 Q0 Qcrt nutrition
* x+ _( T7 n* u7 l/ ?ask turtles[
    set color white
    setxy random-pxcor random-pycor]
  
* d! x5 R2 V1 Q" Rask n-of microbes-initialization patches
3 D3 S6 b: f1 I& {) Z    [ set pcolor green]
) S% f6 y& q+ t/ i ask turtles [set energy  1]
end
7 {" l. F# V& _) q) u
* v6 [; u" c( ~& wto go
, Z% p% v, Z8 g6 [# w    ask turtles [set heading 90 * random 4    fd 1]
9 m; M6 ~2 P  {" p0 L     ask patches  with [ any? turtles-here]
$ m, U- p) O8 [. W8 }; W- @    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
2 G6 l4 u3 ^; p% C8 s     ask turtles [ if energy = 0  [die ]]
' k8 r6 f( L% B- V8 P$ E end
* i/ \, g) i6 e0 g9 p/ I
to tt
" P4 d- ?3 |# b9 Fask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end

' T6 W3 h0 }) R0 a

lincw

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