turtles-own7 J: m7 b7 v* O5 s' e7 _$ K9 I m
to setup |7 x) G- S7 `$ L
clear-all
4 z! _2 S* O1 n: j/ a) x; Y. V( p- P create-turtles 100
6 y' W, m$ {7 S7 r& k. p1 h ask turtles [setxy random-xcor random-ycor]4 \$ X5 _. M* e4 r* a
end) ^+ [, F; o: }# I
7 @( |& k8 a( m$ U$ U, I
to go
Z; W) t4 G+ m' m8 v# K ask turtles
4 g/ Z& ^5 D) I/ ? a+ B [ right random 360 forward 1]8 D5 ?: b4 i3 Q- A( q
run-a-turtle* B1 p# Z8 A) j. W1 @1 z3 ~. R* E- K* n
end H+ P3 Q @5 H0 ~" @& T
0 Q \7 W. h$ e. e; `7 M+ g3 d
to run-a-turtle' c) k, l8 A- d- F
ask turtle i [set color red
1 P) S# v7 j; ^2 b. c set i i + 1 ]) j. N. k. b3 I& v
ifelse i >= 99 [stop]5 I, w5 z, v; _+ P5 J5 S0 @5 B
[run-a-turtle]( W; k6 d# Z; L* P. k- N0 i
end1 Y+ b+ |& m& O& {
我这个程序就是运行不起，我想随机create100个turtles，然后，让turtles一个一个的变红，这里我用了一个循环，而且一个一个叫turtle变红，我就是用的ask turtle i.
/ D& g; \2 g6 k+ n% L+ r: ^最近我都在自己学这个语言，有很多不精的地方，这个程序就是通不过，谁能帮忙看看啊，万分感谢！！！！！ |
发表于 2008-7-29 21:19:36
楼主