turtles-own
, \" k, y* ?9 @ @3 l7 l* }' k" y' gto setup
2 ~4 e2 ]& C/ R/ [, k clear-all/ k* B( r, t2 b) P9 d& f( Z
create-turtles 100/ ]3 W$ E I9 [. m4 A( Y
ask turtles [setxy random-xcor random-ycor]: e/ G- r% S8 T$ Z4 u
end8 M% @8 Q4 f8 W+ \0 S+ @
4 A3 _3 }6 l& o, e! n& q; hto go
' U( I( Q- h/ y& z2 W ask turtles$ _3 N1 ^7 J& E8 ~
[ right random 360 forward 1]
6 ^2 w$ ? Y: \' f8 `; |* P; F1 l run-a-turtle: l s0 O4 P; {9 }5 W5 H; {3 H* I
end 3 _" g, n6 ^* L ^ M8 C8 l
9 _1 }6 i- d- O- y. p1 l( V
to run-a-turtle& [1 r: a; `" G3 Z
ask turtle i [set color red
; H+ ? |' Z+ d; ~+ h' N set i i + 1 ]: @( q- ^& U5 \
ifelse i >= 99 [stop]
4 T" Y+ e; A8 p: j [run-a-turtle]
) ~; Q; |& [6 x1 X7 q3 H+ hend
0 L5 t) p& F+ Q X 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.. O7 X b1 M, n* K
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |