看看这段代码的问题

etamina

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

但是运行结果所有的矩形重叠在一起，只显示一个矩形。请大家帮忙看看。
# k/ z* ]/ T2 f- F6 l! p
. y- ?8 G9 g- ^: A4 `turtles-own [a b c d k f g h
4 U  c8 E' i; s! w  Z  x y     ;; these are the leaf-turtle's offsets relative to center-turtle
]
* b5 b# L8 J$ \- r! dto new
6 q7 s" g6 X3 f3 u, X  ca
  crt 5 * num_of_building
  ask turtles [ifelse (remainder who 5 = 0) [set color red][set color blue]]
  scatter     ;;keep center-turtle random positions
  unit_plan   ;;make up the building plan
end
to scatter
$ C5 `5 f+ f- I9 Z: Dask turtles with [remainder who 5 = 0]
* e6 G1 p/ G. d' V: w8 C[
5 Z2 o$ s# Q) ]. Rset xcor xcor - 6 + random-float 15
$ e1 ^! u# |8 |0 w- h) fset ycor ycor - 6 + random-float 15
]
end
, V9 P9 Q& a, v  T0 o! vto unit_plan
# D+ r6 q; C# {4 Y, Uask turtles [
if (remainder who 5 = 1) [set a who
0 r3 F# p; }4 R5 V4 k, p' }8 F                          set x ( 0 - Wid / 2 )
                          set y  Dep / 2 ]
           set b  int (a / 5) * 5
- L# u+ `: o) W% z3 y    setxy ( xcor-of turtle b + x )
& Z2 ]# T* q& \          ( ycor-of turtle b + y )
8 j8 Q0 }% d- Y8 j9 }if (remainder who 5 = 2) [set c who
                          set x ( 0 - Wid / 2 )
) Y) i- e( R. T' e: r                          set y (0 - Dep / 2 )  ]
                          set d int (c / 5) * 5
   setxy   ( xcor-of turtle d + x )
           (ycor-of turtle d + y )
         
3 M5 O  X9 S$ D* s: g+ w: ^+ L" B            
if (remainder who 5 = 3) [set k who
                          set x( Wid / 2)  
/ J: l( H. t; _5 u5 Z                          set y (0 - Dep / 2 ) ]
                          set f int (k / 5) * 5
  setxy   ( xcor-of turtle f + x )
+ b1 ]* ~. m, `* o) b. G2 L1 U           (ycor-of turtle f + y )
           
9 z; ~5 A7 I) A. t6 ~$ ]: ?           
if (remainder who 5 = 4) [set g who
                          set x Wid / 2
                          set y  Dep / 2 ]
                          set h  int (g / 5) * 5
  setxy   ( xcor-of turtle h + x )
( w6 p* C/ g1 X" D           (ycor-of turtle h + y )
                          
                          
                          ]
end
# l6 P) U, Q# u! q+ f5 u: U' ^
[ 本帖最后由 etamina 于 2008-4-10 16:41 编辑 ]

etamina

已经解决了，
: x, A3 d9 {, I0 m9 v应该是
8 W$ O+ |" q% m. R% K% vask turtles [
/ S  z. r/ I( ~* y: K2 e, fif (remainder who 5 = 1) [set x ( 0 - Wid / 2 )
+ `5 B% N5 J) U( J5 B% W8 N                          set y  Dep / 2
           set b  int (who / 5) * 5
, e; P$ x& c) I3 n) d- C$ F    setxy ( xcor-of turtle b + x )
          ( ycor-of turtle b + y )]]
& y' h- z% s0 e/ ]end
! u$ t+ f8 B' U0 c% e$ u5 z之前有个括号位置不对没发现