请问:! D- Y% a' m2 ?3 ?# k" V0 Z
随机产生的turtle 已经在patch的坐标上上下左右一格格运动,当turtle碰到一个随即分布的patch以一定概率粘合,patch变色,其他turtle经过也还是以一定概率粘合的,粘合后turtle的能量就会转变到patch上,并且以一定速率消耗它,怎么编写这个过程?下面是我编写的,运行时就出错了。怎么改正呢?
- E" U# z4 I4 I' F5 n8 X9 ] o- L" y' i4 q, g& X
5 R7 V2 F- x% V5 d" pturtles-own [ energy ]
) t6 `8 ?: b _6 M' Sto setup
8 A# @: z- }3 fclear-all( m* F1 _ ^; {! u8 r# X6 U# w# D
set-default-shape turtles "square"
2 N! w- l) o# ~7 [crt nutrition
* o3 S @$ j7 X0 mask turtles[5 I! }% l2 b, t. l# M
set color white" E. T: N6 K" j
setxy random-pxcor random-pycor]
9 h" b3 ?* t$ p! u 5 ?: d' l6 s. J8 x
ask n-of microbes-initialization patches1 [0 k# H3 k5 z1 a
[ set pcolor green]4 w* J+ U$ q* s0 d4 F' m* M
ask turtles [set energy 1]1 v' [) ?. m0 X( s
end& E8 }' I- m! `! |% V( F! [! h
( W% C3 H: n2 {1 V, R+ \
to go( z' p( a( K4 T, `) ]9 _9 C. D9 q
ask turtles [set heading 90 * random 4 fd 1]5 [3 d7 Z1 k: \+ y
ask patches with [ any? turtles-here]
, K! b' { x+ t0 A: m+ }( l [ if pcolor = green and random 100 < chance-of-congregating [tt ]]' |: w2 e. l5 r7 c3 B4 t5 |
ask turtles [ if energy = 0 [die ]]+ w* V; A& d6 X/ O7 R$ P# _
end& D5 z( c c& F3 k; U' u! d- P
; @) Z/ g& [1 i7 Y! ]. ?to tt
: n$ B7 x6 ]2 e% gask patches [set pcolor gray ]
5 r- ]$ z/ v! K, l Zask turtles [set energy energy - 1] k1 |' ^. u8 \: v
end0 F1 S! U& o D S" r
0 i/ ~. B! k' M! m* \/ X |