请问：
& R$ I# L1 T2 c: W: h随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？1 O9 X8 w+ @4 @* J; N
' J0 G2 G z1 X) e5 ?
1 a; p" s5 E+ F* Oturtles-own [ energy ]
' W# C5 |- }8 u5 Y4 ato setup
2 E; T) H1 n. {! rclear-all
, N( A2 C$ J4 v+ ?3 v( W7 Hset-default-shape turtles "square"
0 c& g) Z3 B5 hcrt nutrition
3 G% O" u0 P2 o+ Dask turtles[1 t& E) [/ O* R) K% {" P1 U! X% m
set color white
- K1 e' l$ `/ j0 K; ?: i: G setxy random-pxcor random-pycor]
b' Y" p) Z( p8 K( `8 z
5 ^& k2 N/ X A" q8 dask n-of microbes-initialization patches
/ a+ E" ^0 l6 l, u! o' K! u [ set pcolor green]
6 I5 r% _* m% m+ | ask turtles [set energy 1]
, ?* q2 m$ a, @4 j3 L" rend
, B& z; B! L/ u5 o3 l/ W m! m" |
6 x* j/ _% g; ^9 {to go
6 y q9 V- [/ Q: |; {* ` ask turtles [set heading 90 * random 4 fd 1]( T6 g! X& x1 l* k9 W& P
ask patches with [ any? turtles-here]
" _/ V1 Y$ M# h4 z: I! `: B; X [ if pcolor = green and random 100 < chance-of-congregating [tt ]]
7 u! i& p' m5 l! c ask turtles [ if energy = 0 [die ]]
2 T: \$ ?6 c% f* ~5 m( H end# j7 E) b z) y2 u; L' k
# V7 k, k* V5 A
to tt
0 ^! T% a' i4 e. [& A' y: iask patches [set pcolor gray ]- w; G0 _) ^( @8 f# N t
ask turtles [set energy energy - 1]
1 O# E0 W( f* x# \$ ^4 M* n5 D+ Vend3 Y; a$ s7 f3 J
9 y. s" `. A) z {* J6 b
|
发表于 2008-4-8 10:49:43
楼主
