请问:$ ~3 z9 i" O. }+ B: u; e
随机产生的turtle 已经在patch的坐标上上下左右一格格运动,当turtle碰到一个随即分布的patch以一定概率粘合,patch变色,其他turtle经过也还是以一定概率粘合的,粘合后turtle的能量就会转变到patch上,并且以一定速率消耗它,怎么编写这个过程?下面是我编写的,运行时就出错了。怎么改正呢?
1 l0 e1 A6 s, ?5 k) e+ w, G
, o/ \+ S0 {0 o. K6 m( W$ y
5 v# G+ t6 m' mturtles-own [ energy ]( F1 O; U+ E! ^% V
to setup
H1 H) q; q5 e6 v6 Eclear-all! R' i* I7 Y" E/ i7 g
set-default-shape turtles "square"( G' o Z% p: O0 v* I% [# a. e2 ~
crt nutrition' ]* B5 p& ?" _
ask turtles[
( y7 H$ A) J+ p5 J set color white
* v# ]& K2 K# ]4 E setxy random-pxcor random-pycor]
8 y3 D0 l) g& J3 J0 c5 l4 ` 9 W3 m9 B1 Y: c' K! ?
ask n-of microbes-initialization patches
8 }4 h) W; K* p0 x1 _ [ set pcolor green]
3 y1 u* r6 c) ^0 y, n1 B% M; g ask turtles [set energy 1]
# d* k4 q( r) ?+ g4 ?) Vend' P- u4 ] d% A) C' M
; K: t$ r M! [ R. {, T
to go
( C# m- h& ?+ ~, y' _ ask turtles [set heading 90 * random 4 fd 1]
3 G0 g1 ~9 B; N! s, r6 e3 X, u ask patches with [ any? turtles-here]
# N8 Q) u7 _4 ~ [ if pcolor = green and random 100 < chance-of-congregating [tt ]]
+ S# y$ G. P$ r ask turtles [ if energy = 0 [die ]]
( M# O5 a8 u. O end
6 r7 L8 t3 A$ i0 t4 j/ Z. S8 Q2 W2 L' [
to tt; G! ~' z8 C: b- ]; s. |
ask patches [set pcolor gray ]
0 T" C7 P; D$ W/ `" Sask turtles [set energy energy - 1]
/ L- T6 ?5 E) i9 ?! X( Aend
4 X, O' i0 ?- P1 B: W' Z3 N
/ b; j5 k2 f1 _- Q$ a6 [ |