turtles-own, Z8 B6 z( T& ^! {' a
to setup9 c7 c! Z7 G4 A0 u2 ^7 O
clear-all
9 @6 g6 w0 S; f4 G create-turtles 100
1 w/ h2 J5 N% [% ~, {* e. A ask turtles [setxy random-xcor random-ycor]& Z/ k9 Z7 X0 j7 c5 `
end
; W/ N" @" E9 z# ^0 C0 d
8 b; f1 n. r$ F& ~" f- F5 Dto go
) Z( X* t' _/ c6 i. k ask turtles
5 d6 M. d( R; v2 v3 h9 v [ right random 360 forward 1]9 K, T7 B, G6 b( z5 t1 Y$ F/ Q" s% R
run-a-turtle$ V# z$ |( X; n; N R3 ~ b" J8 R
end
: g6 v5 \+ ]* j1 d& \) B5 q& ]" `
1 j4 i. T& _# ] M; s! ~& eto run-a-turtle& e# Q1 H; H" A6 e' ]+ V; k" d+ u1 m
ask turtle i [set color red
! v8 @# ^; U1 U set i i + 1 ]
+ X6 ?, w4 L7 f% M; b% K ifelse i >= 99 [stop]
L# e. o6 T- R [run-a-turtle], C+ s( Q& m( w: V2 E( l A
end
8 i: K; ?( J3 @1 g Z8 h/ p 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.) U; n O/ \) v2 ]% @+ k6 \
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |