请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
想要把B的第一个乌龟颜色从黄色改变为红色
2 N6 u* M# W9 W' @/ F4 z  i( X2 ^发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
8 {8 R% m4 x, U  }, L& B还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？

% \: E" @# w" T4 O5 O  W
globals [ a  ]
breed [As a-A]  
breed [Bs a-B]
to setup
# ~0 K& B+ j$ O  r0 z$ i% {3 s  clear-all
: G! _" w* l+ }' w3 Hcreate-As 10[setxy random(5)  random(5)
set color 3]
! V. o/ x1 _. V, E) Eset a (20)
create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
3 Q0 D1 q, z' B! T/ Z8 f] [setxy a a
set a (a + 0.2)
& t- O9 p1 F1 D6 u, y; z6 Cset color 45
3 H2 l  _& R( o1 D% W]
! y! M) d4 l/ k; Y5 D   ]

$ N- f1 p9 ~; D) bend
- t0 B3 U& W; k) b
to go
ask a-B 10 [set color 15]
end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：
0 Z* }' N  F) V* F
globals [ a  ]
, }1 P1 [& [1 ]' V% ibreed [As a-A]  
breed [Bs a-B]
to setup
  clear-all
create-As 10[setxy random(5)  random(5)
; D, }: {9 x1 n5 M+ mset color 3]

set a (20)
create-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
* {- v$ m+ U5 q: S6 {' Rask a-B ? [setxy a a
set a (a + 1)
set color 45
] ]
   ]
7 S! ?3 G2 l0 }/ Y8 X
5 }$ ]0 ^& Q" _/ G  ~end
' h8 r4 h' {7 T! D( D' D. ~

1 s4 m, o$ N4 kto go
- m* U8 o8 b  k5 ]' ]4 i5 aask a-B 10 [set color 15]
end