看看这段代码的问题

etamina

我的模型，原意是使得每五个turtle成一个矩形，这些矩形随机散布在一定范围内。

但是运行结果所有的矩形重叠在一起，只显示一个矩形。请大家帮忙看看。

turtles-own [a b c d k f g h
( O' t$ ^  q; e% h0 e5 s) F  x y     ;; these are the leaf-turtle's offsets relative to center-turtle
9 j; E# M; I' T7 F]
7 V8 V1 L0 R/ |9 Oto new
  ca
  crt 5 * num_of_building
6 \4 H' q2 X/ |2 F  ask turtles [ifelse (remainder who 5 = 0) [set color red][set color blue]]
  scatter     ;;keep center-turtle random positions
- M4 V* L- h, o1 K  unit_plan   ;;make up the building plan
end
to scatter
( i1 D# _: m  h1 N/ M, @# T# Gask turtles with [remainder who 5 = 0]
[
: x9 L& K3 c: H! |set xcor xcor - 6 + random-float 15
set ycor ycor - 6 + random-float 15
]
7 H$ [  `* w1 B, M1 qend
; k/ s3 Z7 S+ w3 B  k7 Wto unit_plan
) N3 {- u+ v; Xask turtles [
if (remainder who 5 = 1) [set a who
                          set x ( 0 - Wid / 2 )
                          set y  Dep / 2 ]
9 U  a) E! k- i0 G           set b  int (a / 5) * 5
    setxy ( xcor-of turtle b + x )
7 |" q5 U: [) I7 b$ s          ( ycor-of turtle b + y )
if (remainder who 5 = 2) [set c who
                          set x ( 0 - Wid / 2 )
                          set y (0 - Dep / 2 )  ]
                          set d int (c / 5) * 5
   setxy   ( xcor-of turtle d + x )
           (ycor-of turtle d + y )
         
            
if (remainder who 5 = 3) [set k who
* g2 V) @) \6 f3 N, h' K! f7 L$ j                          set x( Wid / 2)  
' |* c0 p9 H: X. U1 p  S" B                          set y (0 - Dep / 2 ) ]
# ?: H2 g. v5 u9 u* G                          set f int (k / 5) * 5
  setxy   ( xcor-of turtle f + x )
- ~" ?9 _) Q6 j! M' z. X2 ]           (ycor-of turtle f + y )
           
           
if (remainder who 5 = 4) [set g who
                          set x Wid / 2
6 ~' Y/ `% b( \9 P/ E7 X                          set y  Dep / 2 ]
                          set h  int (g / 5) * 5
8 j1 S7 g9 M. k9 X- w: k) @7 s  e  setxy   ( xcor-of turtle h + x )
. q2 b9 ?( k, J) E* n3 U3 S- H           (ycor-of turtle h + y )
+ X9 G6 R0 c" o( }                          
7 ~* h" j0 n5 s- \+ N; \; s  T) P                          
# m7 \. B. z! J3 {+ |/ D8 x) p                          ]
end
. L, W) U! W* V( ]" N. \# X& W( e
[ 本帖最后由 etamina 于 2008-4-10 16:41 编辑 ]

etamina

已经解决了，
应该是
0 s' I4 j: l* T9 b/ i6 b6 w9 V0 ~: B. S9 hask turtles [
if (remainder who 5 = 1) [set x ( 0 - Wid / 2 )
+ R3 s1 n) a' j$ z8 O+ E                          set y  Dep / 2
           set b  int (who / 5) * 5
+ z! j- U4 g" N+ q& y5 L    setxy ( xcor-of turtle b + x )
: C0 w0 x( D4 A) e  h0 I# i- p          ( ycor-of turtle b + y )]]
end
之前有个括号位置不对没发现