请问:3 K# U2 F1 M! q/ C
随机产生的turtle 已经在patch的坐标上上下左右一格格运动,当turtle碰到一个随即分布的patch以一定概率粘合,patch变色,其他turtle经过也还是以一定概率粘合的,粘合后turtle的能量就会转变到patch上,并且以一定速率消耗它,怎么编写这个过程?下面是我编写的,运行时就出错了。怎么改正呢?
; F6 j0 M; q t* X! l M+ A: }0 V0 _" p
5 F6 a6 S/ k6 M# Y" y/ ^8 G
turtles-own [ energy ]: q4 A1 b V+ J' t% P! _! i, E2 Z5 b5 G
to setup o h; }% [8 y2 j
clear-all; E0 R/ B9 r! Z* P7 K
set-default-shape turtles "square"
. ~; I& w3 [, m2 }; qcrt nutrition
: `3 p( z4 Y- {; \! Gask turtles[
, r. x. c% d3 _# y' h/ s set color white
/ M2 \% e6 T$ o0 I( y2 S" a3 ~- a setxy random-pxcor random-pycor]
0 o3 ]% Q. U3 x; ~/ P* B / d: k; _! }$ m7 I1 W
ask n-of microbes-initialization patches* A. Y% ^9 p v5 X; @: S, J7 y* _
[ set pcolor green]6 P J( p' T9 g# j7 F5 M
ask turtles [set energy 1]
1 ~, T! p) j: S. W/ w. M0 e: Z; ], }end; X' a U- k0 L- o E
6 q, x$ z# P. p7 X* E0 gto go O! Y0 P* O5 R; J& y
ask turtles [set heading 90 * random 4 fd 1]
! {/ i- n0 G; E ask patches with [ any? turtles-here]9 t/ h3 I: u* U% s2 u9 d. J3 {+ g
[ if pcolor = green and random 100 < chance-of-congregating [tt ]]6 [/ Y5 k' B4 d( \4 ?% J2 v; a5 n
ask turtles [ if energy = 0 [die ]]) Q/ ~2 W4 S8 U" g9 ]
end- j1 g( w4 ?" e5 u! ~5 j! M; n
8 }5 _* [7 H+ ?# ?
to tt& A' N! j" y* A( n5 |
ask patches [set pcolor gray ]; N/ H' u" D7 Q6 g
ask turtles [set energy energy - 1]2 O- y$ i: s' d% t( S/ t$ [$ u
end
# l! F( J v; }; O. `3 K: V4 v$ W8 ?( X. u: \; E& x+ S
|