turtle粘合patch的运动问题

lincw

请问：
( r' M$ A- a( S" y随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？


turtles-own [ energy ]
! x/ _2 n/ Y8 `" Vto setup
1 H$ X  M3 p/ K4 ?clear-all
set-default-shape turtles "square"
6 r. o7 P" Z% x& A' |8 fcrt nutrition
ask turtles[
- t5 C% ^  o' J- L2 Q5 u    set color white
    setxy random-pxcor random-pycor]
  
& S* Q; e( S2 J2 B% s8 l  x( Kask n-of microbes-initialization patches
    [ set pcolor green]
ask turtles [set energy  1]
end
% l  l& g) S0 w0 p7 N) ?7 T
; t) [2 y. ?4 bto go
2 ^: |4 \8 B, n& O' K; y    ask turtles [set heading 90 * random 4    fd 1]
4 j" b* N, ]9 b7 \" V3 J* n+ M     ask patches  with [ any? turtles-here]
* X" r2 |1 O4 w5 U. `: {& z    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
end
+ I1 e! c: o4 L: N- o5 l# C8 T4 k
  w  E7 S# d) `to tt
ask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end

lincw

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