看看这段代码的问题

etamina

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

但是运行结果所有的矩形重叠在一起，只显示一个矩形。请大家帮忙看看。
' S9 ^8 ?$ B( y! I' u' N  \; \* ~( H
turtles-own [a b c d k f g h
  x y     ;; these are the leaf-turtle's offsets relative to center-turtle
]
to new
4 K6 H$ a8 a% X$ d$ U  ca
. U* t: z" i) @4 [9 t$ m+ Q/ e  crt 5 * num_of_building
  ask turtles [ifelse (remainder who 5 = 0) [set color red][set color blue]]
% e0 l! ?% k" G# w  i9 U3 a; R  scatter     ;;keep center-turtle random positions
  unit_plan   ;;make up the building plan
end
to scatter
ask turtles with [remainder who 5 = 0]
[
- B: d( k: t. n/ o5 k( m* Nset xcor xcor - 6 + random-float 15
set ycor ycor - 6 + random-float 15
; R" `  @0 A( x]
8 I7 X5 V& g: l  u3 b+ uend
to unit_plan
% j4 ]3 U- M6 n. }: ^ask turtles [
) k, d6 m9 M  G# M% p8 Dif (remainder who 5 = 1) [set a who
                          set x ( 0 - Wid / 2 )
: T3 `! A7 d6 N3 _/ W                          set y  Dep / 2 ]
           set b  int (a / 5) * 5
    setxy ( xcor-of turtle b + x )
          ( 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 )
         
            
) R( j, \1 Y) l  Uif (remainder who 5 = 3) [set k who
                          set x( Wid / 2)  
                          set y (0 - Dep / 2 ) ]
                          set f int (k / 5) * 5
% w7 I' {/ l; N3 L  setxy   ( xcor-of turtle f + x )
           (ycor-of turtle f + y )
           
- J+ M) s& u* w* G8 l/ @' P           
if (remainder who 5 = 4) [set g who
) f" t4 B1 [! ?, u) y! a+ q; O5 u                          set x Wid / 2
+ G4 ~3 d8 j! i5 A' u                          set y  Dep / 2 ]
# B& A8 J) t; _( z% J0 e& T                          set h  int (g / 5) * 5
1 x# a9 P5 R2 }  setxy   ( xcor-of turtle h + x )
1 o# G( _# v" B( A           (ycor-of turtle h + y )
3 Y+ @3 s. F6 f+ t" Q; S. B2 Y3 y                          
3 t3 `9 i9 y6 G) W) L6 i. g! c4 w                          
5 W( f3 x6 p$ M. ~6 J! O, p                          ]
- ~8 {$ F: |$ ], d5 ?; eend
1 |. F. `5 |# C, \
[ 本帖最后由 etamina 于 2008-4-10 16:41 编辑 ]

etamina

已经解决了，
应该是
) B1 ]$ Y( w) {6 {  O3 T1 d" }ask turtles [
. I* t, ]7 B) u2 N0 k% t2 bif (remainder who 5 = 1) [set x ( 0 - Wid / 2 )
                          set y  Dep / 2
7 Z; q4 Y7 J" Z( L. U           set b  int (who / 5) * 5
    setxy ( xcor-of turtle b + x )
' `) S4 J- l3 l7 @          ( ycor-of turtle b + y )]]
3 r# _, N5 h! y% }0 W$ Kend
3 A+ ]" S: w6 H7 n! x- |之前有个括号位置不对没发现