logo语言竞赛培训课件(编辑修改稿)内容摘要:

、激活法。 退出多龟作图可以用 draw命令。 指名法。 使用呼叫命令: ASK 用 ASK指名调用海龟。 这种方法不够 灵活,用得较少。 格式: ASK [海龟代号 ] [命令组 ] 例如 : ASK 1 [FD 30 ST] ASK 2 [FD 60 ST] ASK 3 [RT 90 FD 60 ST] SETPC 12 可以发现有一只海龟变红色了。 这是系统初始状态时那只 0号海龟。 默认状态下,除 0号海龟以外的海龟是不显示的。 只有通过 ST命令才能让它们显示出来。 多龟作图 • 范例: ASK 1 [FD 30 ST] ASK 2 [FD 60 ST] ASK 3[BK 30 ST] ASK [1 2 3 ] [REPEAT 3[FD 30 RT 120]] 多龟作图 • 激活法。 激活法常用 TELL—WHO—EACH命令激活并调用海龟。 这是常用的多龟作图方式。 (告诉命令 TELL是叫醒海龟的命令。 用 who命令可以查看叫醒了几只。 ) • 格式: TELL [海龟代号 ] ASK 1 [FD 30 ST] ASK 2 [FD 60 ST] ASK 3 [BK 30 ST] TELL [0 1 2 3 ] RT 90 FD 100 上面语句可以调用 0~3号海龟同时作图。 多龟作图 • 也可使用告诉命令 TELLALL。 这也是叫醒海龟的命令。 用 who命令可以查看叫醒了几只。 ) • 格式: TELLALL 海龟代号 1 海龟代号 2 • ASK 1 [FD 30 ST] ASK 2 [FD 60 ST] ASK 3 [BK 30 ST] TELLALL 0 2 RT 90 FD 100 上面语句可以调用 0~2号海龟同时作图。 温馨提示 使用 ASK呼叫命令和 TELL告诉命令,只能调用 16只( 0~15)海龟。 若要调用更多的海龟,可以用 SETTURTLES 命令设置海龟的数量。 • 例如: setturtles 300 ask 260 [fd 30 st] 若没用 SETTURTLES 命令设置海龟的数量( 1~32767),则类似 ask 29 [fd 30 st] 这样的语句就会报错。 练技能 ( P34 4) 第 4题 让五只海龟一起来画奥林匹克五环标志图。 draw ht ask 1 [setpc 9 lt 90 pu fd 90 pd] ask 2 [setpc 12 rt 90 pu fd 90 pd] ask 3 [setpc 14 pu bk 30 lt 90 fd 45 pd] ask 4 [setpc 2 pu bk 30 rt 90 fd 45 pd] ask [0 1 2 3 4 5] [stampoval 35 35] 练技能 ( P34 5) 第 5题 (1) 用多只海龟画出下列图形参考答案 1 draw ht pu fd 50 pd fd 50 ask 1 [rt 24 pu fd 50 pd fd 50] ask 2 [rt 48 pu fd 50 pd fd 50] ask 3 [rt 72 pu fd 50 pd fd 50] ask 4 [rt 96 pu fd 50 pd fd 50] ask 5 [rt 120 pu fd 50 pd fd 50] ask 6 [rt 144 pu fd 50 pd fd 50] ask 7 [rt 168 pu fd 50 pd fd 50] ask 8 [rt 192 pu fd 50 pd fd 50] ask 9 [rt 216 pu fd 50 pd fd 50] ask 10 [rt 240 pu fd 50 pd fd 50] ask 11 [rt 264 pu fd 50 pd fd 50] ask 12 [rt 288 pu fd 50 pd fd 50] ask 13 [rt 312 pu fd 50 pd fd 50] ask 14 [rt 336 pu fd 50 pd fd 50] 练技能 ( P34 5) *第 5题 (1) 用多只海龟画出下列图形答案 2 draw ht tellall 0 14 each [rt 24*who pu fd 50 pd fd 50] 练技能 ( P34 5) 第 5题 (2) 用多只海龟画出下列图形,并把每个五角星变成不同的颜色。 参考答案 1: DRAW FD 70 REPEAT 5 [FD 20 RT 144] ASK 1 [ST SETPC 1 RT 45 FD 70 REPEAT 5 [FD 20 RT 144] ASK 2 [ST SETPC 2 RT 90 FD 70 REPEAT 5 [FD 20 RT 144] ASK 3 [ST SETPC 3 RT 135 FD 70 REPEAT 5 [FD 20 RT 144] ASK4 [ST SETPC 4 RT 180 FD 70 REPEAT 5 [FD 20 RT 144] ASK 5 [ST SETPC 5 RT 225 FD 70 REPEAT 5 [FD 20 RT 144] ASK 6 [ST SETPC 6 RT 270 FD 70 REPEAT 5 [FD 20 RT 144] ASK 7 [ST SETPC 7 RT 315 FD 70 REPEAT 5 [FD 20 RT 144] 练技能 ( P34 5) 第 5题 (2) 用多只海龟画出下列图形,并把每个五角星变成不同的颜色。 *参考答案 2 DRAW TELLALL 0 7 ST EACH [ SETH 45*WHO SETPC WHO FD 80 REPEAT 5 [FD 30 RT 144]] each [命令列表 ] 每只醒着的海龟都执行命令列表 who。 当前调出的海龟号。 例如: tellall 0 7 who 结果显示: result: [0 1 2 3 4 5 6 7] seth 参数。 设置海龟头的方向 过程的定义 • 过程就是一系列有序命令的集合。 TO 过程名 过程体 END 过程的第一行称为过程头,以 TO开头,后面是过程名,如: SJX WJX,过程头和过程名间要有空格 中间部分是过程体,是我们用来绘图或解决问题而按照一定次序编排的命令序列,它是整个过程的核心。 过程体可以是一行命令,也可以是多行命令,还可以是其他一些过程名。 最后一行是过程尾,用 END表示过程的结束。 过程定义范例 定义一个画三角形的过程 TO SJX REPEAT 3 [FD 90 RT 120] END 定义一个画五角星的过程 TO WJX REPEAT 5 [FD 70 RT 144] END 定义过程后,输入过程名,回车,即可执行过程。 过程定义范例 2 定义一个画花的过程 TO HUA REPEAT 5 [REPEAT 3 [FD 50 RT 120] RT 72] END 定义过程后,输入 HUA,回车,即可执行过程,画出花的图形。 过程定义范例 3 定义画立体五角星的过程 TO LW HT RT 18 REPEAT 5 [FD 60 RT 144 FD 60 RT 54 FD 110 BK 110 LT 54+72] END 定义过程后,输入 LW,回车,即可执行过程,画出五角星的图形。 请大家分析一下上面画立体五角星的方法。 动脑筋 ( 41) 原始命令可以用作过程名吗。 过程名可以重复吗。 原始命令不可以用作过程名,例如: to draw 回车后,电脑会显示: DRAW is already in use. Try a different name. to cs 回车后,电脑会显示: CS is already in use. Try a different name. 过程名也不可以重复。 即,定义过的过程,若用它的过程名,再次定义另一个过程,则先定义的过程被替换。 在一个过程中,如果命令输入错了怎么办。 可以输入 EDIT 过程名 ,回车后会调出过程编辑器。 改正错误后,按 F2退出编辑器即可自动保存修改。 过程的编辑和修改 • 定义过程后,使用 EDIT 过程名 可调出编辑器,在编辑器中修改后,按 F2即可关闭并保存修改。 若定义了多个过程,则可以用 EDIT ALL 回车后,可以编辑器中编辑所有的过程。 例如: TO F REPEAT 4 [FD 90 RT 90] END 输入 F,回车后可画出正方形。 此时,输入 EDIT F ,回车则打开编辑器。 在编辑器中添加 SETPC 12,过程变成: TO F SETPC12 REPEAT 4 [FD 90 RT 90] END 然后按 F2关闭编辑器 再输入 F,回车后会发现,画出的是红色的正方形了。 说明修改成功。 过程的保存 • 在命令窗口或在编辑器中编写过程后,单击“文件”菜单中的“保存”(快捷键是 F6),或使用工具栏的 SAVE按钮,可以把过程保存下来,保存时的文件名,可以与过程名不同。 • 保存过程以后,可以使用“文件”菜单中的“打开”或“装载”命令,或使用工具栏上的 LOAD按钮,打开保存的过程文件( *.LGO),再输入过程名,回车后即可执行过程。 过程范例 旋转的风车 to fc repeat 6 [ fd 70 repeat 4 [fd 30 rt 90] bk 70 rt 60] wait 10 clean rt 10 fc end 过程范例 编写一个画地板图案的过程(自己加颜色) TO DB HT REPEAT 6 [REPEAT 6 [FD 30 LT 60] FD 30 RT 60] END 想一想,上面的语句 是如何画出地板图形的。 你能给地板图形填上颜色吗。 巧定海龟位置 设置坐标命令 SETXY [:X :Y] 将海龟移到坐标 [:X :Y ]处,海龟的方向不变。 设置横坐标命令 SETX :X 将海龟移到 X坐标指定位置, Y坐标和海龟方向。
阅读剩余 0%
本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体),仅供学习参考。 用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权,请联系我们反馈本站将在三个工作日内改正。