请问：
8 G& v8 x. K4 m6 S4 R: ~4 j/ I2 T随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？. @; K9 P4 M: g* B3 o/ S
& @3 X# p. y" T. r( t
4 x' X' H- u5 i! h! j X2 j( w
turtles-own [ energy ]# i% w4 M7 G4 i& G% R: j
to setup: b* R3 H: X3 q r; l! L
clear-all0 T$ b7 p6 }; b: j7 y
set-default-shape turtles "square"
: W8 M% @" b: w% scrt nutrition% T9 h0 H7 [' O' F
ask turtles[
* s: j/ x2 p4 x' w& U0 b o3 i0 l, t set color white
9 x, ^1 Z" n$ U( r& X7 I setxy random-pxcor random-pycor]
6 _1 F% x: m! n: U
& _, A' B, @6 P$ G+ ^ask n-of microbes-initialization patches( c. B3 T7 R+ {$ j# t5 j' U) e
[ set pcolor green]+ ~( C" c; \ T a/ O# g5 ^! Y D; ~4 l
ask turtles [set energy 1]& V; E' `5 ]2 T- y
end
4 N8 ] w \2 S$ Y' S; l/ F: b5 M
to go! v$ X7 l" v) F6 K f# N, J
ask turtles [set heading 90 * random 4 fd 1]
3 B$ P6 |4 Y# n1 v7 M2 E ask patches with [ any? turtles-here]4 Q0 C- V) m( t, \* u( h
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]2 E5 ~% j' g# Y% T" A5 s, x
ask turtles [ if energy = 0 [die ]]/ I, c& Q: {* I3 R* m! @
end
. H8 D. L* b; Q! g# y- k, E ~" q0 ]" A; x
to tt+ Z( L5 ~6 k6 l. {6 g
ask patches [set pcolor gray ] m( k9 E: R3 n+ v, ~
ask turtles [set energy energy - 1]
/ u3 |) G" ]. n+ D1 |end$ t7 V; w; e9 V8 ~3 Q
4 h' V8 k! r) u, Q
|
发表于 2008-4-8 10:49:43
楼主
