请问：
1 U8 Q/ H+ Y. J) v- F$ w# F随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
6 z9 B9 w( t# |, ], k
) c r/ I+ h5 f/ A( g% E8 L4 G+ D - H# F2 |3 D: H: p2 Q. K* B
turtles-own [ energy ]. B0 @9 E G3 _3 ~- i) Y; V
to setup
8 {; E2 n1 |) E, J7 E- }3 sclear-all' _5 l$ L: P I% F2 ^- R: O
set-default-shape turtles "square"- n6 W4 D. B- j2 n9 O
crt nutrition. E: m( }2 b5 t& i
ask turtles[. l, a' D' a8 [+ C7 b
set color white' Q7 j: `; {" w! [; i) t8 J
setxy random-pxcor random-pycor]( s% }+ X9 [8 @
. n( ? w% Z( u, M0 W
ask n-of microbes-initialization patches
! d( j* i* [5 E: X6 V" J [ set pcolor green]
. }3 K( Z6 t, l( B- f ask turtles [set energy 1]
) r' O" B. b5 R( X- rend
( G/ G0 O+ ]" g& t
$ s7 q; G3 c' ~: F$ @# x, u4 O* Zto go' t5 h9 P, G8 E
ask turtles [set heading 90 * random 4 fd 1]- s e: z9 B3 f# C! n+ q3 \" H
ask patches with [ any? turtles-here]
! U2 B. C, |) w [ if pcolor = green and random 100 < chance-of-congregating [tt ]]
: ^# K' c Z+ Z _ ask turtles [ if energy = 0 [die ]]
g6 _( y2 X- F, B, R2 ]0 ? end
V$ G( \+ H& U: ~/ f
% U; h' c- @9 eto tt3 z0 c9 I8 m9 X% d
ask patches [set pcolor gray ]
2 L0 L5 W$ Z, u1 nask turtles [set energy energy - 1]
/ @, l3 I6 D/ d! V0 o% e5 Yend. R3 m$ n2 ~: H. _2 a/ w
" M X" B/ d, E- R1 u" S: n |
发表于 2008-4-8 10:49:43
楼主
