turtles-own$ C- n1 ?3 j# o- l5 C1 w
to setup7 J% m0 N# @# _2 c6 B
clear-all# ^" x, r, x2 l! G6 X% n5 ~
create-turtles 100
, h( R f; s, x7 g ask turtles [setxy random-xcor random-ycor]" N! x/ I8 S1 X c
end
: o# B. ^- C7 _7 R5 ` ! q* J1 ~$ r4 r( O3 v) F/ `
to go% J5 z q Y& c$ `1 g) Y
ask turtles0 l6 t1 X& S5 u' q5 o- S
[ right random 360 forward 1]
7 T9 c$ w% ^) G% T$ y1 R7 k run-a-turtle
) N, ]7 h1 ~1 }end 5 L/ U9 |' Q) Q6 _! B( h
" H* O/ Q) }1 k# V7 p. z% ~3 G) Oto run-a-turtle
1 H* i' p' ~$ ^ ask turtle i [set color red 1 z, _; }2 V8 P6 p$ L
set i i + 1 ]
7 O. n6 r( J, K: q ifelse i >= 99 [stop]
! t `6 ^7 \! E6 M, c [run-a-turtle]
5 K3 Y% }) n2 a6 ?# Yend
# p: Z! d5 D+ K2 D4 e. |" [ l" U: T9 M 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.1 i- g# x/ z; B; I5 _
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |