请问：
: U4 o s& y# b( }% Q随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
4 c; k' F) v% Y2 P" `- h) G
. K$ U6 n& V# m! k: R0 W1 x; o 2 o( H y$ U' H- a2 b
turtles-own [ energy ]. @& |# O' d5 d* Y
to setup' m1 r1 ^& c5 x& V( o
clear-all
6 Q+ U# h/ u3 Qset-default-shape turtles "square"$ f" P- t; j, g1 b
crt nutrition/ w! G, b) ~5 g* Y
ask turtles[
0 w, o- J5 X) O+ V set color white1 t/ j8 W: E5 M0 E- ^' Y
setxy random-pxcor random-pycor]
9 j' r" r3 [0 {4 P& _0 P3 ?1 x 7 ~# V+ t7 \7 o6 ]0 w
ask n-of microbes-initialization patches, ] Q: ?- h+ T' X
[ set pcolor green]
# F9 I7 Q7 S, x( |6 p ask turtles [set energy 1]
0 J# t- r2 c- t; n J# B0 g+ U4 r& Iend. b6 _/ y8 Y; X6 N
8 f% h0 J6 z2 ?1 H; Ato go( b( D X! L+ U, L( m: v4 h0 t
ask turtles [set heading 90 * random 4 fd 1]
n6 a- @" u2 E3 F! M ask patches with [ any? turtles-here]9 _4 y/ {/ _1 p" d; `& ?
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]$ z0 F) p( V' ~3 x
ask turtles [ if energy = 0 [die ]]
0 {' r! W5 V7 y& z% Q; o end$ t* g& p( ?# ^: P2 u3 R
3 [" u3 n2 D; C0 Y! o& Ato tt" }- I3 H- S. E" A- |! v+ E
ask patches [set pcolor gray ]
7 |3 `* q% |5 o+ P6 H! g1 gask turtles [set energy energy - 1]
. n- @% s. N1 ]- `" W% Jend
0 [& g$ K- t, R7 C% R$ w5 L6 {) j
|
发表于 2008-4-8 10:49:43
楼主
