请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
想要把B的第一个乌龟颜色从黄色改变为红色
发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
得到不同的结果，如图a1 和a2
9 b9 E: W5 H3 w9 c' @+ f想要一直改变B的第一个乌龟的颜色该怎样写？？？
% i' }" L6 H, |( @/ l% E  R

# W9 h, X. _5 \, C7 sglobals [ a  ]
breed [As a-A]  
breed [Bs a-B]
- z: l: M" b7 j- a2 c$ G0 D3 Qto setup
. X5 \; B6 O( h2 \4 l  clear-all
1 e" }+ }) u3 _. Vcreate-As 10[setxy random(5)  random(5)
set color 3]
set a (20)
/ `% {6 V" {3 r/ u" h# U; [. tcreate-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
] [setxy a a
7 ~  o6 K/ t$ p8 q. y9 t: Z3 Z/ Iset a (a + 0.2)
) i. Z4 {. g' i' Z2 t& `8 i( ^  ]set color 45
]
" H4 D" P6 D% R   ]

end

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

wangjiajun101

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

wangjiajun101

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

globals [ a  ]
breed [As a-A]  
7 o4 d( d& C; [2 h& t$ y) ^% Mbreed [Bs a-B]
to setup
  clear-all
create-As 10[setxy random(5)  random(5)
2 k4 H5 O3 y( T$ `* Aset color 3]

set a (20)
1 }% F( u! G5 H% ~- {/ p: X9 ocreate-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
1 \/ @, G' ^* ~ask a-B ? [setxy a a
set a (a + 1)
set color 45
' |+ Y" }/ k- M7 w& v: V, M] ]
) ]6 |* x3 q! R! G! y( F   ]
/ G9 `5 J# a! d) U& g6 ~! E
) V, v; d' ?& W/ Q3 z* [end
' r2 ^- p. \. r2 e, }

to go
ask a-B 10 [set color 15]
! X; T4 g. K% [# x4 r) ?% hend