请问：
- k c+ x5 G0 s; l$ p7 ~随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
Q% E1 _7 U( i$ V9 Y. `& p7 s: N2 O2 ^; i. R0 i
, r; i4 x! q4 T1 `8 |7 {& U
turtles-own [ energy ]: V) S. X3 J# W# c0 v' Y P e1 z
to setup
, A( H" c$ F2 `0 wclear-all
+ F, {+ K! R: C( H; J# hset-default-shape turtles "square"
5 a( q2 a) a/ e% bcrt nutrition
% J' e( s5 U% o) \ask turtles[
+ k# ?* H6 J+ Z. B$ A set color white2 @3 U, a5 {, |+ M* s4 S- h5 i
setxy random-pxcor random-pycor]* A! Y+ X' V* Q% h) a5 k
6 f& u8 h3 z+ e: L
ask n-of microbes-initialization patches/ v% {( l& x+ ~ O7 x* z1 ]: M
[ set pcolor green]
" T3 E) M) a& [9 q# F: l/ _ ask turtles [set energy 1]7 c) M) B' w- _+ Q
end: Q: ^: S- ~7 _' m, }9 |
( C+ ?0 v+ C- g: v8 Lto go
' J0 s8 m+ N7 j! C7 G- H ask turtles [set heading 90 * random 4 fd 1]* p% N* j: O- x) w& }" q. A
ask patches with [ any? turtles-here]
+ Y; C) `. O+ D5 S [ if pcolor = green and random 100 < chance-of-congregating [tt ]]& ~; {, @# k2 B% k: [9 b
ask turtles [ if energy = 0 [die ]]
( }, W; A+ y$ U9 C# y" D end
! ~3 U" t1 T/ y0 _) P% l8 A* B) n% D4 O% q& g' p' [' [8 \) C. Q
to tt
/ A/ ~( M5 N4 C% k0 Uask patches [set pcolor gray ]
5 i+ W3 j+ |2 mask turtles [set energy energy - 1] t7 q& A+ E4 U/ B; j2 ~. ~
end
9 R5 u6 Z: }1 d" N
6 D$ d$ h0 B$ N% i8 n5 q |
发表于 2008-4-8 10:49:43
楼主
