信奥赛 Logo程序设计03 过程编辑

1、(授课讲稿) 吴剑辉第三讲 过程编辑 在文本窗口中直接输入命令画图虽然比较简便，但也有缺点：在输入了比较复杂的图形之后，不但无法对这些命令进行保存，也难以进行补充修改。在学会使用Logo系统提供的 Editor “编辑器” 之后，我们编写各种Logo图形的程序就更加容易了。一、使用编辑器二、带参数的过程三、海龟的定向定位一、使用编辑器1、怎样进入编辑窗口？、窗口方式：（如图1）单击工具栏里的“编辑按钮”。 打开编辑器图1、命令方式：（如图2）在命令窗口中的“？”Logo提示符后输入 EDIT 屏幕上都可弹出编辑窗口。命令方式图2【说明】：在编辑窗口里输入程序的方式和 Word中输入其他文本的方

2、式是基本一样的。编写的程序都是以“过程”的形式出现的。 过程结构：一个过程是由3个部分组成的。 、引入：由TO引入，再加过程名。 过程名一般都使用易于理解的汉字拼音或英语单词（不能使用Logo已有的命令），而第一个字符必须是字母，后面可以是字母或数字，过程名的字符数不得超过8个字符。 、主体：由一系列Logo命令或其他命令组成。 要使整个过程层次非常清楚，每行过程体的开头都加入2个空格，或按一下Tab“跳格键”；最基本笔划或图形分行来编写构成比较复杂的图形。 、结束：用END来表示编辑工作完成。2、什么是过程？ Logo过程是命令的集合并冠以一个名字。【知识点】： 编写Logo程序的步骤：编写

3、过程定义过程调用过程。3、过程的编写及定义。编写画正方形的过程：TO ZFX REPEAT 4FD 100 RT 90END 、在命令窗口中直接输入? TO ZFX REPEAT 4FD 100 RT 90 ENDZFX defined.?、使用编辑窗口单击工具栏单击工具栏里的里的按“F2”键例题分析：编程画一个边长为100的正方形。编写过程的方法：TO 过程名 一条或多条命令END4、过程的调用。 所定义的过程ZFX 已经成为Logo的一个新的命令了。在命令窗口键入ZFX ，图形窗口中马上就会画出一个正方形。5、在操作中学、编写一个过程，画出一所小房屋（如图3）图3-小房屋(XFW) TO

4、XFW DRAW REPEAT 4FD 100 RT 90 FD 100 LT 90 FD 30 RT 120 REPEAT 3FD 160 RT 120 HT ENDTO HJ DRAW FS REPEAT 2FD 100 RT 90 FD 50 RT 90 RT 180 REPEAT 180FD 25*PI/180 LT 1 BK 25 REPEAT 2FD 100 RT 90 FD 20 RT 90 RT 90 PU BK 70 LT 90 PD REPEAT 2FD 100 RT 90 FD 20 RT 90 PU RT 90 FD 20 LT 90 FD 125 PD RT 30 R

5、EPEAT 3FD 50 RT 120 LT 30 PU BK 140 PD BK 50 PU FD 90 RT 90 FD 25 LT 90 BK 40 PD BK 80 PU FD 120 RT 90 FD 25 LT 90 BK 40 PD BK 50 PU FD 90 LT 90 FD 50 RT 90 PD HTEND图4-火箭(HJ) 、编写一个过程，画出一支火箭（如图3）TO DF DRAW FS HT FD 110 RT 162 REPEAT 5FD 80 LT 72 FD 80 RT 144 LT 162 BK 110 RT 36 REPEAT 5FD 42 BK 42 RT

6、 36 FD 110 BK 110 RT 36 LT 72 FD 42 LT 54 FD 15 RT 70 FD 35 RT 90 FD 15 LT 90 REPEAT 2FD 10 LT 90 FD 60 LT 90FD 10 RT 65 FD 40 LT 35 FD 45 LT 155 FD 40 RT 30 FD 30 RT 150 FD 60 LT 25 FD 50 LT 155 FD 50 RT 15 FD 61 RT 144 FD 45 LT 151 FD 70 LT 37 FD 35 LT 58 FD 39 RT 35 FD 10 LT 90 FD 15 RT 90 FD 22

