请问：- g+ z0 T: P6 n2 U1 l, H
随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
6 D5 l4 x0 I, \7 M6 J6 a
- B0 I7 I8 R) T
" a3 I" P' N5 n, z! [turtles-own [ energy ]
5 x$ r5 q( A# }: }, ?2 t) p0 lto setup/ u; v4 N: P; @4 W' X# Q
clear-all, |+ W* c9 s6 v2 I
set-default-shape turtles "square"
. }% J+ c0 p" R. ^crt nutrition8 r. Y, r, b9 X3 Y5 A. _
ask turtles[
1 J' M" d4 p0 r- T4 u set color white, a0 A# I# k+ ?
setxy random-pxcor random-pycor]' t# l$ Q. I+ X% O6 y% O
; B8 u7 w9 w. F" S7 N
ask n-of microbes-initialization patches
6 i* Y4 Z) [7 V% O/ b [ set pcolor green]" u. g) P( J8 H% B3 l/ D/ p
ask turtles [set energy 1] e0 U' j' q+ T3 O" J
end
1 M \5 ]6 T5 C5 F( _
& w' h# q7 Q2 p5 Yto go
( b* D. \8 {$ B& R y ask turtles [set heading 90 * random 4 fd 1]
}6 J$ X0 B( ]* s* a* q# v; k ask patches with [ any? turtles-here]
! y- v* G. t5 S& d- ~ [ if pcolor = green and random 100 < chance-of-congregating [tt ]]
9 e; V. y) ~/ O1 D. ~ ask turtles [ if energy = 0 [die ]]6 ^9 \6 @6 f u
end
' j8 b! n, u$ X! w
- R5 J- ]- n$ R( F; Y/ |; K# Gto tt, [1 n4 Z" e) y- C) w' y
ask patches [set pcolor gray ]+ Q4 r$ a, y7 R z6 p
ask turtles [set energy energy - 1]
9 u2 Q7 r6 H, m& Z7 h2 e @end
; ~' b% \8 v) T% J
8 ^3 \& y3 A! Q* L! Z |
发表于 2008-4-8 10:49:43
楼主
