turtle粘合patch的运动问题

lincw

请问：
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
# v' b8 A' s! z7 H: _/ I0 `
8 N  l5 b" Y8 T) l
9 ?1 l4 b: \. P$ Hturtles-own [ energy ]
to setup
" Y4 a0 V* b" B, V$ j" Wclear-all
set-default-shape turtles "square"
crt nutrition
ask turtles[
: v% O1 U# {7 v) j# V3 e2 x/ P6 |    set color white
    setxy random-pxcor random-pycor]
) j/ E5 E5 U/ {  
6 G7 Z- {  F6 g' \ask n-of microbes-initialization patches
  Y) Q9 j0 Q2 V    [ set pcolor green]
3 C9 M2 k) k5 W8 l ask turtles [set energy  1]
end

to go
" {# ~4 X* X" \7 }& s7 d" N    ask turtles [set heading 90 * random 4    fd 1]
4 w2 O8 Y$ o$ h; T  w& ?+ l     ask patches  with [ any? turtles-here]
2 @4 `4 O$ @  _3 _! D    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
end

  t5 H- v3 |! E  H9 Rto tt
+ U  P" P* K& c6 i# Iask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end

7 J* k- y. a0 K. k8 O8 }

lincw

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