请问：
/ K+ s7 e* @! k- R* B随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
' Z3 I8 \2 V6 I* u! Z. J- y, m8 m7 Z+ \
7 }1 X9 w' {6 x% |7 [9 h6 [0 l
turtles-own [ energy ]/ m2 N( ]' {% Y# M* J5 ]
to setup* Z$ P, \! m" S2 K$ f' `1 A
clear-all8 C3 _. P! M: e6 _. j2 k& E1 j7 r, N
set-default-shape turtles "square"4 U& i/ \% _( d3 g1 y
crt nutrition+ X# U7 @3 o/ m2 }& e2 D
ask turtles[
2 O! v) B5 n( P. C) T! n/ x4 C set color white2 w; O' n2 t0 U" H4 O+ X
setxy random-pxcor random-pycor]
6 w. F3 n" f! L9 [" J
# _6 _+ g, v2 K& @ask n-of microbes-initialization patches
& `1 Y! n6 F7 B, Q [ set pcolor green]
) A. x8 K! z* b) f" P4 h" X8 | ask turtles [set energy 1]
: l+ W, I O) B$ B1 E! @7 r$ xend
; u$ ?1 i3 q4 {0 G& n2 a+ y) e7 I& _( {& L7 M3 n
to go
1 b! K! \9 P" ?6 k" J ask turtles [set heading 90 * random 4 fd 1]( f/ d$ N7 v/ \ S3 K
ask patches with [ any? turtles-here]$ ]5 j* `4 }$ j- ]8 z, I
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]$ f( `7 ]* ^, x& `$ Z
ask turtles [ if energy = 0 [die ]]
( R* r2 \* ~. L k. A end
$ @& V& {( \' \( X5 y6 ?; w3 R: e) g6 p0 ]* j+ u
to tt, _ e) K+ U6 u! R: l+ ^
ask patches [set pcolor gray ]. ], t' Q9 c `7 [" ~
ask turtles [set energy energy - 1]* ^$ V+ P0 C" T: m
end! \% {. ?( L/ R0 O7 R* W1 i; U
0 s- m) [) m! k6 q9 [8 T$ N
|
发表于 2008-4-8 10:49:43
楼主
