请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
想要把B的第一个乌龟颜色从黄色改变为红色
发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
  ]* F/ G+ H; O- \( z还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
% w" u) N( S. }  R得到不同的结果，如图a1 和a2
6 m" b' \6 }  j3 {& M6 r# ~8 k. _想要一直改变B的第一个乌龟的颜色该怎样写？？？
, k; q8 y" Y* J& q, `3 W* N4 M! }
1 C- C  s, n" b8 i) t
globals [ a  ]
breed [As a-A]  
breed [Bs a-B]
to setup
8 c' P( r6 N2 C# W! `  clear-all
create-As 10[setxy random(5)  random(5)
0 e* r8 g$ y2 K; t: eset color 3]
set a (20)
! U$ s; g* z( v1 f2 Z3 P8 @create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
# `" d# g3 o, a$ {' Z% }5 C% ^) Cset a (a + 0.2)
/ G! h9 V# L2 C6 ^6 q! Q. nset color 45
]
" o6 Q8 S; F( J8 c   ]
# H7 a. _2 M5 h' J. C6 o( j; b6 l
end
1 F! A+ O# C! m$ k. z4 w& t1 H8 y
$ i, @; |3 J) ?  C3 Vto go
ask a-B 10 [set color 15]
end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
; N# L& ^" c; v4 ?( H那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：

globals [ a  ]
breed [As a-A]  
1 B( {  x6 v' j. f% D. Z/ {breed [Bs a-B]
to setup
5 D: }( b1 P; Y3 K1 \  clear-all
& X  F+ G$ v1 i7 i" C( a+ ycreate-As 10[setxy random(5)  random(5)
8 I4 s5 I) Q2 g+ Bset color 3]
9 {& k2 w' D% d3 O
set a (20)
create-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
' m! J# ?4 x/ R/ b  `2 _0 N( aask a-B ? [setxy a a
7 v2 `6 N) k. M- xset a (a + 1)
set color 45
# m0 x* d7 P% C7 Z/ s* }] ]
   ]

end
3 G1 J: k. R" B3 z( r
# e7 k2 ]7 t2 }7 z# D
to go
ask a-B 10 [set color 15]
2 ~5 i% p% d% f* [" V+ [5 C# Hend