7、RT 107 FD 31 LT 144 FD 80 RT 72 FD 80 LT 144 FD 50 RT 97 FD 40 LT 84 FD 15 LT 87 FD 45 PU HOME PD HTEND、编写一个过程，画出一枚队徽（如图）。、窗口方式： 单击工具栏单击工具栏里的里的（或）、命令方式：（使用保存过程命令）格式：SAVE “文件名功能：把当前工作区已经定义过的所有过程按 指定文件名存盘。6、文件的保存。 当出现存储文件对话框，可选择“驱动器”、“文件夹”确定把文件存在什么地方，然后输入文件名。例如ZFX，在单击“确定”按钮后，计算机会自动加上“.LOG”扩展名，以ZFX.LOG

8、存储起来。 、首先看画边长为100的正方形过程：TO ZFX REPEAT 4FD 100 RT 90END 这个过程只能画边长为100的正方形。如果要想再画其他尺寸的正方形（如图5），那该怎么办？二、带参数的过程例题分析：怎样改变图形的大小和形状？1、设计具有共同特点的过程图3305080100注意观察：大小不同的正方形，其区别在于边长的不同。【知识点】：事实上，Logo系统就是这样编写出带变量的过程。 TO ZFX :B REPEAT 4FD :B RT 90 END 说明：在定义过程时，过程名后的变量叫做形式参数,即由冒号“:”与参数符号组成，之间不能留有空格？ZFX 100？ZFX 8

9、0？ZFX 50？ZFX 30 、再看画边长、再看画边长为为6060的正方形过程：的正方形过程： TO ZFX REPEAT 4FD 60 RT 90 END 这个过程只能画边长为60的正方形。如果要想再画相同尺寸的其他正多边形（如图6），那又该怎么办？观察与设计：其区别在于边数和转角的不同。TO ZFX :N REPEAT :NFD 60 RT 360/:NEND【探究】：进而设计改变大小或形状的正多边形过程进而设计改变大小或形状的正多边形过程。 TO DBX :N :B REPEAT :NFD :B RT 360/:N END图6？DBX 3 60 ？DBX 4 60？DBX 5 60？D

10、BX 6 60? DBX 7 60? DBX 8 60? DBX 4 120 、格式与不带参数的过程基本相同，所不同的只是这里过程名后面带有参数（称之为“形式参数”，即由冒号“:”与参数符号组成，之间不能留有空格）。过程名与参数要留有空格。 、过程体内的每个参数必须在过程首部出现，同时参数符号要完全一致。 、执行新定义的带参数过程时，过程名后面也要跟一个实际参数值。实际参数与形式参数不同，它是一个数或有确定值的表达式，但数或表达式前面不再有冒号。 、在必要时，一个过程可以使用多个参数。在有多个参数的情况下，各个参数数据之间也必须留一个空格。2、编写带参数过程的说明、编写带参数过程的说明3、常用

11、绘图工具过程。、常用绘图工具过程。1、正方形 (:B表示边长) TO ZFX :B REPEAT 4FD :B RT 90 END2、长方形 (:B表示宽, :A表示长) TO CFX :A :B REPEAT 2FD :A RT 90 FD :B RT 90 END3、三角形 (:B表示边长) TO SJX :B REPEAT 3FD :B RT 120 END4、正多边形 (:N表示边数, :B表示边长) TO DBX :N :B REPEAT :NFD :B RT 360/:N END5、圆(:R表示半径,在LOGO语言中可以直接用PI来代替的值) TO YUAN :R REPEAT 3

