第5節(jié) 坐標定位畫圖方法.doc

第五節(jié) 坐標定位畫圖方法學習任務：1認識LOGO語言中的坐標2能用坐標命令編程畫圖一、認識坐標在圖形窗口中Graphics中，我們把屏幕中心海龜?shù)哪肝环Q為原點，過原點畫的一條水平線叫做“x軸”，過原點畫的一條豎直線叫做“y軸”，從原點開始，向上、向右為正，向下、向左為負（引入負號“-”概念）。這樣屏幕上的點都可以用一對數(shù)（坐標）來表示其位置。例如：點A的坐標-100，90，點B的坐標30，200，原點O的坐標0，0。注意：LOGO坐標是用 括起來的一對數(shù)來表示的。每步長表示一個單位。X坐標相同的點，它們在同一條豎直線上；Y坐標相同的點，他們在同一條水平線上。例1：請在LOGO坐標中畫出點A50 30，點B80 0，點C70 20。（坐標程序）TO ADRAW HTBK 3 REPEAT 20FD 6 BK 3 RT 90 FD 5 LT 90 BK 2 REPEAT 4FD 4 BK 2 RT 90 FD 5 LT 90 BK 2BK 1FD 6 PU HOME PD RT 90BK 3 REPEAT 8FD 6 BK 3 RT 90 FD 5 LT 90 BK 2 REPEAT 4FD 4 BK 2 RT 90 FD 5 LT 90 BK 2BK 1FD 6 PU HOME PD RT 180BK 3 REPEAT 20FD 6 BK 3 RT 90 FD 5 LT 90 BK 2 REPEAT 4FD 4 BK 2 RT 90 FD 5 LT 90 BK 2BK 1FD 6 PU HOME PD RT 270BK 3 REPEAT 10FD 6 BK 3 RT 90 FD 5 LT 90 BK 2 REPEAT 4FD 4 BK 2 RT 90 FD 5 LT 90 BK 2BK 1FD 6 MAKE X 50REPEAT 3PU SETXY SE -20 :X+7 PD TT :X/50*10 MAKE X :X+50MAKE X -50REPEAT 3PU SETXY SE -25 :X+7 PD TT :X/50*10 MAKE X :X-50MAKE X 50REPEAT 9PU SETXY SE :X-7 -7 PD TT :X/50*10 MAKE X :X+50MAKE X -50REPEAT 8PU SETXY SE :X-9 -7 PD TT :X/50*10 MAKE X :X-50PU SETXY SE 250 150 PD SETW 3 FD 1 BK 1 TT A50 30PU SETXY SE 400 0 PD SETW 3 FD 1 BK 1 TT B80 0PU SETXY SE 350 -100 PD SETW 3 FD 1 BK 1 TT C70 -20END例2：請在LOGO坐標中畫出點A0 30，點B60 0，點C-60 30。解：例3：請把下圖LOGO坐標系中點A、點B、點C、點D、點E的坐標標出。解：A0 20B30 0C70 -20D20 -30E-70 -20F30 -10二、坐標定位（向）命令SETX 水平移動海龜?shù)街付ǖ狞c格式：海龜沿水平方向移動到X坐標值指定的點上。對海龜?shù)闹赶蚝蚘坐標無影響。如果原海龜?shù)奈恢迷谀肝?，?zhí)行下面命令。SETX 60時畫出海龜從母位水平移至X坐標為60處如果原海龜?shù)奈恢迷谀肝?，?zhí)行下面的命令SETX -60時畫出海龜從母位水平移至X坐標為-60處如果原海龜?shù)奈恢貌辉谀肝唬瑘?zhí)行SETX 60結果情況舉例如下：海龜原位置執(zhí)行后海龜位置海龜移動情況0 2060 20水平右移60100 4060 40水平左移40-100 -3060 -30水平右移16060 14060 140原地不動注意：無論海龜原位置在哪里，都將水平移到X坐標為60處。SETY 豎直移動海龜?shù)街付ǖ狞c格式：SETY Y坐標功能：海龜沿豎直方向移到Y坐標值指定的點上。對海龜?shù)闹赶蚝蚗坐標無影響。如果原海龜?shù)奈恢迷谀肝?，?zhí)行下面命令SETY 60海龜從母位豎直移至Y坐標為60處如果原海龜?shù)奈恢迷谀肝唬瑘?zhí)行下面命令SETY -60海龜從母位豎直移至Y坐標為-60處請想一想：海龜原位置如果不在母位，情況怎樣？SETXY 移動海龜?shù)街付ǖ狞c格式：SETXY X坐標 Y坐標SETXY SE :X :Y功能：海龜移到點X Y的位置上。例：DRAW SETXY 50 40將海龜從母位移動到X坐標50和Y坐標40這一點上。DRAW SETXY SE 50 40作用同上。注意：SETXY SE :X :Y中的:X和:Y可以是常數(shù)也可以是變量,而SETXY X Y中的X Y只能是常數(shù)。執(zhí)行FENCE命令后，用上述命令移動海龜并且超出窗口范圍時屏幕顯示：Attempt to move turtle outside the fence.(企圖將海龜移到圍欄外)海龜保持原狀。SETH 海龜頭轉(zhuǎn)到指定的方向SETHEADING 簡稱（SETH）格式：SETH :D指定海龜方向功能：使海龜轉(zhuǎn)到指定的方向上。LOGO規(guī)定0度方向向上；90度方向向右；180度方向向下；270度方向向左。例：SETH 60海龜頭轉(zhuǎn)到60度的方向例4：利用坐標定位命令作出如下圖形。TO TX CS HT PU SETX -60 PDSETY -60 SETX 0 SETXY SE 80 80SETXY SE -60 0END例5：作個人上底為50，下底為90，高為40的等腰梯形。分析：如果將梯形的A點設置在原點（母位）則梯形的各頂點坐標為：A（0，0）B（90，0）C（70，40）D（20，40）程序如下：TO DYTXDRAW HTSETX 90SETXY 70 40SETX 20SETXY 0 0（也可用HOME命令）END三、坐標測試命令XCOR顯示海龜當前位置的X坐標YCOR顯示海龜當前位置的Y坐標GETXY顯示海龜當前位置的X，Y坐標HEADING顯示海龜當前角度例如：鍵入：CS FD 100 RT 90 FD 60再鍵入：XCOR輸出X的坐標60YCOR輸出Y的坐標100GETXY輸出海龜所在X及Y的坐標值60 100HEADING測出海龜所指方向為90度例6：用測試命令和定位命令畫樓梯TO LDRAW HTREPEAT 5SETY YCOR+20 SETX XCOR+20END練一練：1標出下圖中各點的坐標2根據(jù)所給各點的坐標值，在平面上畫出它們相對的點。A25 45 B170 120 C50 0 D-80 45 E-100 0 F-70 -70 G0 -90 H-110 -1503根據(jù)下圖給的參照點和坐標填空。4填寫下表，寫出由原位置原方向分別SETX、SETY和FD后海龜?shù)淖鴺?。原位置原方向?zhí)行SETX 40后執(zhí)行SETY 40后執(zhí)行FD 40后-20 30010 709040 7010 4050 7030 609030 -60180-30 -601800 40270-40 02705畫出運行結果。（1）TO DDRAWSETY 0-60SETX 0-100SETXY SE 0 0END執(zhí)行 D（2）TO ADRAWFD 110 SETXY -50 -50HOMESETY 110SETXY 150 -50 HOMEEND執(zhí)行 A（3）TO C :B1 :B2REPEAT 2FD :B1 RT 90 FD :B2 RT 90ENDTO FANGHT CS PU SETXY -80 -60 PD C 120 160SETX 15 C 80 35 PU SETXY -40 20PD REPEAT 4C 20 30 RT 90PU SETXY -80 60PD SETXY -60 100SETX 60 SETXY 80 60END執(zhí)行：FANG（4）TO S :X :YIF :X120 STOPSETX :X SETY :YS :X+20 :Y+20END執(zhí)行：S 0 06用坐標定位的方法編程完成下列圖形。 TO A REPEA