|
|
在这段代码中我设定了一个stopped?变量,初始状态设为false 。运行过程不能输出stopped?为true 。始终为false
+ G) G" [/ I7 G4 ]9 nto go# t4 L& \6 B' |/ Q' ?
if not any? turtles with [not stopped? ] [ stop ]
7 W% F' p' a: z8 v$ o# ~) Bask turtles with [remainder who 5 = 0] [" j' e* w$ y8 B" x
set close-mates (turtles with [self != myself])with[
3 Q. C d# t0 z, ~8 w, \$ c(abs(xcor -(xcor-of myself)) < X-Dist + Wid ) * h6 e, M& @2 f' i4 f
and (abs(ycor -(ycor-of myself)) < Y-Dist + Dep )
+ A g, F7 o9 H$ w* X; ^and remainder who 5 = 0
7 z# T+ J/ K7 X% g1 G0 g# U]
# H0 G: o3 J( S; |5 U7 Y, Oifelse any? close-mates , W' e( c6 y9 Z0 g6 _
[
) [8 e% m- @9 ~4 N; ?1 dset closest-one min-one-of (close-mates with[self != myself] )[distance myself]
/ L6 \2 x4 k9 v# _& q+ v; u- pface closest-one( l" `- o2 u/ h! O, T$ m6 e x' C* M
rt 180. ?! M+ D/ s1 C/ q: `
fd random-float step-size
1 t# Q1 b j$ V& W- R6 [2 m5 q6 k+ @' { ravoid-walls- [, E+ O) P+ U; Q% E- |8 L
set stopped? false]$ R9 H% z) v b1 H
[set stopped? true]
- r( ?7 M. z" t9 e4 ]9 @] |
|