请问：
" C$ [- {6 F9 N/ V/ L) f+ W, l* c随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
$ y9 R" q7 ^( n$ o. }9 t* ^6 d4 o: `6 u
6 @( j6 r9 b; i( A7 E. e
turtles-own [ energy ]9 Q! x/ n; p& K* H2 W
to setup* l$ e1 q9 U- v7 X" U
clear-all" ~, B4 c$ {) X+ c2 S z
set-default-shape turtles "square"* A' B9 j6 z: g; @6 n
crt nutrition. w- T9 h4 J9 z' P1 M- T. }
ask turtles[* S' _) l% z3 t! O: g
set color white5 r2 R$ P8 c, @% v6 r
setxy random-pxcor random-pycor]6 g) D6 W# m4 D$ [' J' t" I
1 K2 t6 ]( }9 [$ Q. N5 r/ ~- p
ask n-of microbes-initialization patches( ?; G7 u5 p& ]% ?8 |. a
[ set pcolor green]
5 c7 u1 G" Y# ~8 O3 ` ask turtles [set energy 1]: y1 \6 d% O y; W" C# `3 S
end, c$ G }% K5 f0 Y2 \
% ~: s2 q! r" P/ @2 \) j3 Y
to go) A. w' y6 g5 s. o
ask turtles [set heading 90 * random 4 fd 1]
- ^- D* H; [. B Y [( k+ d; } ask patches with [ any? turtles-here]5 ^+ o, p4 n, y* j! C
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
+ @8 t$ L4 C: F0 O4 Q ask turtles [ if energy = 0 [die ]]; \ t* y! E/ X4 F4 ] [/ S
end: G1 c* [2 Z m* X8 v
# X* W* `& W* [* \0 I$ lto tt
: Y7 v1 B/ M, R- @2 n' pask patches [set pcolor gray ]
+ ~8 R. k M& w: N6 e2 v2 }ask turtles [set energy energy - 1]
H' P1 Z V! [5 {/ B$ vend
, N# z# X3 Z2 @% s* i2 J# [
7 t. e1 T0 F- F; a |
发表于 2008-4-8 10:49:43
楼主
