turtles-own& }% [. A R$ L5 s4 G& A
to setup7 x0 ]8 ^% C; a0 U% n/ B( Y
clear-all
2 e, |' E6 h# U$ w8 B" v create-turtles 100
5 q$ `9 W5 b; t4 o ask turtles [setxy random-xcor random-ycor]- h: H0 g0 c- J; }# j8 q
end
0 P" U% ?: Y E$ p% r: M5 z 2 t7 P) f) ]; o. y
to go, t- g$ g) T2 {+ `: C
ask turtles9 m+ l" x' w' Q- X6 B1 J
[ right random 360 forward 1]
/ Y: v, E1 y5 {1 ?! a6 h0 n7 y5 ^) o/ p run-a-turtle
' @# Q" _5 c7 i/ j/ ]. Hend 5 P1 c. H8 G1 E2 H$ _
9 x" g: ^$ u$ t; Z$ q; L8 s1 \to run-a-turtle
: L3 I3 W3 F5 E* I6 A& _ ask turtle i [set color red
8 P7 q7 L. c8 W# R- V0 u8 c! D2 F set i i + 1 ]
8 s7 ^# e/ F9 \8 H! P8 U ifelse i >= 99 [stop]
2 G3 U+ N! V; A8 m; o [run-a-turtle]& G! P2 Y" o( |6 t
end, b+ Y, X& h# B$ q4 H+ b! L" J
我这个程序就是运行不起，我想随机create100个turtles，然后，让turtles一个一个的变红，这里我用了一个循环，而且一个一个叫turtle变红，我就是用的ask turtle i.% {/ ^4 t1 }( Z6 R1 H
最近我都在自己学这个语言，有很多不精的地方，这个程序就是通不过，谁能帮忙看看啊，万分感谢！！！！！ |
发表于 2008-7-29 21:19:36
楼主