turtle粘合patch的运动问题

lincw

请问：
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
: o7 y4 L+ n/ A
7 f. F( K9 a4 V+ l+ h7 j/ h
3 K' C7 E- n; t+ ^; ~/ s4 m2 gturtles-own [ energy ]
to setup
clear-all
& m4 o2 ?3 l) m& Z) F* Rset-default-shape turtles "square"
crt nutrition
ask turtles[
5 |$ Q# l+ @5 [7 T4 o    set color white
+ W& P8 e2 v/ d. l8 u# `! ]    setxy random-pxcor random-pycor]
  
0 O& e' q4 K: Q! @& _. u! W# Hask n-of microbes-initialization patches
! \/ N% m7 T& `1 n8 X, }    [ set pcolor green]
0 g9 T9 q+ x. v' X5 \% l: a$ L ask turtles [set energy  1]
end

  R* ?; y% z- D0 Y; j9 \to go
4 U2 b) a3 y9 y    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
$ U# U" }# c+ J* t, ]. ^3 @    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
     ask turtles [ if energy = 0  [die ]]
end
6 D4 i$ J. y  P6 Z7 `
0 m4 {/ \! X: z6 \! i7 F+ Y, H, `5 Lto tt
ask patches [set pcolor gray ]
ask  turtles [set energy energy - 1]
end

2 z" S# Z0 B; x+ I: d  {

lincw

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