请问：
# Z' Y7 b1 M/ O+ A随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
h m7 m; X' P8 w: M+ K1 F9 {# f7 n5 m, I0 v- Q& v+ t
: e- s) u1 B0 ~) D6 |% Yturtles-own [ energy ]; b! T. b' p9 c8 u
to setup
- i' p7 H G; O- V) w, y! rclear-all" K# v" E( g. q2 g9 r- G
set-default-shape turtles "square"& Q8 ~5 i F' x
crt nutrition& i) T% W0 u2 x: T% e2 k7 l
ask turtles[; `' q) i% j. h0 G& T
set color white4 ~6 ]& O7 J/ n- s1 v% g ^* q
setxy random-pxcor random-pycor]
7 A' `& ~8 K! f# b# `* Q8 r: x : h0 l* J `7 l, G
ask n-of microbes-initialization patches
2 l" _5 ^! M+ {: x( `9 k7 l [ set pcolor green] T2 u' l4 ^9 c2 r" a. l
ask turtles [set energy 1]
3 w, r: Q# X' ^& f7 f/ bend/ U _2 n. m% U" N8 O+ l3 t
) n$ a: K/ a! C- Pto go _6 l* ~8 o& l1 Y# a; K2 X/ A
ask turtles [set heading 90 * random 4 fd 1]
& n U. p3 j9 E ask patches with [ any? turtles-here]6 c7 c* I7 r: |9 w% V
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
$ A* S" d* q' c/ _* P ask turtles [ if energy = 0 [die ]]+ P. u# B: l/ T+ D1 [/ N- ]0 m4 H
end+ i0 i6 a% H: i
, W* [' p0 r! F Bto tt
2 O. Y, I# ?4 W; Jask patches [set pcolor gray ]# E$ h6 z1 f$ K9 a, k. ?5 }
ask turtles [set energy energy - 1]
' Y" M; x b, T9 }: Bend% }4 @5 s# t, F( x3 {4 R" E
+ h' S. {; E6 r3 @$ [5 T, z |
发表于 2008-4-8 10:49:43
楼主
