请问：
- {) G/ m% ]9 B4 |' D随机产生的turtle 已经在patch的坐标上上下左右一格格运动，当turtle碰到一个随即分布的patch以一定概率粘合,patch变色，其他turtle经过也还是以一定概率粘合的，粘合后turtle的能量就会转变到patch上，并且以一定速率消耗它，怎么编写这个过程？下面是我编写的，运行时就出错了。怎么改正呢？
e& d* F% H0 O
: M. [* G/ }3 j' Z6 B. C4 q9 w # W5 S2 _( e" D8 Z2 w9 [
turtles-own [ energy ]. v+ d5 ?' Y$ j5 J0 I) c
to setup0 J" N- u) j3 G+ K( ]+ p* T1 H
clear-all
% Z9 j+ P4 @7 Q+ A- O0 Nset-default-shape turtles "square"$ q5 |7 r& ?4 n( u% C! b! ?
crt nutrition; X1 q6 k5 J h# J
ask turtles[
1 J1 S* b0 {8 o* F. g% V- Z/ l set color white. @( w& ]6 r$ T& |! r; ~; ]
setxy random-pxcor random-pycor]( e. ]1 C0 B1 F. X& x
. J+ R1 K& ?7 w. `4 |5 d( gask n-of microbes-initialization patches
" ^( }" A% |2 _1 x7 T6 ^2 r; L1 W5 k* T [ set pcolor green]
: T( c2 `& K2 X: C ask turtles [set energy 1]# y+ R6 k' Q/ Z) m4 O7 K$ |: f
end
' \) S D3 o! [* l2 V4 S- `* {* a+ R" p" K5 Q
to go
4 p6 T( X, x* n- _) F: I7 A, k ask turtles [set heading 90 * random 4 fd 1]+ Z, m% R5 N8 F7 p# N5 q, q. `
ask patches with [ any? turtles-here]& M3 U0 x0 `3 }7 B
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
, }& ?2 y: D- P8 D ask turtles [ if energy = 0 [die ]]
6 j: P. U4 S/ k H |9 v, J/ A end
8 T! M! _4 g, p8 v$ [/ X- {8 K, {1 b6 S0 v2 u- z* J
to tt8 k1 ]+ T. J1 Y v( a" `4 m' l* n
ask patches [set pcolor gray ]
: [ u! k5 y! S `4 K( X% \ask turtles [set energy energy - 1]% M0 B+ c: l! j9 }
end
4 t' C3 L- j4 O" f/ X8 y* x6 T: @: G# j e
|
发表于 2008-4-8 10:49:43
楼主
