turtles-own
' i* W5 G& x" b7 Nto setup& g+ _" c" G' \9 r2 v6 I
clear-all
, V0 k9 }+ i: ~8 l* R create-turtles 100+ |% \: W4 V1 w5 u
ask turtles [setxy random-xcor random-ycor]* F, D) x! v5 t5 _$ J8 M% a. h
end
) n4 J$ ?5 z9 ], q5 N
8 B' j8 q) F4 u1 y; ]6 X# a+ Wto go
# [4 ^3 ~! T. V) A ask turtles, q; P! x& S; ]9 T
[ right random 360 forward 1]
, T% n7 J, a: h% ^6 {! Q run-a-turtle) d; z3 @7 [# Y6 o; T: @
end
2 g9 S. @: s, [; u$ x Z3 s' F6 {2 v( V& y1 C7 k* ?) }4 F8 \
to run-a-turtle/ |* X% X3 }9 x0 Y
ask turtle i [set color red
6 O3 X8 V9 t- y% A& Q# F4 k set i i + 1 ]
- V# P6 E1 s8 u- q6 @ ifelse i >= 99 [stop]7 m1 h# i. o3 B( v: S6 b) O# y0 P
[run-a-turtle]! m$ ^2 q% P' b' T0 O4 n
end, ]8 Q# g& E+ J2 s
我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.9 e. p! Q$ \/ a1 G5 @$ r0 r
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |