请问：
/ ^ Q8 I& A* f- y1 `随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
& B8 v" _/ S% n1 `1 S l+ J
" {( x' U" S ?/ d) d+ Y & l4 k f, ~& I' r% }
turtles-own [ energy ]/ Z6 B x- r" |/ O. H0 b
to setup
- A' H: ^: r" x. _clear-all/ W% _3 j, [ o8 K, h! G) P; }
set-default-shape turtles "square"
T* Z* G9 O' Acrt nutrition. n& c0 w2 X) u) I2 J E0 r
ask turtles[" W$ [( `; j& k0 N
set color white
( G5 R1 v3 X0 Y) a) z, X setxy random-pxcor random-pycor]
1 r2 w$ G) r: i
! e Q( u7 o2 K4 o& Bask n-of microbes-initialization patches
0 |; [& W5 b2 n, h/ j' Y( }2 C [ set pcolor green]
3 y( A5 X8 A* w ask turtles [set energy 1]' R S |6 C* E' L. n w5 v6 O9 P
end
& p4 ^* E4 u# q
, E# N7 d8 M& {to go- a- H5 [' t" Y, t) @2 Q. F: K: k
ask turtles [set heading 90 * random 4 fd 1]
- P+ X6 |" c1 ~: l+ } ask patches with [ any? turtles-here]. L& W: P& [7 b% M( w6 _+ b
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]1 d! ?. \' l, S# `' `( y& K
ask turtles [ if energy = 0 [die ]]
$ V8 l1 T( F2 H+ z& l0 L4 J/ o end k$ M9 v: z( W$ G2 m, B$ O0 ]* ^% I
8 W: Q) W# v" o7 o
to tt( V- f" {" Q, s/ q
ask patches [set pcolor gray ]
, O+ H1 K5 R' t( E9 ~: p' Vask turtles [set energy energy - 1]9 d# |0 t- M9 `/ j" |
end
% a- [$ A' S" I1 d S1 J2 \5 |+ R7 f2 Y' S0 u' f6 T! [) K, h' E( m
|
发表于 2008-4-8 10:49:43
楼主
