请问：
$ l- q6 R% C5 [, P# R* R) f( \7 u随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
3 h# R2 j( \6 l7 l. D! A5 m+ L/ ?" Q
0 ]' q( F8 F9 i. {9 l
turtles-own [ energy ]( B# Z7 H7 J! C4 v, a- y" X
to setup8 u5 B. S, b' X& N: P X9 J
clear-all6 |/ t% Q* h" W1 c4 H; ]
set-default-shape turtles "square"
" Z' @' B0 a3 g% Y5 a* qcrt nutrition' u4 e6 J! c) N/ s" l, J" Q+ [- L
ask turtles[
7 K. ]% S n$ b7 \% [ set color white6 v0 j2 q. {; h- z7 d
setxy random-pxcor random-pycor]
* s+ B+ M; l' y5 A) R0 U
! B w- \+ t4 X3 H. Q6 I1 pask n-of microbes-initialization patches
1 s) K2 n% e; j! D, {% q [ set pcolor green]
0 h, \9 Q* P, A! w9 q* [2 l, } ask turtles [set energy 1]/ V) W. t2 O% U: x! D) e5 L
end
% @7 m/ |! }! L6 ~$ e) L/ k# V1 X, q; l- g# Y; }$ f8 i
to go8 Q! \4 |: _' S( M& ~! M
ask turtles [set heading 90 * random 4 fd 1]
; ?8 \: M7 H& W: W1 y ask patches with [ any? turtles-here]$ g) l- O! j9 ^* w9 @8 \
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]8 o* u8 z7 |( @* E* ~
ask turtles [ if energy = 0 [die ]]
1 s0 W: }2 K, c( D end
% a+ o9 ?8 G. R+ Y
- d R6 O7 g. L( j Xto tt& P) T! B7 f: g* p
ask patches [set pcolor gray ]5 _3 a" W0 n' [9 n& q( l" ?4 u
ask turtles [set energy energy - 1]
0 M$ i4 b2 @& v& N# G9 h, ]4 Pend
: w5 ~. r" _/ k" p& K
9 {% `+ ` z3 U4 m q3 S |
发表于 2008-4-8 10:49:43
楼主
