turtles-own& e( [" o: r, J0 v! F$ D. S- _6 S
to setup* c5 k; k) v! g$ L' T5 K# x6 o3 T
clear-all# ?0 C$ {* j, U. p
create-turtles 100
- r6 G3 K# B( ~+ P ask turtles [setxy random-xcor random-ycor]
: P: ]7 `: @# K) d8 I! R* ] T end
4 O$ @, z" Z' F9 f/ f4 A8 }, B 3 U- l/ O% [/ q4 _! R' [4 J) z
to go
6 a, `8 ^) g, F, q- k7 p, w ask turtles* J, O/ L2 q5 P$ B2 c
[ right random 360 forward 1]0 i. `* Q! p6 e
run-a-turtle# V; y+ W' y, w) ~$ `7 B
end
6 a# q9 D' c- T0 G" m7 f+ ]
. y' C! y0 ~& g# o% [" R* hto run-a-turtle" x: Z# U: V4 |* i& J$ K& Y, w
ask turtle i [set color red
. K! p: Q! {, _. w# p set i i + 1 ]
4 {* C( b& ?, j W ifelse i >= 99 [stop]% L q+ w5 U8 P7 ~6 n- |) A
[run-a-turtle]
) j& S% S2 \; r* C3 C0 {# J4 bend
* }! O' Y8 u9 Z. q 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.
1 _- {9 w+ w7 ]9 r; Q% r1 @最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |