请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
. ~- h! P2 U% c  MA10个，B10个
" p. Y4 U% n3 p, K. J7 n: B想要把B的第一个乌龟颜色从黄色改变为红色
& b  |  K5 ~2 h( N3 E发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？

  X$ v6 _" Y2 x: |; i
' `5 r  |5 v; V1 Z# P2 J; W6 ^globals [ a  ]
* o4 i4 u' i! N# F8 _0 ibreed [As a-A]  
4 o& M) O8 m9 V# pbreed [Bs a-B]
to setup
  clear-all
create-As 10[setxy random(5)  random(5)
  X! A5 \. h5 U' n9 zset color 3]
set a (20)
create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
5 s* E1 n! t+ D. Z% {, B) [5 Rset a (a + 0.2)
) E/ U; ?* ?& @& @9 p2 M* g1 @set color 45
]
/ ?$ s. W# s4 k( l& A* i% }# d   ]

- o* O7 U. p0 M! C6 E7 L: {end
; N0 i1 m  `  _# R2 i& W' X
& o- s% J, d  w( J! g1 k7 e% a$ V3 Xto go
ask a-B 10 [set color 15]
end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：
4 n: L  @3 v: K
6 y% ^- I( E6 ^4 ~- G+ d. v" nglobals [ a  ]
breed [As a-A]  
breed [Bs a-B]
) z7 H1 x5 g. _% R  P+ fto setup
  clear-all
create-As 10[setxy random(5)  random(5)
) W: v4 f9 g! G7 G' r6 j* l% P0 Mset color 3]
: O$ G# o, _: ^. O0 @/ i
set a (20)
" I" s: k" x' jcreate-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
% \5 h4 x; x: g# d; b* zask a-B ? [setxy a a
set a (a + 1)
& j6 Y5 R2 ^2 nset color 45
] ]
1 Q7 ~. i9 l3 b3 e   ]
8 C  R4 z+ V; O! Y, B5 Q
end
/ g0 W( |1 ]% ^

& E8 |, [5 e: a( _2 q1 \7 eto go
0 _; Q0 c9 ~9 d. ~/ ^ask a-B 10 [set color 15]
end