turtle粘合patch的运动问题

lincw

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

! O' @# e) R- j. O% x
9 n- u# U9 ]3 b/ Hturtles-own [ energy ]
to setup
% O. m0 g' j. S. n7 a& y& [2 ~0 ]clear-all
set-default-shape turtles "square"
crt nutrition
ask turtles[
    set color white
, N& f, E, o  i; A    setxy random-pxcor random-pycor]
, I! b. T0 T8 V( N  
9 I% O3 h3 k$ u9 m& M7 S, W, Rask n-of microbes-initialization patches
, z; A* m+ p7 q% ]; ^: z    [ set pcolor green]
! l+ j  v0 R" `) s! m3 v" u ask turtles [set energy  1]
end
0 H+ H( V8 f% ]* h2 p
/ {  p0 g# t2 h( T4 O; i4 J, p: qto go
: E5 Z2 G- Q1 G- m    ask turtles [set heading 90 * random 4    fd 1]
2 F) J) z' a; x) \' P) u: K3 b2 g# o     ask patches  with [ any? turtles-here]
6 N1 R' i% Y, \- _; C* z% D( ~    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
5 p/ f" b; R. T5 |$ g     ask turtles [ if energy = 0  [die ]]
end
. g( v8 v0 h5 y
: r, O2 ?) g6 h0 a& K% {to tt
" _& C) G) M9 g5 ]9 l1 d  Sask patches [set pcolor gray ]
& ?# P/ C$ C, n! V+ [ask  turtles [set energy energy - 1]
end

9 d4 n! @4 n% j# V' X

lincw

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