请问：
6 U9 u& R. u; Z$ s: q$ Y随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
- E% X; u- f3 @+ x
. ?* S) \+ s& i9 }! b 8 H' @. _* R# T# O, l7 B
turtles-own [ energy ]" B3 t% J. d- _2 f( @" A" A
to setup
2 G, T, ]$ [/ V: w1 lclear-all' K/ @, Q% x3 n+ `
set-default-shape turtles "square"8 ~# f, Q7 a1 d0 @
crt nutrition- O5 i, D6 P" R9 R! w/ L+ A+ C$ b1 D
ask turtles[
: S% R) i0 e7 [ r set color white
! F, F. p0 V( W( E9 s0 O setxy random-pxcor random-pycor]# O+ b6 Q) `- ` G7 `+ A
1 a5 V# C( f/ _, ^( H- i# d+ y7 w
ask n-of microbes-initialization patches
! O0 H! x& o: u5 M* E& I$ \3 g [ set pcolor green]
, f# s* M3 w" D& Z6 [( `/ |; T ask turtles [set energy 1]
- s5 J# I: g# m2 [+ ~end3 h: I+ D; X/ g- L% b! R
4 g) ^( s3 [) z) S9 D1 G' H6 c8 ?2 H/ b0 f
to go
4 J4 A/ S3 I! b" q- {+ d ask turtles [set heading 90 * random 4 fd 1]/ |8 t- W8 S3 l b& x
ask patches with [ any? turtles-here]
3 P7 Z1 J& X+ k7 E [ if pcolor = green and random 100 < chance-of-congregating [tt ]]
# O; K2 Q6 N' f# c' ] ask turtles [ if energy = 0 [die ]]3 P& I( j1 ?' ^3 t% v' J
end& t" R+ Y6 h( |: x, A
. y: `8 v6 A* t: H2 p# J% d, ]to tt! i* P+ o i) V1 T* `' l* q9 z
ask patches [set pcolor gray ]
$ [+ }2 k: d, s4 {3 i& k& qask turtles [set energy energy - 1]
' T8 K5 R5 q% d2 G8 ]: Pend
1 ]0 }2 Y7 G: o, e. ~1 m1 t
0 J0 W Q8 ^$ T ]& r) E6 g |
发表于 2008-4-8 10:49:43
楼主
