turtles-own
( B9 U! T# U2 g) U) _to setup0 J# v. p! z8 K I3 E% ~" f
clear-all
1 r7 B" u6 C$ q0 g create-turtles 100- o0 K3 |- ]& S2 [ M8 h+ q. q. U5 s
ask turtles [setxy random-xcor random-ycor]
% H# S" ?2 \9 l5 ~ end& ~ b& |- @, i! N" ~, K9 ]
h; X' l/ \9 f% E( L
to go
, B: o* I7 ~$ T6 l$ ? ask turtles$ b1 i1 c: Z7 p5 P# P' }
[ right random 360 forward 1]+ r$ N8 C% O. s+ v
run-a-turtle
4 E* B" r& k* n: send
# r. v7 ~9 I" ~1 R' a/ J% N- `
+ W1 D' ]& u( F' y( ^& Sto run-a-turtle
2 A% T0 k, m! J5 q' Q ask turtle i [set color red 5 _: D3 ?7 v+ E1 G
set i i + 1 ]; c$ J/ c8 s2 H( c- ^1 A+ g; @
ifelse i >= 99 [stop]& m+ P' _$ K W3 E' b+ I0 \
[run-a-turtle]
3 M! U* e; Y" j1 K7 Wend
; ?* d5 D m* s, |0 [' A d 我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i.
0 I: p7 H9 Q, D+ S6 ^最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!! |