turtle粘合patch的运动问题

lincw

请问：
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
* Q. t+ ]6 w) b4 x$ Z% ~7 Z& s5 h

& X1 O8 a! n5 T, r, H) O) `( W8 ]turtles-own [ energy ]
to setup
clear-all
set-default-shape turtles "square"
crt nutrition
ask turtles[
; ^8 N6 z# S# M    set color white
    setxy random-pxcor random-pycor]
% Q' p% c' i# S1 \# ^. P3 @7 q3 n: {  
ask n-of microbes-initialization patches
! G3 L6 z7 L! w3 F. g5 b6 l    [ set pcolor green]
ask turtles [set energy  1]
end
' ^$ W. m& F% v2 j; S3 F1 s& h# [, F
to go
    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
# g  y/ ]4 S$ w3 A- ~8 _    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
  d& A+ _! ~! t) C0 S" Z$ I) N end
% y" v7 w3 G$ L2 ?0 }
2 r3 s# ?( j0 G& m! ito tt
* {  u; B6 b7 f& K$ Z9 z) fask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
! r5 x8 |2 e1 e2 Q6 ]0 A2 Kend

4 M* |2 Y) a+ C2 ]

lincw

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