设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 8849|回复: 2

[求助] 有没有谁帮我看看这个程序啊,运行不起

[复制链接]
发表于 2008-7-29 21:19:36 | 显示全部楼层 |阅读模式
5仿真币
turtles-own
3 \9 Q; Z# d) j& F$ w7 j7 E- Hto setup4 D3 O1 J7 T: t$ l* k1 @
   clear-all
/ y) m% t) d8 a# K) v4 d   create-turtles 100
# d1 b: S- d1 [9 r" d; W  V5 R# h) e   ask turtles [setxy random-xcor random-ycor]
' \* I2 ?" I1 Z$ t, x9 |3 N) x end
+ Y- D* {2 r8 U$ p % b& D  O& h6 K
to go
3 e5 x& P8 n% e4 j2 s8 a3 i  X1 z5 [   ask turtles
) L2 T5 i, ^4 l& d3 e7 \) M4 x   [ right random 360 forward 1]( \4 j: |% n: b% ~$ c; b
   run-a-turtle
- f0 X7 G/ A$ |, kend & n. T- @" b& Y$ d

! O$ O5 |5 F; ]to run-a-turtle
# e/ J1 o. {% |   ask turtle i [set color red
% t( H' r0 M; S" o0 x& c$ B* ?0 _7 O                 set i i + 1 ]4 e) `, I* j; G/ t1 R
   ifelse i >= 99 [stop]) z/ H/ d" y6 V6 R5 ^* l
                  [run-a-turtle]" x% h& G. H1 O! V# L  i
end( j' Y  p9 n" `- _# Z$ ]4 V4 t* {
我这个程序就是运行不起,我想随机create100个turtles,然后,让turtles一个一个的变红,这里我用了一个循环,而且一个一个叫turtle变红,我就是用的ask turtle i./ h" ~# h( S8 {! d% z' `$ N
最近我都在自己学这个语言,有很多不精的地方,这个程序就是通不过,谁能帮忙看看啊,万分感谢!!!!!
 楼主| 发表于 2008-7-30 14:18:57 | 显示全部楼层
globals是个什么意思啊?
; D: a$ B6 h1 @9 J; v+ R我定义在turtles-own里面的。写掉了,应该是turtles-own [ i ]在前面。
) G1 g' G0 k. \再帮我看看有没有别的问题啊!
 楼主| 发表于 2008-7-30 22:47:43 | 显示全部楼层
那我再试试啊,谢谢你哦。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-6-26 22:18 , Processed in 0.012867 second(s), 11 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表