turtle粘合patch的运动问题

lincw

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

turtles-own [ energy ]
8 d* d/ p/ K% u) mto setup
clear-all
set-default-shape turtles "square"
crt nutrition
ask turtles[
" Q! ]  n! `' M9 h4 O. V1 p    set color white
    setxy random-pxcor random-pycor]
) ]- k% X& ~  T/ ]  
2 f+ o$ D" D4 H( Iask n-of microbes-initialization patches
# W: p3 ]0 C# @6 W8 }7 J3 d# k    [ set pcolor green]
ask turtles [set energy  1]
end

- W: S" s  n5 ~; |' X, K! nto go
( P7 w* O) l0 d4 ^4 {+ r' l    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
# Z' f1 h. h- M1 v- [    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
2 _* ?8 {3 G+ A( Z     ask turtles [ if energy = 0  [die ]]
: h7 \) o/ \# \  y) W! t6 q end

to tt
8 K- G% t! M1 K8 a3 Nask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end

lincw

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