turtles-own& j6 r" q+ p% ~; }* p$ i
to setup
f; n X+ S6 x clear-all
* U- c$ T' F' B3 B0 Y# J# C create-turtles 100
. u3 g2 F1 ~0 t ask turtles [setxy random-xcor random-ycor]! k+ O. Z3 m, L4 Q! x( d( m* U
end0 P5 H% E4 l/ _6 v& J" ?; h
8 A+ x' u7 J# R
to go
7 n. Z9 m# s( } ask turtles$ I2 z$ T5 }2 O6 y+ q \
[ right random 360 forward 1]
& A" B5 l1 |1 I5 M run-a-turtle; N9 u( Y% K6 ~, a+ Z( J- d m
end 6 ?/ l( z4 O' `, Y9 Y h% B. Q
: g. S: Q1 d, j; Q- C0 x
to run-a-turtle
& a( X2 s" K# s8 Q, D$ G' y/ v: \ ask turtle i [set color red
( u' o# ^6 Z- s8 Z4 h set i i + 1 ], E& k8 T& p4 m V4 g! Y7 t4 Y6 o
ifelse i >= 99 [stop]
1 Y0 c. E& d- W: D7 S4 V0 D [run-a-turtle]4 [: t! [9 q+ O$ ?, b" S
end" h# P& V$ |; C3 x# s/ `2 k
我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.1 h/ F% ~( a6 a7 B6 m& ~
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |