请问：
1 i8 O9 d/ R3 c. K6 I随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？. v7 ~" S5 U% W/ b) ~2 ]9 t
/ e- G a# N+ D, c4 A! `- H 9 E4 d9 K; x' b6 {" \4 l0 X9 K
turtles-own [ energy ]
( b9 y' e, u3 |( X( q; yto setup5 g( J: T. K0 D2 U3 Y
clear-all
/ A4 y& R' x$ xset-default-shape turtles "square"# z+ q8 M' a( S3 q0 v0 f
crt nutrition
# q# R8 H0 ]2 U+ Bask turtles[
4 z) B2 X" z; s0 ]( u; o& i3 D set color white
' S/ i; A2 p% j6 u" D# t setxy random-pxcor random-pycor]7 s( b" Q. F# E2 l6 [8 s
- d% @1 e! a8 Z6 z" r2 _7 K. q/ }ask n-of microbes-initialization patches8 N4 P) t5 P8 i. G. k+ ]
[ set pcolor green]2 C% O$ V7 l( P3 l2 L0 K
ask turtles [set energy 1]
' A8 A5 Q1 ?4 O5 A; h1 ?( wend- q) S9 i# d+ o! o/ P
8 C, C) n8 x8 ?* d& Z4 o% U& N1 K
to go
- D0 `: g, K; ~ ask turtles [set heading 90 * random 4 fd 1]
0 A& r: G- [9 R% } ask patches with [ any? turtles-here]+ G1 J( e" I! `$ ^5 R; A3 R& @# C
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
% Z1 @! n- n! _ ask turtles [ if energy = 0 [die ]]
2 w* J* ^4 O) r3 T; e end* x+ `6 b$ K9 W2 s3 F) H9 N
+ Z! p' P1 b( m. Jto tt6 x7 Z% o% _3 s. n/ j
ask patches [set pcolor gray ]
# E# v" Q- t5 Dask turtles [set energy energy - 1]1 W6 D" i6 |, E8 a- c1 c5 t! I
end; K$ _. y2 t6 O/ ~) x( }0 S7 ~# \
( z2 Y. E; |$ K$ \8 S4 E, L" |
|
发表于 2008-4-8 10:49:43
楼主
