请问：
; L# A1 L2 e; Q C/ G) e随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
* O! X! Y0 O" I+ F1 \
5 h* }0 L& \/ h2 d. A : v# h; m N( U/ s+ X" J
turtles-own [ energy ]
5 O* v9 G2 r% c7 I. I9 O0 `to setup
4 T3 [* r9 k$ s! qclear-all, B" m! g- |* h# e
set-default-shape turtles "square"
3 |6 |1 v# y9 @' d+ N- vcrt nutrition5 h6 m5 m' e" A- D
ask turtles[+ m$ ^9 h f, [, s! y3 @
set color white8 `9 _7 t+ N) S/ P! |! h# p- G8 G
setxy random-pxcor random-pycor]8 a# D8 n& v1 f' b% \
3 V7 C4 ^. D3 ~: I: r3 h( p
ask n-of microbes-initialization patches
8 L I4 {& H6 C9 u [ set pcolor green]
4 b2 ^0 m; L* q ask turtles [set energy 1]! U# O/ t! ?* v# q& D' [
end6 P0 [6 C$ X& z' b
' b3 \+ R9 b9 J
to go) n9 [/ W6 @" h) f
ask turtles [set heading 90 * random 4 fd 1]3 a9 w" V2 s9 S5 b
ask patches with [ any? turtles-here]4 ?; k+ o. q! `$ h# o
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
O2 G# b6 J J ask turtles [ if energy = 0 [die ]]
7 q0 C2 N5 a8 ~+ J' E end7 M l2 g( J! [! I1 i
$ a/ i3 \8 A8 {& o) ]7 j, v
to tt
# o% `6 G, l0 N) C3 @ask patches [set pcolor gray ]
0 v, w) r. h5 q5 G; p( ]/ R( wask turtles [set energy energy - 1]
. M% W2 F7 U5 }: [: q Z4 s+ pend: ^. [2 L) t$ ?7 ^, W. W0 J9 Y
' D/ y% y5 }' ?9 n |
发表于 2008-4-8 10:49:43
楼主
