turtles-own
1 J8 G6 |6 s& b' M4 {/ `! ^6 Fto setup
* ]7 J1 b! p! w3 H, H! | clear-all1 A7 {, s: O! C( `4 X5 `
create-turtles 100
* @* m8 N5 d- Y ask turtles [setxy random-xcor random-ycor]3 L# ?. P7 {: B$ U; o) L5 a
end* g/ M, s6 P8 K: g1 s1 @6 w2 t
9 E1 U$ W% K4 x3 J2 b6 d
to go) D A+ A% j3 m
ask turtles' I. D+ ~. n; r+ j
[ right random 360 forward 1]
( Q5 f8 j7 O! j# A/ D# h run-a-turtle1 g, l6 U5 r" d3 @! Y/ M4 `# t
end " n1 Q, K4 y# c n. U6 K
9 y3 _0 i& X* z( Pto run-a-turtle9 M( [3 Q$ {$ {* ^! V: y
ask turtle i [set color red
4 K( g7 t) I; \ set i i + 1 ]
: z4 E6 y7 L) \4 B( t ifelse i >= 99 [stop]
8 v: D" w+ g# w4 A+ n1 D [run-a-turtle]
$ t3 [ Z! F# vend
+ I; E6 }/ b1 [5 t) | 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.
5 j' Q2 y' y3 K最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |