turtles-own) u+ c% v- b; d6 M
to setup: E d, C" r) h: p
clear-all
; z; z' U% `' ~! a create-turtles 100; _9 j/ ], f' @9 a K! b
ask turtles [setxy random-xcor random-ycor]
9 r- |* v- `* W! @4 Z$ a end
& j4 V" r3 L. B9 o% z) b: z9 |7 @, h) t 3 f9 p) i, ?4 \3 B& m1 ] y! U1 |
to go* r$ f6 J( a7 j
ask turtles3 k' D6 t: N! u6 T& o' _/ z# U
[ right random 360 forward 1]
$ \0 V( Q4 v, ]5 |. ?. s/ D: G, [ run-a-turtle, [' S1 C! C2 |1 Q& i7 u
end
$ ^; ^: l# x$ s
3 }0 w0 ^$ q: y1 a" qto run-a-turtle$ _3 L' \- K, m: m4 ~4 K2 \0 t' E
ask turtle i [set color red ; }4 r* D* p: g2 o( w
set i i + 1 ]3 G& B- |+ H+ N6 E/ P D; H9 [
ifelse i >= 99 [stop]
& n, J8 o( E1 D [run-a-turtle]
! B0 b- s( |; [9 {9 R, cend
1 M4 X* j' ]. @0 K: ?0 Q) i9 p9 B 我这个程序就是运行不起，我想随机create100个turtles，然后，让turtles一个一个的变红，这里我用了一个循环，而且一个一个叫turtle变红，我就是用的ask turtle i.
5 j$ C* e, b2 s/ Y! h/ C5 o5 F7 f5 r最近我都在自己学这个语言，有很多不精的地方，这个程序就是通不过，谁能帮忙看看啊，万分感谢！！！！！ |
发表于 2008-7-29 21:19:36
楼主