turtles-own% J' K1 ^0 [9 [3 h' W* p5 T; `
to setup5 R3 z! X0 E$ j6 f) V2 k/ i
clear-all+ _- N, {% N4 J7 c5 k+ i
create-turtles 100, I& g" ~" M- l! l; @: R0 B1 F1 }
ask turtles [setxy random-xcor random-ycor]' C( i+ n4 F, e( c0 F L
end
6 i* V4 [: L0 e; t8 Y
1 E/ a2 Y' C8 k# G n/ t& Sto go
, r; Q+ I! d$ J' H2 \ ask turtles
. `, U8 j' ^6 Q$ w [ right random 360 forward 1]% j& E: ? t5 p0 _6 v; q' j0 }
run-a-turtle+ O6 g+ U$ H; J* T, g+ R
end
- e) R2 z" u% t, [' A: Y3 T/ ?$ [" G9 d6 o
to run-a-turtle
~+ R! m7 N( _( K0 J0 S ask turtle i [set color red . ^$ ?) e3 E3 v8 d
set i i + 1 ]4 k2 O0 k8 R' n) V% h, v' E4 |
ifelse i >= 99 [stop]- q8 H8 K( R% R% i; e2 @3 m" V
[run-a-turtle]
5 Y( Y& J2 r$ M3 n0 B: ?, X+ O9 Hend
$ k+ a" A# e8 x. _ 我这个程序就是运行不起，我想随机create100个turtles，然后，让turtles一个一个的变红，这里我用了一个循环，而且一个一个叫turtle变红，我就是用的ask turtle i.* m, N" |2 h' N
最近我都在自己学这个语言，有很多不精的地方，这个程序就是通不过，谁能帮忙看看啊，万分感谢！！！！！ |
发表于 2008-7-29 21:19:36
楼主