turtle粘合patch的运动问题

lincw

请问：
+ X# {8 U  u: H6 g' I, X8 R9 B随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
4 v) \0 V* e( Z" }

turtles-own [ energy ]
to setup
0 R6 Z3 m1 e, v8 ~7 s" x$ u9 D; lclear-all
) e8 G, l  A% gset-default-shape turtles "square"
crt nutrition
1 g  a% }" @  a# {# U) E. T" Nask turtles[
( y& B8 Z# [# f1 k! ]1 r* F    set color white
    setxy random-pxcor random-pycor]
  
. L6 T9 x% @+ H( jask n-of microbes-initialization patches
    [ set pcolor green]
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 ]]
     ask turtles [ if energy = 0  [die ]]
# J# K' e, M) D, ?* f" ^ end
- b  x7 A; d; b3 M. T9 C
  h; ?' a0 w! w" m  [6 T$ ^: \& Jto tt
ask patches [set pcolor gray ]
" H/ B, G0 q* t5 S$ f5 vask  turtles [set energy energy - 1]
end
# e/ y* @, y0 J3 }. n
0 {* ~+ F2 G$ R7 m4 _8 u+ X2 T7 L

lincw

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