turtles-own8 T$ u0 A$ u6 f m
to setup
. b: d0 g% r) }6 A4 b% V+ P clear-all7 B5 g1 g0 p. D" f
create-turtles 100" S3 B/ ^9 U. Q7 J
ask turtles [setxy random-xcor random-ycor]/ } u; Q: |8 g* l( Q' v. f
end
* h i `5 Z' ^ ; N, Q v e; r# W% w& O% H/ O
to go
" K" I: {8 J, n& ? ask turtles0 s5 U! M5 Z% \6 K. Q
[ right random 360 forward 1]& e% X* g( m, x6 p; Q8 S2 l
run-a-turtle' c3 `5 A- W; v& G* O9 w' o0 o+ @
end
* y4 R/ s/ j Z1 W- ?& f# T2 }. ]; T& J) U( I
to run-a-turtle% b) |9 S' {0 V" ^" n4 Z+ A0 _9 S7 j
ask turtle i [set color red : t7 @5 ]1 z. l% Q, ~9 V2 G H9 y
set i i + 1 ]
) t6 q1 Q! F0 `6 w$ m7 B* q ifelse i >= 99 [stop]9 r$ k) L! {+ L- L. r# Z
[run-a-turtle]
; V6 f5 W( _, E4 h/ p( Hend$ t) I! n8 V |9 l$ U7 D
我这个程序就是运行不起，我想随机create100个turtles，然后，让turtles一个一个的变红，这里我用了一个循环，而且一个一个叫turtle变红，我就是用的ask turtle i.+ k/ n9 e/ `! a; F8 Y6 }
最近我都在自己学这个语言，有很多不精的地方，这个程序就是通不过，谁能帮忙看看啊，万分感谢！！！！！ |
发表于 2008-7-29 21:19:36
楼主