turtle粘合patch的运动问题

lincw

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

# Y6 j: a$ O0 y# F+ ?; Fturtles-own [ energy ]
to setup
clear-all
$ a8 g( t) t' R7 {6 k/ a+ {set-default-shape turtles "square"
crt nutrition
3 [/ {/ ]! \, W; \ask turtles[
: g0 s. i4 Z' \3 [* l- Q' q& C    set color white
+ _% }) D/ T- Z' e    setxy random-pxcor random-pycor]
/ h9 J, S* j7 u3 R4 \; c  
2 o$ Y, [9 N9 Z1 Uask n-of microbes-initialization patches
    [ set pcolor green]
ask turtles [set energy  1]
: h( y% B& p" m( v& ^, oend

to go
    ask turtles [set heading 90 * random 4    fd 1]
" r- z; g& P0 x3 v. ~$ @9 W     ask patches  with [ any? turtles-here]
$ \# ?% e2 l5 ~/ Z+ M    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
end

! |$ `. H! V. K6 ]# A% p2 L9 X( nto tt
- e" A9 D& _! p- yask patches [set pcolor gray ]
" N' S4 L- M& |! v5 e$ @8 q7 m4 t! Bask  turtles [set energy energy - 1]
end
& p$ [: O" d; N

lincw

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