12、60RT 0.5 FD :R*PI/180 RT 0.5 END 6、左弧 (:N表示弧度, :R表示半径) TO LHU :N :R REPEAT :NFD :R*PI/180 LT 1 END7、右弧 (:N表示弧度, :R表示半径) TO RHU :N :R REPEAT :NFD :R*PI/180 RT 1 END8、左叶 (:N表示弧度, :R表示半径) TO LY :N :R REPEAT 2LHU :N :R LT 180-:N END9、右叶 (:N表示弧度, :R表示半径) TO RY :N :R REPEAT 2RHU :N :R RT 180-:N END10、平行四边

13、形： TO PXSBX :B1 :B2 :J REPEAT 2FD :B1 RT :J FD :B2 RT 180-:J END11、空心矩形 (:A表示长, :B表示宽) TO KXJX :A :B STAMPRECT :A :B END12、实心矩形 (:A表示长, :B表示宽) TO SXJX :A :B (STAMPRECT :A :B ”TRUE) END13、空心椭圆 (:X表示长半轴, ;Y表示短半轴) TO KXTY :X :Y STAMPOVAL :X :Y END14、实心椭圆 (:X表示长半轴, ;Y表示短半轴) TO SXTY :X :Y (STAMPOVAL :X :

14、Y ”TRUE) END15、空心正多角形 (:N表示边数, :B表示边长) TO KXJ :N :B REPEAT :NFD :B RT 720/:N FD :B LT 360/:N END16、一般正多角星 (一般正多角星的内角角度为NJ=（N-2K）*180/N，其中K为整数，K的范围在1KN/2，且K与N没有公因数。) TO YBJ :N :B :K REPEAT :NFD :B RT :K*360/:N END4、过程的嵌套调用、过程的嵌套调用 过程调用的最简单方式就是在命令行直接键入过程名。此外，还可以另外一种过程调用的方式，那就是在一个过程中允许使用已定义的过程，即过程的嵌套调用

15、。过程B过程A过程C过程过程A过程B过程C过程过程的串式嵌套调用说明：过程的嵌套调用还允许使用多层及交叉的方法。过程的嵌套调用还允许使用多层及交叉的方法。过程的并式嵌套调用5、在操作中学：编程画出图形（如右下图）。、在操作中学：编程画出图形（如右下图）。子过程：TO ZFX :X REPEAT 4FD :X RT 90ENDTO SJX :X REPEAT 3FD :X RT 120ENDTO CFX :A :B REPEAT 2FD :A RT 90 FD :B RT 90END小房屋(XFW)(一般都要以带参数的过程方式编写)主过程：TO XFW DRAW FS ZFX 100 PU RT

16、 90 FD 15 LT 90 PD CFX 60 30 PU RT 90 FD 60 LT 90 FD 70 PD REPEAT 4 ZFX 15 RT 90 PU FD 30 LT 90 FD 85 RT 120 PD SJX 120 HTEND动脑筋：如何改变小房屋的大小。【提示】:只要将主过程加上带参数:X,并把步数100改为:X，其余的按比例类推。(新值=原数/100*:X) TO XFW :X DRAW FS ZFX :X PU RT 90 FD :X*0.15 LT 90 PD CFX :X*0.6 :X*0.3 PU RT 90 FD :X*0.6 LT 90 FD :X*0.

17、7 PD REPEAT 4 ZFX :X*0.15 RT 90 PU FD :X*0.3 LT 90 FD :X*0.85 RT 120 PD SJX :X*1.2 HTEND 试一试，画一画：把原来编写的“队徽”过程改为可变幻大小。动脑筋，画一画三、海龟的定向定位 采用采用“描点法描点法”，让海龟从一点走到下一点，对于不规，让海龟从一点走到下一点，对于不规则的图形也就不难了，关键是如何指定海龟的位置。在绘图则的图形也就不难了，关键是如何指定海龟的位置。在绘图过程中，有时很难确定海龟的位置和方向，我们可以使用定过程中，有时很难确定海龟的位置和方向，我们可以使用定位和定向等命令后就方便多了。位和

