请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
1 H9 Y; @6 Q& X+ s' mA10个，B10个
5 _+ }  G( F8 w想要把B的第一个乌龟颜色从黄色改变为红色
& `. ~$ b( |( h3 C- b8 S) Y6 s发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
+ ?: G% h) l8 v: e# L( S/ X还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
得到不同的结果，如图a1 和a2
# E6 q7 @5 X/ i* s想要一直改变B的第一个乌龟的颜色该怎样写？？？
& e+ z+ c5 `. L

globals [ a  ]
+ a4 m+ P5 }+ E1 Xbreed [As a-A]  
breed [Bs a-B]
to setup
' J2 e( I( ?: w! R  clear-all
create-As 10[setxy random(5)  random(5)
set color 3]
7 o3 b% E! i% a) L0 T' N6 O) A$ |set a (20)
create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
8 W; J2 R$ c; x  oset a (a + 0.2)
set color 45
) t- l4 t- m; u' E0 y" B8 p]
   ]
; [3 f0 K; g3 O" J  I2 [
& O+ s* f) d; n; xend
5 n$ m" t% y# w) p* f* h
to go
ask a-B 10 [set color 15]
end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
3 v6 d" {- o( h那么B分布不随机该怎样写？

wangjiajun101

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

1 i3 w) c6 J; c* l( _. V9 J/ sglobals [ a  ]
breed [As a-A]  
' K  A) B; ~9 Q3 ~breed [Bs a-B]
% D& D, Z+ N. @6 O5 O1 d. D% {* rto setup
; L% n( {% R4 F3 J  clear-all
create-As 10[setxy random(5)  random(5)
set color 3]

2 R3 c( M- F9 B8 T/ t* u% J; M! wset a (20)
8 s. P+ }! M# m. qcreate-Bs 10[
" [! y, J9 Q5 zforeach [10 11 12 13 14 15 16 17 18 19 ] [
8 u; j* m% z" E& N2 cask a-B ? [setxy a a
set a (a + 1)
' F0 V4 ?& i( u; Aset color 45
] ]
   ]
3 s5 B- r" x0 P) m) ?. G9 e$ b
end
1 G/ i7 Y2 \% @0 e) Z: S; Q

to go
ask a-B 10 [set color 15]
end