请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
) h+ l$ A0 c3 P% [5 _/ L9 fA10个，B10个
$ ]% H% r) t, {' Q; \  \$ l9 ]& d% D& ^想要把B的第一个乌龟颜色从黄色改变为红色
4 z; D: S, L( U0 z发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
! M$ Z* n& x( u还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
& H% a1 e& M9 \) s2 e7 V3 M得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？
5 h" c; E0 Q. S" ^8 v5 I* [& k; R

+ w. b% q. |" L) T" o# d2 c4 ?! Vglobals [ a  ]
; Q5 i# K: }- j+ h5 O& d% ?breed [As a-A]  
breed [Bs a-B]
6 O3 \% I2 u0 B% Hto setup
  clear-all
; g1 G. u/ x( g" W; Hcreate-As 10[setxy random(5)  random(5)
5 A4 G( U5 h% @; w5 Nset color 3]
6 S9 k- ^% a# q$ E; nset a (20)
create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
set a (a + 0.2)
7 U, `8 \9 f& [& I) p/ ^) u" \3 ]# i/ [set color 45
: `* @: k" |3 P+ _]
! N* n) _, @* e$ n0 k( V& Y( B; {   ]

3 j' K( R( k. ~4 |( x) mend

7 x0 j0 U/ n# F( uto go
ask a-B 10 [set color 15]
8 g! E6 }% X* e4 w. r) kend

wangjiajun101

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

wangjiajun101

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

globals [ a  ]
$ T% G; i$ B6 b4 H6 E4 Ybreed [As a-A]  
breed [Bs a-B]
to setup
  clear-all
  M! b" `& O6 q+ Mcreate-As 10[setxy random(5)  random(5)
set color 3]

set a (20)
create-Bs 10[
& l' Y, d( N. N! \5 h  B; O) ^foreach [10 11 12 13 14 15 16 17 18 19 ] [
ask a-B ? [setxy a a
% V( s5 b; f: w4 H6 G  j# gset a (a + 1)
set color 45
] ]
   ]
- l( o0 Z" w: F0 ^" V" o
; q: t- t; A# W  Yend

0 @# j7 H, G! n. l- n
/ Q' _1 r0 n) u9 {2 ito go
ask a-B 10 [set color 15]
* y8 J/ M% d2 B# Q7 p5 _6 f* H  [% nend