turtles-own- J5 {# ]! \) `: P; ~$ J; O3 D9 ~
to setup, {4 p" w; L8 W9 j
clear-all
# X/ Y5 o5 Y, }' `9 e& X create-turtles 1000 y0 [* P1 R8 U% r/ P
ask turtles [setxy random-xcor random-ycor]& c/ G' d. d+ N7 d1 }4 H
end
3 _4 d8 c3 S/ ]" f) [' C
0 @$ @: U [" v# m% f, Z, ^to go
. D0 y- n0 b' s p ask turtles$ \( U- B/ y& \7 O" n) m
[ right random 360 forward 1]# Y0 ^3 G( {/ \
run-a-turtle
# e% P7 M5 Q5 J) l5 K. G! bend 1 b i5 t ~- E# c. _2 w
9 C% b) X4 n9 q- a- E2 s) L; yto run-a-turtle L' {% m; _8 N# `& D h
ask turtle i [set color red
2 P: B' K2 H8 i set i i + 1 ]+ V' e( J/ ~8 G2 S$ V! O2 H
ifelse i >= 99 [stop]
8 M3 X+ ?6 S( n$ R1 h* j7 d [run-a-turtle]
2 m8 h! c) H3 w8 N! d3 ]end
3 W! Q" `9 j; y0 P0 g2 t 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.
( W, f" T" u Z; j$ X0 S6 O! ?最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |