请问:
% ?, ^8 t3 d; Z; I( ]8 I随机产生的turtle 已经在patch的坐标上上下左右一格格运动,当turtle碰到一个随即分布的patch以一定概率粘合,patch变色,其他turtle经过也还是以一定概率粘合的,粘合后turtle的能量就会转变到patch上,并且以一定速率消耗它,怎么编写这个过程?下面是我编写的,运行时就出错了。怎么改正呢?
( g" w- G* @$ |1 a! M* p- T2 g) g" i( z! @7 {6 h I4 S/ O5 U
' O' ~( D5 n& m% j/ g$ S5 R' \1 @6 u3 g
turtles-own [ energy ]
: h D: l1 Q$ r( [) ?! }; u% e8 lto setup/ T+ B! J! h* L& A6 A
clear-all% v3 M+ S+ S% Y4 u) n! s
set-default-shape turtles "square"
9 B. E" v) P$ o5 Ecrt nutrition
+ Q: @( S+ k! Q& D9 Eask turtles[
3 A) _0 H/ C# A9 V3 l, g' {5 N set color white
0 }7 {. y: w$ u! z8 ?! A3 b2 H1 h$ t setxy random-pxcor random-pycor]2 i9 p& ]+ _7 N. I+ S8 P0 K
3 L6 M+ U1 j M, t" D2 |* ]! U
ask n-of microbes-initialization patches
8 @, H) ?% W. x1 l [ set pcolor green]
_1 R, h$ N* w }) l ask turtles [set energy 1]
% v8 K! G" A( g: W. D! K2 m: U* Mend/ v3 |. s% ]+ {! C z" a1 p0 ?6 j
; c$ M# E, O. Gto go
* D" g4 N, M1 V" ]0 o ask turtles [set heading 90 * random 4 fd 1]+ Z6 s; B3 S/ y2 Y8 |7 Y' L
ask patches with [ any? turtles-here]3 P1 J8 A& E3 H8 \' _8 P X$ d( b
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]
! N5 W2 G# k, y4 V, R! j1 e ask turtles [ if energy = 0 [die ]]
8 W8 _0 j- M2 B* x+ w end8 Y( k; i- ?. q/ ]# Z# r
! x0 K9 c. u" h# E: ^
to tt
! a& y7 ]+ Y; \! f( d8 K* Dask patches [set pcolor gray ]
) r7 V. G2 `; a- P1 R/ l- Y( D. c+ ?& C: ?ask turtles [set energy energy - 1]9 P1 s6 g5 W5 I' Y$ n- K2 T
end; b( ?9 C3 `* o9 G' H
2 |, R% V/ j. b* G: L
|