请问：$ d, j c- l7 |" e0 u( q
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
/ O: H: U# \3 S0 G4 U7 @; f8 Q0 K6 d' h$ O- ~; |5 h+ M5 H1 P
) _8 P1 u) v2 ^2 m w
turtles-own [ energy ]
/ W1 w( M; h( Z( {' t! ~to setup
2 M7 t1 s0 q. I, O/ d7 W) nclear-all3 k" e2 o+ x) f
set-default-shape turtles "square"
, m8 N5 X1 |. a: z7 u9 z: Tcrt nutrition1 R% Q: M% p- N) z* R: |& N- P
ask turtles[
' S* {0 m2 M# ~& m+ \ set color white
- h8 g$ `& t6 v/ s setxy random-pxcor random-pycor]) ?" Y V( H5 J! l% [
' @3 K8 \( i0 P y+ }% o0 n5 E
ask n-of microbes-initialization patches
9 e3 N) o0 @7 s2 c [ set pcolor green]5 ]; M( h+ T9 k4 s
ask turtles [set energy 1]/ @' L: o% {; s, k0 m3 A' F
end3 s; p$ k# r, o2 @# n: d+ E
9 X0 z* |( I! yto go
. w) t( w: i& L" q' V: q ask turtles [set heading 90 * random 4 fd 1]
2 U3 @" n- z6 X9 O4 a" P6 l) i ask patches with [ any? turtles-here]
+ P# j2 l2 e3 l) X1 a# f [ if pcolor = green and random 100 < chance-of-congregating [tt ]]0 L+ g! G g* ]4 i
ask turtles [ if energy = 0 [die ]]
( ]5 J9 Y6 F! p' k4 s end
& j; W$ }/ }" R0 X4 m: b# q4 J; y3 r+ x7 u" {, e# e+ d0 m) i
to tt0 X/ s1 U: k! ~% m I6 ?# Y4 F7 D
ask patches [set pcolor gray ]6 U- u! j. k7 K3 Z* v
ask turtles [set energy energy - 1]
$ n* q' c0 _# ?$ vend
; G0 m* e& `' F
! P& K) D3 ?% D, o |
发表于 2008-4-8 10:49:43
楼主
