turtle粘合patch的运动问题

lincw

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

turtles-own [ energy ]
to setup
clear-all
set-default-shape turtles "square"
crt nutrition
; Q% r; Q: B0 P! {ask turtles[
; |) d, H) c# ]+ F% [7 x    set color white
( Z$ Q4 n* U! H& c2 ]- h6 A    setxy random-pxcor random-pycor]
! s; [8 u" n+ J) q) L, R0 c: F1 k  
ask n-of microbes-initialization patches
+ w9 C' U) X7 M9 M, E    [ set pcolor green]
ask turtles [set energy  1]
end
1 n2 ^) w; O7 z' t' @! F9 ~; T) k
# X" A: n" R- R$ D& n6 Bto go
    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
4 ~& l) n8 k6 n6 N, `0 }! `3 D    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
* {4 I8 j2 J5 ^# |  a2 L1 h' c     ask turtles [ if energy = 0  [die ]]
1 Y, d5 u5 K! Q4 u  c end
& b+ b$ c# s, d5 p' D* i5 K
3 k( z% E+ t# ~to tt
ask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end
5 V3 s- o  C  @* A& D
# p# ]/ p% l8 P" |" Z0 C& t/ v8 w

lincw

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