请问：. ~# M& @* k$ V. R
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
( y- }; q3 j6 V% }9 I. K
$ P4 d8 |7 `. a& `5 B 6 v% q- H2 j4 J: O
turtles-own [ energy ]
6 S4 T' K# g. P+ I2 Nto setup
) r, [. n6 |; Jclear-all
# i9 A9 U2 Q* hset-default-shape turtles "square"
( f8 V3 l. }/ L! a4 zcrt nutrition& U/ Y( ~, H6 Y
ask turtles[
9 y0 L9 ^" M) w& ~ set color white
; [3 s" R0 y3 M5 h0 P! K& J: _ setxy random-pxcor random-pycor]+ V) e' ~! I* z; Y: g' n* y5 M
* H. S* T" Y- i; A% U* |( Z
ask n-of microbes-initialization patches
: X( ]' q- U E+ b0 y" a# M [ set pcolor green]
3 z/ q3 P" G! N, Q ask turtles [set energy 1]8 R K5 r1 R! G: w7 ?' }
end. f7 ?# m3 W% M9 t. u: l
* l/ k) o9 g$ l1 }. v' i, I$ s l
to go: W8 k1 l' l2 N; H' L! r
ask turtles [set heading 90 * random 4 fd 1]8 r- e2 V# K; r7 r& e
ask patches with [ any? turtles-here]; y) y* r$ F, [5 ^$ F# k/ H
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
! |. t9 B, e2 P0 g ask turtles [ if energy = 0 [die ]]1 g' x. [+ E" {4 t7 C' D
end
( a/ k6 s* [ J6 V
3 f! }( F6 A, B4 ]. T( }$ z) s) tto tt
( M3 T& `* w8 S- pask patches [set pcolor gray ]
+ F6 K3 s0 ], ^5 w; wask turtles [set energy energy - 1]
# G& T2 N2 y" P% p1 fend
/ W) @, q ]) T: Z" p- R! `! @6 [9 l- r$ h. \9 E( q
|
发表于 2008-4-8 10:49:43
楼主
