请问： S$ `, i t/ ?5 h! q" O0 |
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
9 N; D, ]8 a) r7 A$ x2 h+ B/ E6 v( r+ X2 e% [9 F4 }+ U
; K, A$ Q/ S i- m3 l: l
turtles-own [ energy ]5 Q: n x: ]! d
to setup0 p' ~! @# \5 }/ P! s9 p( j
clear-all) o* m3 r3 r1 y9 W4 F0 ]- B- S
set-default-shape turtles "square"
B7 Y" c( t$ e* D3 s; \; }crt nutrition9 W2 n* Z1 N2 @; C2 y2 E
ask turtles[
, L8 s1 T2 q2 L L# l0 h! a1 U set color white8 b! ~: q) S) }8 ^0 P
setxy random-pxcor random-pycor]9 _9 Q5 o7 c G; w" f
1 T$ C1 F8 |7 k$ H7 a/ l: F" g
ask n-of microbes-initialization patches
& ^3 Z0 y: [4 M% N [ set pcolor green]
( ~; M+ N, `3 Q% ^/ d W5 g% {/ p ask turtles [set energy 1]
9 p8 i4 ~: l9 k S) \end
/ ~& \0 B/ B: \/ j0 E3 T( b# \- X- `+ u: y9 H6 s
to go
% s2 G# ~) d* |0 X. J, b ask turtles [set heading 90 * random 4 fd 1]
& @! C6 S8 P/ N. Y3 H/ Q3 ^ ask patches with [ any? turtles-here]7 q4 @+ _, _ L* Y& D
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
g# e/ {3 M* s! _( S7 o ask turtles [ if energy = 0 [die ]]
9 l- }6 X% j5 z2 p end& Q6 f% Q& s7 s' @8 Z9 z3 v& K
# { V) G/ z! s, A5 v9 K! Xto tt: J F0 |% j2 i5 O5 H
ask patches [set pcolor gray ]
" ]5 d' L$ `8 c& s1 bask turtles [set energy energy - 1]
* t4 Y. x% O+ F- d: n# Zend3 w# s+ B; ^5 _% V) U
: i" P0 o8 q* `+ e# p) w
|
发表于 2008-4-8 10:49:43
楼主
