turtle粘合patch的运动问题

lincw

请问：
- J& g; b8 [2 n+ G" D随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
) d7 U( r* b- R: e0 m! p

. I! \2 S% L# e! aturtles-own [ energy ]
: L) a9 j9 g8 B( zto setup
clear-all
set-default-shape turtles "square"
crt nutrition
( ^- {0 [( x4 B! }1 t! I8 p! i* Sask turtles[
$ g8 B9 o  Y* A* `* M( j$ z& {    set color white
+ Y$ a& j3 s- M1 o/ C$ c    setxy random-pxcor random-pycor]
  
ask n-of microbes-initialization patches
. U( ^' V8 A9 ~    [ set pcolor green]
3 v  N0 I6 o0 B, d8 e: T1 D ask turtles [set energy  1]
end

to go
    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
0 D$ ~& s3 w. M1 n     ask turtles [ if energy = 0  [die ]]
+ G( ?& Q7 d- a8 L* n end
4 r' }# d+ F- y& q, T6 j4 A& f
to tt
" @5 D+ m% ?( x6 a# Vask patches [set pcolor gray ]
: t& r. W+ N0 Y8 z0 oask  turtles [set energy energy - 1]
end
: d. i6 g7 U4 H" E
; c& h! h$ q0 \" U5 a7 E

lincw

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