请问：
9 k, l7 {; `' z3 g/ i随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
6 j' h/ c) U/ `, D4 T5 [# X( V7 C- u2 D/ }7 f! _
$ v: n- f7 j2 E4 c' m; qturtles-own [ energy ]
% b# x' w) h" E5 Xto setup
1 F9 t: [1 W2 d1 z \/ Iclear-all1 L# r) M5 @+ p) [
set-default-shape turtles "square"# u+ w+ k: l0 ]6 F% N
crt nutrition/ W, v; n+ d6 u1 {% B, x' F
ask turtles[9 O: C! G4 ?! J! _ ^2 R0 {
set color white9 ]. C3 R( W6 j1 U
setxy random-pxcor random-pycor]
3 V! l# L% q$ v: ~, _
: B% _+ L) I$ w; F' y- sask n-of microbes-initialization patches
$ ~ U/ V( O+ [/ N [ set pcolor green]
7 p, K4 \3 H' l3 R! F ^. m ask turtles [set energy 1]
5 G6 k. |5 u3 j- Rend
# W# r0 B3 t( h& G9 f f1 y
& F( v" k% {" c I! ~- kto go
) K6 W4 i% a$ r7 _) A. @+ q" j! S ask turtles [set heading 90 * random 4 fd 1]
2 Q4 F" t$ A- ^1 G$ O4 k ask patches with [ any? turtles-here]
) i$ {5 h% Z5 P [ if pcolor = green and random 100 < chance-of-congregating [tt ]]
' C A9 _5 _8 K# o! ^) \/ n ask turtles [ if energy = 0 [die ]]
, s9 F1 I% S3 Z3 [ end
8 l' e# y5 B# H0 b b% }8 z: M7 {( J
to tt
3 S% G( T% K7 g& Jask patches [set pcolor gray ]
; Y$ L+ y' m9 J) a2 t) E1 qask turtles [set energy energy - 1]
5 e2 o; h! H( g7 G3 R d) M1 dend
6 `& u; v: f d! p* I$ ~# I) W% z; @5 W$ H; U* W0 |, ^* h- D# l" |
|
发表于 2008-4-8 10:49:43
楼主
