看看这段代码的问题

etamina

我的模型，原意是使得每五个turtle成一个矩形，这些矩形随机散布在一定范围内。
' e3 i, X# t( n- X, Q
4 x2 i$ j3 G& T4 N但是运行结果所有的矩形重叠在一起，只显示一个矩形。请大家帮忙看看。
: {0 J6 r; Q6 ?. v
" m2 v# @* G8 h# W( Kturtles-own [a b c d k f g h
0 H- ^4 o- m  ~" k0 z  x y     ;; these are the leaf-turtle's offsets relative to center-turtle
]
+ ^% V4 v) U7 e2 y0 cto new
  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
2 P) A( ?( e1 z# t/ S+ F  unit_plan   ;;make up the building plan
end
2 A0 P1 p5 T3 q5 i4 ato scatter
8 I& A% J5 q( F) I& y0 l; Y( |: k# Kask turtles with [remainder who 5 = 0]
[
set xcor xcor - 6 + random-float 15
$ t0 V5 f2 p' d2 r+ i* O7 xset ycor ycor - 6 + random-float 15
]
end
to unit_plan
! n& F0 g' j" G2 Sask turtles [
* u  l4 {  z7 r' B# t3 X; xif (remainder who 5 = 1) [set a who
+ i! ~  H/ S0 B# G/ ^                          set x ( 0 - Wid / 2 )
                          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 )
! p  _( ~: D! [3 x9 l5 k                          set y (0 - Dep / 2 )  ]
" z8 V0 b$ [5 E% O/ m5 K                          set d int (c / 5) * 5
   setxy   ( xcor-of turtle d + x )
           (ycor-of turtle d + y )
' G5 T9 T& p& R& m. d* M3 f- s- \2 A         
5 k/ X( O9 R3 @/ n* B* g, S            
- r3 e/ `8 O, S% L, y' cif (remainder who 5 = 3) [set k who
                          set x( Wid / 2)  
                          set y (0 - Dep / 2 ) ]
                          set f int (k / 5) * 5
  setxy   ( xcor-of turtle f + x )
           (ycor-of turtle f + y )
+ u) m6 v) [+ d, B  s           
: t* A# k, p9 a: Z* G           
$ e1 }1 {7 f( M# Hif (remainder who 5 = 4) [set g who
, V8 I+ I- q/ k+ k; k# G& u3 u                          set x Wid / 2
                          set y  Dep / 2 ]
                          set h  int (g / 5) * 5
- N2 O3 M) d! q: e. K& q( S' f( C, G7 x  setxy   ( xcor-of turtle h + x )
3 \+ |3 M3 ?; z; s) g           (ycor-of turtle h + y )
                          
                          
                          ]
9 W' x# C1 Q2 x0 j% R- C% Zend
# s+ X2 i" A$ _1 i9 Y( Q0 s5 s7 o
[ 本帖最后由 etamina 于 2008-4-10 16:41 编辑 ]

etamina

已经解决了，
应该是
# b/ s2 I) _& h. |) w6 t3 ?& l* a' W- bask turtles [
8 s/ @5 M, Q0 h7 U7 Dif (remainder who 5 = 1) [set x ( 0 - Wid / 2 )
7 p& b* `6 }9 a' i, ]+ {7 a8 e* X; J                          set y  Dep / 2
7 N8 g( I, {" z" Z4 h2 L7 r3 \           set b  int (who / 5) * 5
! Z+ k7 X! O( j, f    setxy ( xcor-of turtle b + x )
          ( ycor-of turtle b + y )]]
end
之前有个括号位置不对没发现