请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
- G$ j! Y: ~0 M9 zA10个，B10个
/ m' G9 S- l) x# U4 f想要把B的第一个乌龟颜色从黄色改变为红色
发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
, g& Q8 E* ]- ]7 P/ H得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？


6 |3 x, C& E4 O7 e: T, g: g+ Wglobals [ a  ]
breed [As a-A]  
breed [Bs a-B]
to setup
! ]. w+ r5 a$ B' O8 \6 v$ a& q  clear-all
/ A" g2 _- q& x! R* K( tcreate-As 10[setxy random(5)  random(5)
5 \. w5 X+ T0 }( {* H2 i# Iset color 3]
, C* B" @+ s8 J& n+ \set a (20)
create-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
* V' {  g7 k! m& ]7 V8 Q* W+ _9 fset a (a + 0.2)
set color 45
]
. B2 \& n' H* @   ]

end

to go
4 @; h+ d9 n* i" \ask a-B 10 [set color 15]
% ^; p; B8 L$ |) {7 m3 ~) t# hend

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
0 Y# O. y+ B: u, l5 u那么B分布不随机该怎样写？

wangjiajun101

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

  F+ }- [9 W- `/ N6 u' zglobals [ a  ]
breed [As a-A]  
breed [Bs a-B]
6 ?: F5 b; V7 B. x: K+ @6 C9 Mto setup
  clear-all
create-As 10[setxy random(5)  random(5)
' W- T$ z9 ^# t. }8 r  }set color 3]

set a (20)
create-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
1 |, \8 e4 L" iask a-B ? [setxy a a
* F; L0 P' ~% rset a (a + 1)
set color 45
] ]
   ]
: ?( n$ r/ s5 U, E* i3 W
end


5 R7 G7 c; R" K: y0 {* Uto go
ask a-B 10 [set color 15]
end