请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
3 W& a6 _8 k2 N7 J想要把B的第一个乌龟颜色从黄色改变为红色
发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
* G8 H4 ~' w& ?0 ^/ O5 Q还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
, u, D' S4 e4 X; ~% c! I8 A! B  Y得到不同的结果，如图a1 和a2
  A: P# |4 @% S  k$ @4 ]想要一直改变B的第一个乌龟的颜色该怎样写？？？
2 o9 b; K; l5 a# d$ ?3 ~: p8 a

: }$ Q9 p7 n! s  ^. ~1 ^0 dglobals [ a  ]
! r9 ^  f- }" a; ubreed [As a-A]  
& y( C' {6 m0 v- }# I- Gbreed [Bs a-B]
to setup
# b. D* }7 k5 v! \0 ~6 U  Z+ Z, n  clear-all
create-As 10[setxy random(5)  random(5)
) _% m  ~6 M: _6 Y! z) ~; Sset color 3]
+ S! K% }+ D5 v5 }set a (20)
6 h' P  ?2 x0 ], T6 kcreate-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
% i; n2 [' Q& q2 @8 l+ h1 e! a$ Dset a (a + 0.2)
5 I7 L% n5 `4 y$ Q' }set color 45
]
; R5 N  x  \1 [0 j  F) b/ g   ]
! Q7 c7 q/ M9 v5 y% ~
end
0 e) E" R$ m. B+ W# ]/ s0 a' ^
- q9 G5 r8 Y7 q$ O) zto go
- @' M- N$ P. kask a-B 10 [set color 15]
end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
$ m& t  C6 H* g* X# `! a; [那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：
. J3 T) G8 J9 J6 o
$ \& Y9 o# z2 N' v! B# @  d7 `globals [ a  ]
: p% ^' S9 d# s7 f8 Z! Vbreed [As a-A]  
breed [Bs a-B]
7 R8 h6 s0 y& |* r7 Cto setup
( D( W  Y/ `/ V0 B  clear-all
create-As 10[setxy random(5)  random(5)
7 ?  f8 r% \# w8 `) |8 d* qset color 3]
4 F& j0 i. g9 H+ S- R
1 h% [" N7 I) j9 K. `9 g5 r2 \set a (20)
create-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
ask a-B ? [setxy a a
set a (a + 1)
8 s" a2 S% Z& r+ aset color 45
# @# q3 _: S% q2 ?. L6 i0 w] ]
   ]

( n8 W7 S( q% S. B. lend

. C0 B  W  l& z4 F' S
to go
& [& P: h+ \5 Nask a-B 10 [set color 15]
end