请问：5 ]. P/ m! w. A: m
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
( |0 x5 h+ a1 O1 s) J
; E4 y7 R* i) N0 H; r , R' g- I( Z/ c1 S4 u$ H% x
turtles-own [ energy ]
8 S A" t8 l( q e; C* Fto setup& k- j& m. c( H
clear-all) G$ J% B# k% Q. Y: X. x3 E
set-default-shape turtles "square", a3 k/ X w; R' I6 @; E& j7 A
crt nutrition; i: y: }$ }2 r+ a& r/ d1 q# m2 V; E
ask turtles[
- |1 x7 A0 h2 G6 x7 y5 Y set color white8 x9 s E# q. u/ P6 I: l# v/ T
setxy random-pxcor random-pycor]
* r. f5 C/ {* g1 G( Z) d 6 r8 i. R9 X0 {% |3 D, H' E
ask n-of microbes-initialization patches& `: d6 r! O9 Z1 A
[ set pcolor green]8 G1 D" N. u3 u) |: i
ask turtles [set energy 1]& T3 O: I6 v, B; ?; w$ Z
end
2 B; d' P# |) H0 o3 i* ~2 R% Q6 l1 H! e) q9 m% L& q+ m
to go
) }& W9 l+ s3 O7 D8 i: |* z' b ask turtles [set heading 90 * random 4 fd 1]3 n# A- R- V- U0 R
ask patches with [ any? turtles-here], Q+ r K( w" ~4 M6 K4 Y
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
# ]0 j1 F. \4 m' K( b/ J: `" ?/ k ask turtles [ if energy = 0 [die ]]
8 J+ [* |) e x% x4 [# x; w end" y4 O2 d0 |* t( Q+ Z! h
2 @4 \4 p5 m S' `- O/ ?to tt( H, F+ ], F2 o
ask patches [set pcolor gray ]3 u7 q) e' H( }% R. s |
ask turtles [set energy energy - 1], }7 S: P+ B0 K2 M& R
end
1 I: r* w W, L- d" e& e5 ]! H2 C& [2 r0 n, G
|
发表于 2008-4-8 10:49:43
楼主