18、定向等命令后就方便多了。 1、坐标概述、坐标概述 用横方向和纵方向两个数来表示一个点的方法在数学中叫 “坐标法”。在Logo画图屏幕，表示左右位置的数叫X坐标,表示上下位置的数叫Y坐标，海龟起始的位置在屏幕的中心点（海龟的头朝上）为原点，即（0，0）。2、基本命令、基本命令【指导说明】： 、比较SETX、SETY与FD、BK使用时海龟位置的差异。 、比较SETH与RT、LT使用时海龟角度的差异。 、走到命令SETXY和画点命令DOT格式中的方括号内的数据只允许使用常数。使用变量或表达式时，要采用以下格式： SETXY SE :X :Y DOT SE :X :YSETXY SE :X :Y DO

19、T SE :X :Y 命命 令令全全 称称 简简 写写说说 明明横移横移SETX :XSETX :X海龟平移到海龟平移到x x位置位置纵移纵移SETY :YSETY :Y海龟竖移到海龟竖移到y y位置位置走到走到SETXY :X :YSETXY :X :Y移动海龟到移动海龟到(x y)(x y)位置上位置上定向定向SETH :XSETH :X海龟顺时针转动到海龟顺时针转动到X X度处度处画点画点DOT:X :YDOT:X :Y在在(x y)(x y)处画一个点处画一个点水平位置水平位置XCORXCOR输出海龟输出海龟X X轴的位置轴的位置垂直位置垂直位置YCORYCOR输出海龟输出海龟Y Y轴

20、的位置轴的位置当前位置当前位置GETXYGETXY输出海龟当前的输出海龟当前的xyxy值值当前角度当前角度HEADINGHEADING输出海龟的指向角度输出海龟的指向角度3、在操作中学、在操作中学、画出三个内嵌套的正方形图形（如右图）。、画出三个内嵌套的正方形图形（如右图）。TO SVQ DRAW PU SETXY-100 -100PD REPEAT 4FD 200 RT 90 SETXY-100 0 SETXY0 100 SETXY100 0 SETXY0 -100 SETXY-100 0 SETXY-50 50 RT 90 REPEAT 4FD 100 RT 90END、画出层叠的二个等腰

21、三角形（如右图）。、画出层叠的二个等腰三角形（如右图）。200100TO SJSAB DRAW SETX -100 SETXY0 100 SETXY 100 0 SETX -100 SETXY0 0 RT 135 FD 100 SETX 0 PU SETY 0 PD RT 90 FD 100 SETX 0 PU SETY 0 PDEND2004、题例分析：在正五边形中画出内嵌正五角星 （如图7）。 【编程方法1】：第一步：编写过程第一步：编写过程L1L1，执行后观察，执行后观察两个图形的方位。（如图两个图形的方位。（如图7- -1）TO L1 :B LT 18 REPEAT 5FD :B RT

22、 72 RT 36 REPEAT 5FD :B RT 144END图7图7-1第二步：修改过程中正五角星的第二步：修改过程中正五角星的边长，逐一增长。边长，逐一增长。:B*1.3:B*1.5 说明：先确定正五边形和正五角星的相互间转角，后要反复多次调试更改正五角星的边长。这种方法是画不规则组合图形的最基本的方法，对于初学者有助于观察分析、判断思考和综合运用知识的能力，但是比较麻烦！ TO L1 :B LT 18 REPEAT 5FD :B RT 72 RT 36 REPEAT 5FD :B*1.62 RT 144END【编程方法2】：TO L2 :B LT 18 REPEAT 5PR GETXY FD :B RT 72END？DRAW L2 100DRAW L2 100 0 0 0 0 （A A点坐标）点坐标）-31 95 -31 95 （E E点坐标）点坐标）50 154 50 154 （D D点坐标）点坐标）131 95 131 95 （C C点坐标）点坐标）100 0 100 0 （B B点坐标）点坐标） 说明：使用相关海龟定方位和查方位命令为我们绘制较复杂的图形提供了极大的方便。 TO L2A LT 18 REPEAT 5FD 100 RT 72 SETXY50 154 SETXY100 0 SETXY-31 95 SETXY131 95 SETXY0 0