turtle粘合patch的运动问题

lincw

请问：
8 x& k4 ^4 y+ m) _0 a0 f- I9 Q" g随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？

+ T- y) [- K! A9 _+ @+ {
turtles-own [ energy ]
0 _7 P' i, m& [! x/ h+ q+ qto setup
1 ^( B. G4 T0 N- i- E$ B) u' m- cclear-all
set-default-shape turtles "square"
crt nutrition
& q  Y1 g3 O* @2 P* v# N; Oask turtles[
    set color white
    setxy random-pxcor random-pycor]
; k5 l* P% _- b9 g( p* F  
ask n-of microbes-initialization patches
2 V$ g! s5 ^0 ]+ {) w3 I2 T( R! C    [ set pcolor green]
ask turtles [set energy  1]
end
" }- B1 r2 p8 L7 N: y7 B
8 e' d' `4 [% Dto go
- c. V: A  K& i    ask turtles [set heading 90 * random 4    fd 1]
/ U3 S" I2 T; F' ^0 l     ask patches  with [ any? turtles-here]
$ a5 {, w4 ?2 a' Q; d8 y    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
# P5 b$ r$ t# }8 }1 C1 J     ask turtles [ if energy = 0  [die ]]
end

3 L8 A3 m- Y9 bto tt
5 X  T5 u0 X, v5 q6 t1 R+ G6 ^ask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end

8 @1 \9 Z  |/ E5 O; B9 E) g

lincw

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