turtles-own
* D$ d# p" B' |to setup9 V& u9 Z+ P% u# N" P4 v5 I
clear-all7 e/ `8 W0 o- L; [4 I$ X
create-turtles 100
4 G5 o5 B6 z3 s$ V2 }4 B1 B ask turtles [setxy random-xcor random-ycor]; S }. v( R" s# M
end
' B; ]5 e- S+ H
1 J( T0 X" f# mto go, V) R+ e5 a0 g! d
ask turtles
N G P- V8 o1 y% C1 ~6 V9 W [ right random 360 forward 1]! X& w1 q) h) `3 t5 `8 o1 L3 S
run-a-turtle3 \( k% H. Z! e. j5 w
end
0 `3 p! M( [% g, N
# `$ ?' m$ N2 a# [2 D9 @to run-a-turtle
! e' ]9 l! L, C! ?5 |1 D ask turtle i [set color red " F1 k- _- g, V. w
set i i + 1 ], H' m7 b9 g( R# F
ifelse i >= 99 [stop]
# D, z4 Q, e3 M. A [run-a-turtle]
! F m& `% W0 }% ?end
/ V7 @; ~ O; G0 d# M5 n 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i./ H% U1 S" S% [- `
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |