turtles-own
# I5 ^2 Z" J. B0 Gto setup
* W9 ]6 }. y& U; ]+ M- y clear-all
+ A( R& a& I/ K9 ] create-turtles 100
8 e# a. V/ g4 W3 m ask turtles [setxy random-xcor random-ycor]" @* r2 H0 K$ A( P3 ]" K
end- j5 B8 w4 h: r9 r8 w, i
, d) ?+ w2 |7 J' Eto go
; [( x( g1 U$ X1 @8 U ask turtles, z$ `7 B! P$ A, {( V+ c& E- q
[ right random 360 forward 1]
- c2 Q# n% l6 Z b5 Z4 n run-a-turtle
7 r) A& B/ R0 Mend 2 S" p; g. R1 }
" R3 J9 o# z0 K8 ?# m! r# fto run-a-turtle
6 J+ q# [1 P+ J ask turtle i [set color red
8 E6 f& o0 Z0 ~2 w) Y) ? set i i + 1 ]
; X' w+ b3 b" S+ O' ~, w ifelse i >= 99 [stop]( N1 E0 Z! ~, T/ Z2 [8 ?4 O
[run-a-turtle]
' \7 K; A, D* R! I" Send
! M4 S1 t! u) t 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.& g* f0 K) K. p6 Y& i& d
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |