请问：5 U b5 S' Q- H) K( M$ N. b
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？* ]% B/ Z" V$ D0 o
% A, h% c6 x/ e! ]1 f % ]: d+ n. I, Y+ l/ m$ S4 X
turtles-own [ energy ]
( d! b6 d2 t, O4 V: i7 C" Fto setup
# J8 P! u' t" r6 s; {clear-all
8 K4 R; G G& t) S: [set-default-shape turtles "square"
* F' W# X: x& G& p" s5 A1 [crt nutrition
: r- ?. Q* o% nask turtles[
3 D# ^6 z; o/ S; [ set color white6 b9 f ~6 b2 U4 K% H, @
setxy random-pxcor random-pycor]
$ A5 I* r, z+ j6 t6 ? ; F3 l% B. d: m3 G
ask n-of microbes-initialization patches7 S( Q& j y T% V
[ set pcolor green]
6 @% ?( C# B$ g% s/ n3 c. V' e ask turtles [set energy 1]
6 _; B& f7 M6 qend
6 x. M# S7 m! ^0 D
' i; f: C2 c% D- ^5 Jto go
6 ?7 ]" Q" z7 H" j6 L. a ask turtles [set heading 90 * random 4 fd 1]
+ P& H) S, P* F4 r5 _. t% ]. H ask patches with [ any? turtles-here]8 T; d; T% Y& a g. h
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]1 I& ^1 l. b- p& i% b# S
ask turtles [ if energy = 0 [die ]]0 {; e- [1 S* x* w S' [( W
end
' G' K2 T( C+ D2 Q4 i8 @
+ G- i! ~& O) e2 H( E' I! p- wto tt
, c8 B1 `# T$ ?+ `# X; H7 Task patches [set pcolor gray ]7 |1 [# j% e* Y$ c6 W, \# I
ask turtles [set energy energy - 1]8 ~, G. s/ |& }2 O! K
end
- k# w4 L, @ o+ C, t6 k, A# R
: R% e" Z [4 F8 @" l& d |
发表于 2008-4-8 10:49:43
楼主
