请教关于主体种类的问题

wangjiajun101

我想建立两个种类A和B
A10个，B10个
想要把B的第一个乌龟颜色从黄色改变为红色
/ K) e/ O: r. V9 l# l4 t发现不能用ask a-B 0[ ] ,只能用ask a-B 10 [ ] ，为什么？
' l0 F* e" ?- z4 C# k还有：ask a-B 10 [ ]  不是固定改变B的第一个乌龟的颜色，重复按
" `; e. k# {3 B0 F1 r; f, K得到不同的结果，如图a1 和a2
想要一直改变B的第一个乌龟的颜色该怎样写？？？
- a* f2 ?# E+ O0 f3 v3 O
4 t# z6 f5 d8 F8 e5 }0 q) V
6 ?) l+ r! W+ F6 `# i7 Uglobals [ a  ]
breed [As a-A]  
# s/ K( l- V2 x$ r% j- O+ Q. \( S1 ybreed [Bs a-B]
to setup
* [0 T! N8 P2 T. x" P; I" @  clear-all
5 j( `6 H, B7 Q3 v% K  A8 pcreate-As 10[setxy random(5)  random(5)
' Y! J8 o* B5 D8 ?8 dset color 3]
3 I- t, F# ^$ \! R! W6 F! Gset a (20)
8 a6 o3 N& a" I7 J0 xcreate-Bs 10[ foreach [0 1 2 3 4 5 6 7 8 9
2 H! N/ |6 B4 ?% k. [] [setxy a a
set a (a + 0.2)
set color 45
]
" N) N3 u: m1 @+ v   ]

end
- A% ?% P/ C+ |- C% z+ G
to go
& V% B" c8 K1 q2 ~+ \6 f$ G: vask a-B 10 [set color 15]
/ V! T. m, ~" f' ?. @, T, `end

wangjiajun101

你说：位置不同是你在B分布的时候使用随机位置
( g2 M2 P1 ^) A: A那么B分布不随机该怎样写？

wangjiajun101

程序写成如下就可以解决了：
* H6 n4 e9 \$ L2 Q9 T" c+ a2 N$ L" g
8 n+ [% d+ L! L2 a9 ?1 j% `) tglobals [ a  ]
! x6 |2 `$ s7 `1 e* f$ mbreed [As a-A]  
breed [Bs a-B]
: r; o; b" m7 c8 y8 hto setup
  clear-all
8 d; a: _, f: r1 _4 K' @4 kcreate-As 10[setxy random(5)  random(5)
+ T9 w% Z+ e6 Mset color 3]
+ T, V" S! f  S" f! u' D6 N- F
set a (20)
7 _- ^# H! T* \1 ucreate-Bs 10[
foreach [10 11 12 13 14 15 16 17 18 19 ] [
ask a-B ? [setxy a a
set a (a + 1)
% t5 g% j( J$ g- L4 b  V6 ^) q2 Iset color 45
] ]
   ]

) q1 `& o( H9 c; @* [& Fend


: ~2 Y) Z2 W; \5 J; ito go
$ v  r' q3 H- I7 a. g0 K: Bask a-B 10 [set color 15]
end