看看这段代码的问题

etamina

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

但是运行结果所有的矩形重叠在一起，只显示一个矩形。请大家帮忙看看。
2 |9 O4 j3 g% L+ w8 U; g! q
8 e2 g4 H3 U# f" l% Kturtles-own [a b c d k f g h
  x y     ;; these are the leaf-turtle's offsets relative to center-turtle
]
to new
  ca
/ _& L4 R) {0 y  crt 5 * num_of_building
  ask turtles [ifelse (remainder who 5 = 0) [set color red][set color blue]]
0 C- e3 o0 J& x3 d8 q& t  scatter     ;;keep center-turtle random positions
* h; a. k+ N6 h) N' U$ Y9 X# e$ B  unit_plan   ;;make up the building plan
end
to scatter
ask turtles with [remainder who 5 = 0]
! e) S' g  a  W5 Y/ ]" T+ i[
! s5 J( T' F( F& {set xcor xcor - 6 + random-float 15
1 q& G" J' |; o3 B: X: I  n: uset ycor ycor - 6 + random-float 15
]
+ P( O8 T4 s+ o) m( H6 Fend
to unit_plan
# Q8 [* i& k* i' ]) N9 e1 C. gask turtles [
& l& Y  ~9 X3 pif (remainder who 5 = 1) [set a who
                          set x ( 0 - Wid / 2 )
6 f  V& o5 x! e, E3 V                          set y  Dep / 2 ]
           set b  int (a / 5) * 5
# k: m( L& _/ x! I  P; T3 Y    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 )  ]
+ H& U9 W" j1 ~  q8 F                          set d int (c / 5) * 5
   setxy   ( xcor-of turtle d + x )
           (ycor-of turtle d + y )
; ^! H" Q/ u4 n% R         
            
if (remainder who 5 = 3) [set k who
; V( d5 d9 V7 o  t5 r7 X                          set x( Wid / 2)  
% c6 X, z; }' l# `; V! s; y                          set y (0 - Dep / 2 ) ]
9 u4 h" ?  o& I% q/ I                          set f int (k / 5) * 5
  setxy   ( xcor-of turtle f + x )
           (ycor-of turtle f + y )
           
           
- a7 l8 E# A& b9 y# }! K) \if (remainder who 5 = 4) [set g who
! v( `' F3 J( b/ }! z4 x8 l  X1 K% [                          set x Wid / 2
                          set y  Dep / 2 ]
                          set h  int (g / 5) * 5
  setxy   ( xcor-of turtle h + x )
% E/ {3 g" j7 f5 c2 w" I' H$ e           (ycor-of turtle h + y )
9 [! [; f0 r8 U                          
% u  [' C1 M' o  o2 D4 [                          
                          ]
end

[ 本帖最后由 etamina 于 2008-4-10 16:41 编辑 ]

etamina

已经解决了，
" _# |9 a2 j# P% M7 d7 F: T- s- }应该是
7 k- t8 @/ B7 m/ w: task turtles [
, k0 p& J0 d! I1 C1 e, e1 @" pif (remainder who 5 = 1) [set x ( 0 - Wid / 2 )
$ B/ Q4 S# ^- \                          set y  Dep / 2
           set b  int (who / 5) * 5
4 }2 R6 b$ p2 n3 |    setxy ( xcor-of turtle b + x )
# L: b# {" b" |2 v9 B) y          ( ycor-of turtle b + y )]]
end
* Y  r& S1 a5 v8 B+ F; w之前有个括号位置不对没发现