turtle粘合patch的运动问题

lincw

请问：
, ]& {0 ~; ~5 C# {8 A! z- m7 s随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
; i$ x( S$ o* E

/ Q( A/ l0 b7 |! |6 d! A! Iturtles-own [ energy ]
! L6 Z2 {" J1 `; M) Xto setup
clear-all
: E; ~' X& \; U8 y. ~set-default-shape turtles "square"
crt nutrition
ask turtles[
( o" g- m% N  ~' r; [, V    set color white
    setxy random-pxcor random-pycor]
  
ask n-of microbes-initialization patches
    [ set pcolor green]
ask turtles [set energy  1]
end

to go
    ask turtles [set heading 90 * random 4    fd 1]
     ask patches  with [ any? turtles-here]
    [  if pcolor = green and random 100 < chance-of-congregating [tt ]]
7 b) v; `$ e0 x; V( k2 u  W     ask turtles [ if energy = 0  [die ]]
end
$ Z4 c, _# h7 N+ w4 z
to tt
# C/ _4 h2 w/ p4 l7 \ask patches [set pcolor gray ]
7 b! c3 P9 h2 p5 Q! nask  turtles [set energy energy - 1]
end

1 [! q% \3 p" H

lincw

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