请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
想要把B的第一个乌龟颜色从黄色改变为红色
4 y- ?& r5 f) H" x发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
1 o. Z7 k( f& M; w. c/ {( }还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？


: x! E. b, U" L. oglobals [ a  ]
breed [As a-A]  
breed [Bs a-B]
5 h' x5 O5 |9 U' X: Vto setup
# X) v/ m) _% E& Q6 F6 t  clear-all
- _$ s0 H* [+ e3 D7 d3 Ecreate-As 10[setxy random(5)  random(5)
  A3 W, T0 E9 Dset color 3]
$ O& b7 ~! f& i, ]6 a1 a* }set a (20)
* x9 b9 g% y- G) L6 N2 ^3 m2 t# zcreate-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
1 x$ n. d" H% E) P& h" m& Pset a (a + 0.2)
; @- b) h$ [& D0 y) D$ w, Q5 j6 jset color 45
]
   ]

7 v0 S2 j* ^# u9 b- r8 w! Fend
! R  ?* D. F* Y7 l9 n
& `$ W7 E  \" j: T6 W3 s3 [to go
ask a-B 10 [set color 15]
; U4 Z6 M4 B% o* X% X) l) G. Lend

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
6 y' f: G" c+ f: G- D" X那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：
9 y* w. g4 G; f# p+ z
8 {( e( J7 I& v5 G8 \% _9 eglobals [ a  ]
breed [As a-A]  
# O  V6 M, _2 O0 x; gbreed [Bs a-B]
2 f* l) S: l% f9 k" u4 F" s8 _0 ^$ m6 gto setup
9 r6 c) g$ Q$ ~9 E1 I  clear-all
1 T) b( d( V# h+ N" i% a) O2 S! @+ Fcreate-As 10[setxy random(5)  random(5)
set color 3]
" X3 L* t& L) }! m; H
6 q5 C% c: K! H# J7 G6 \set a (20)
6 [$ u1 z3 s* Z' r  J) P6 Icreate-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
ask a-B ? [setxy a a
set a (a + 1)
set color 45
] ]
. K! P8 j0 A6 W* P; t) O   ]
6 I1 X! o! k8 I
end
, a) Q* g; d$ M) f5 Z

to go
ask a-B 10 [set color 15]
: h# C' @% @' B9 A6 pend