turtle粘合patch的运动问题

lincw

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


; y& }. {) E, j- vturtles-own [ energy ]
to setup
! o/ |! ~8 K, p* Oclear-all
$ C% Z% X# {" d, [  i8 |1 u0 l  nset-default-shape turtles "square"
crt nutrition
ask turtles[
7 b& T) {$ }! b. A- Q3 p    set color white
2 B( |" O  S$ q$ r    setxy random-pxcor random-pycor]
  z' M8 l# n1 V- u5 v1 v. j3 V  
9 G  i4 U6 T* u% C1 S/ b0 X, ^ask n-of microbes-initialization patches
    [ set pcolor green]
ask turtles [set energy  1]
end
2 p- ^" B3 O: t! N, Y2 c5 {6 ]. A
to go
" e1 s5 v* B+ S& G    ask turtles [set heading 90 * random 4    fd 1]
/ o: Z) p/ O5 {, L& I  T     ask patches  with [ any? turtles-here]
; A1 @$ `4 Z% E3 c& E    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
" E; ~3 N. I4 }' U end

) m# N, L6 ^: Q  H( t5 V- R( }) w# L- Uto tt
ask patches [set pcolor gray ]
$ H# K0 K- V" I6 q8 A$ F) pask  turtles [set energy energy - 1]
end

, w- Y; i8 g) R

lincw

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