请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
想要把B的第一个乌龟颜色从黄色改变为红色
! y1 `) j8 O# S发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
% T9 ^' ~* p% a1 ~8 ?得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？

+ v3 q- K" l  G, O! _9 T
9 f, i  B. ]( x1 A' G  Mglobals [ a  ]
breed [As a-A]  
breed [Bs a-B]
0 ?/ N6 X/ r# Z5 v4 Cto setup
9 `5 F& c; S& o5 `* U3 j( S% ~  clear-all
% y! s! g/ o+ p3 @3 kcreate-As 10[setxy random(5)  random(5)
set color 3]
" t6 z& Z! P: q' Q3 m  iset a (20)
create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
set a (a + 0.2)
set color 45
0 Q; }" G. t$ ~0 B7 L4 w: e  `3 L]
   ]
" ~8 q0 ]- k  ~: p
8 m' d' r0 s) w! Aend

to go
( a( A0 ^' j( @5 o& a: \" gask a-B 10 [set color 15]
! `/ A; t( R# i6 n; Q  b, ]end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
% N; g: T& N; B. L6 F5 `那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：
7 ~7 z- ]! A& s
' ~- y9 ~$ g1 I( h: W) p7 Zglobals [ a  ]
) _0 n5 K' d. O3 _: _. q) Hbreed [As a-A]  
breed [Bs a-B]
4 R, y5 x# W# H. x) Eto setup
" [0 L" R4 ?9 O- v: g2 ~7 T  clear-all
4 y- S* ], O! i1 |  x8 Pcreate-As 10[setxy random(5)  random(5)
set color 3]

5 Q* p( c' s% t1 e$ H' oset a (20)
create-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
' o; M9 ~+ ]/ Y/ ?/ u! dask a-B ? [setxy a a
* j$ ~9 o, I/ t  S9 t. d% p2 _set a (a + 1)
0 @) u# |) Q% K  qset color 45
] ]
   ]

end


to go
2 c) E# T1 w, E" Z* c5 @ask a-B 10 [set color 15]
end