turtle粘合patch的运动问题

lincw

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

* A! o" G5 V3 z
turtles-own [ energy ]
to setup
clear-all
( Z! o% b: k; T% Sset-default-shape turtles "square"
crt nutrition
2 o5 K$ \6 P. h) N! n1 B. Kask turtles[
( A1 T  z% a1 R; w; @- V    set color white
) S1 \1 l  T3 F    setxy random-pxcor random-pycor]
  
ask n-of microbes-initialization patches
    [ set pcolor green]
+ `. w6 D6 X1 p  K ask turtles [set energy  1]
9 F, W1 m3 I$ \% I9 Mend
' T+ \. Z: ~. k6 O
# e9 S  m2 F, Q, H2 a. ]8 ?to go
' z  u6 E1 V0 N* `2 M: J    ask turtles [set heading 90 * random 4    fd 1]
, H! \- ^' l3 U7 Q( v( Y     ask patches  with [ any? turtles-here]
) _# q/ ^8 \1 l7 V+ b+ f    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
* x6 b! L- v+ Y5 T! a6 Y     ask turtles [ if energy = 0  [die ]]
end
; ^% I% B1 H6 B0 B: {
to tt
ask patches [set pcolor gray ]
" m/ [2 B4 `' [2 o: [7 q6 n$ J- Wask  turtles [set energy energy - 1]
end
7 x( ]1 b/ c4 }& {
5 j# u' f* _5 n7 }, l$ S! @

lincw

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