會(huì)計(jì)學(xué)1LOGO語言教材培訓(xùn)完整PPT課件LOGO語言簡(jiǎn)介LOGO語言是一種早期的編程語言，也是一種與自然語言非常接近的編程語言，它通過“繪圖”的方式來學(xué)習(xí)編程，對(duì)初學(xué)者特別是兒童進(jìn)行寓教于樂的教學(xué)方式。

LOGO語言創(chuàng)始于1968年，是美國國家科學(xué)基金會(huì)所資助的一項(xiàng)專案研究，在麻省理工學(xué)院的人工智能研究室完成。第一講第1頁/共97頁LOGO語言簡(jiǎn)介LOGO語言是由美國麻省理工學(xué)院人工智能實(shí)驗(yàn)室于1968年開發(fā)成功的。它的創(chuàng)始人是一位數(shù)學(xué)家，名字叫西蒙·佩伯特（SeymourPapert）。又譯為西蒙·派珀特，或西蒙·佩帕特。第一講第2頁/共97頁什么是LOGOLOGO原意是“文字、符號(hào)”和“思考”、“思想”。還有“標(biāo)記、商標(biāo)”等意思。第一講第3頁/共97頁pclogoforwindows基礎(chǔ)1、軟件的安裝2、界面簡(jiǎn)介了解標(biāo)題欄、菜單欄、工具欄、繪圖窗口、小海龜、命令窗口、提示符（？）、光標(biāo)（｜）、狀態(tài)欄以及常見的工具按鈕。3、了解窗口的各種顯示方式以及切換方法

LOGO語言中，可以用各窗口的最大化和還原命令改變窗口的顯示狀態(tài)，也可以用輸入命令的方法改變窗口的顯示狀態(tài)（窗口界面視圖的切換命令）：FS（fullscreen）全圖狀態(tài)命令，即全圖方式。SS(splitscreen)圖文混合狀態(tài)命令，即圖文方式。TS(textscreen)全文本狀態(tài)命令，即文本方式。第一講第4頁/共97頁pclogoforwindows基礎(chǔ)

全圖狀態(tài)時(shí)，看不到從鍵盤上輸入的任何命令，只能看到海龜畫圖區(qū)域。（但，此時(shí)，仍然可以通過鍵盤輸入并執(zhí)行命令）。這時(shí)輸入SS命令，就可以回到圖文混合狀態(tài)了。

LOGO語言命令可以使用簡(jiǎn)寫，如FORWARD是前進(jìn)命令，可以簡(jiǎn)寫為FD。在小學(xué)教材中，一般使用的都是簡(jiǎn)寫以便于學(xué)生記憶。再如LEFT是左轉(zhuǎn)命令，簡(jiǎn)寫為LT。RIGHT是右轉(zhuǎn)命令，簡(jiǎn)寫為RT。BACK是后退命令，簡(jiǎn)寫為BK。LOGO命令不分大小寫。第一講第5頁/共97頁簡(jiǎn)單的繪圖命令FD(forward)參數(shù)前進(jìn)

BK(back)參數(shù)后退

RT(right)參數(shù)右轉(zhuǎn)

LT(left)參數(shù)左轉(zhuǎn)注意：命令和參數(shù)之間必須用空格分開，執(zhí)行命令時(shí)必須按回車鍵。第一講第6頁/共97頁練一練練習(xí)1：將FD40RT90連續(xù)輸入四次，分別回車，看看畫出了什么？將FD與RT改為BK與LT再操作一次。（連續(xù)輸入4次）第一講第7頁/共97頁退出軟件的方法(1)使用BYE命令。

(2)使用文件菜單中的“退出”命令。

(3)單擊窗口右上角的關(guān)閉按鈕。第一講第8頁/共97頁思考題（P6）1、DRAW命令有什么作用？（DRAW是初始化命令。使系統(tǒng)恢復(fù)到啟動(dòng)狀態(tài)。效果是：清屏后，海龜歸位，設(shè)置的屬性全部初始化，即，海龜回到原點(diǎn)（又稱源點(diǎn)或母位）位置，頭向上，筆粗為1，筆色為黑色。例如：比較一下setw20fd40csfd50和setw20fd40drawfd50）

2、小海龜只會(huì)一步步走路嗎？怎樣讓小海龜飛一段路程再走呢？（PUPD命令）第一講第9頁/共97頁第2課涉及的幾個(gè)命令PU（penup）抬筆命令讓海龜把腳抬起來，移動(dòng)時(shí)不畫線。PD(pendown)落筆命令讓海龜把腳落下，移動(dòng)時(shí)畫出線來。HT（hideturtle）藏龜命令ST(showturtle)顯龜命令CLEAN清圖命令。清除屏幕上的圖形，海龜?shù)臓顟B(tài)不變。即，只清除屏幕上的圖形，不改變海龜?shù)奈恢煤头较颉?海龜不歸位)。CS(clearscreen)清屏。清除屏幕上的圖形，海龜回母位。但，設(shè)置的屬性仍保留。例如：setw20fd40csfd50Draw初始化命令。使系統(tǒng)恢復(fù)到啟動(dòng)狀態(tài)。效果是：清屏（繪圖窗口）后，海龜歸位，設(shè)置的屬性全部初始化，即，海龜回到原點(diǎn)位置，頭向上，筆粗為1，筆色為黑色。Home回家命令。使海龜回到母位。不清屏，海龜回到屏幕中心。（帶線歸位）。例如：fd60rt30fd40home可以利用帶線歸位的功能畫圖，例如：fd60rt90fd30homeCT(cleartext)清文本作用是：清除命令窗口所有文本，“？”提示符回到第一行。第一講第10頁/共97頁思考一下怎么在畫完圖后，讓小海龜不留痕跡回家，并保留屏幕上畫好的圖形？（PUHOME）CLEAN與DRAW命令有什么相同點(diǎn)和不同點(diǎn)？在學(xué)過的命令中，哪些命令后面需要參數(shù)，哪些命令后面不需要參數(shù)？小海龜已經(jīng)能畫出很多好看的圖形了，但顏色單一，你能改變它嗎？第一講第11頁/共97頁小經(jīng)驗(yàn)修改錯(cuò)誤的方法：在命令狀態(tài)下，可以用鍵盤上的四個(gè)光標(biāo)控制鍵來移動(dòng)光標(biāo)。如果發(fā)現(xiàn)命令有錯(cuò)誤，首先將光標(biāo)移到要?jiǎng)h除的字符處，刪除字符，再鍵入正確的字符。如果發(fā)現(xiàn)某個(gè)地方漏打了字符，例如，命令RT90在命令與數(shù)字之間忘記輸入空格了，可將光標(biāo)移到字符“9”前，按一下空格鍵，命令就變成了RT90了。小竅門：使用歷史記錄運(yùn)行執(zhí)行過的命令。在LOGO語言里，若把光標(biāo)鍵移到已經(jīng)執(zhí)行過的命令上，回車，則可再次執(zhí)行命令。例如：輸入FD60RT90回車后，用上述方法再執(zhí)行三次，看畫出了什么圖形。第一講第12頁/共97頁REPEAT重復(fù)命令重復(fù)命令格式：REPEAT重復(fù)次數(shù)[重復(fù)內(nèi)容]P12看一看repeat2[fd40rt90fd80rt90]repeat36[fd10rt10]比較一下：repeat6[fd50rt60]與lt30repeat6[fd50rt60]第二講第13頁/共97頁想一想不用重復(fù)命令怎樣畫正方形和長方形？用重復(fù)命令怎樣畫正方形和長方形？體會(huì)一下重復(fù)命令的好處。怎樣用重復(fù)命令畫正三角形？怎樣畫出頂點(diǎn)朝正上方的正三角形？畫頂點(diǎn)朝正上方的正五邊形呢？答案：lt18repeat5[fd60rt72]在畫上面各正多邊形時(shí)，你怎樣根據(jù)多邊形的內(nèi)角和公式計(jì)算旋轉(zhuǎn)角度？[先根據(jù)(n-2)*180算出內(nèi)角和，再除以n算出內(nèi)角，再用“180－內(nèi)角”算出外角。旋轉(zhuǎn)的角度就是外角的度數(shù)。]第二講第14頁/共97頁用重復(fù)命令畫正多邊形公式

觀察下面的列表，可以發(fā)現(xiàn)，小海龜在畫正多邊形時(shí)，重復(fù)的次數(shù)與轉(zhuǎn)角度數(shù)的乘積總是等于360度。正多邊形重復(fù)次數(shù)一個(gè)內(nèi)角（度數(shù)）轉(zhuǎn)角（度數(shù)）乘積（度數(shù)）正三角形3(3－2)×180÷3=60120120×3=360正方形4(4－2)×180÷4=909090×4=360正五邊形5(5－2)×180÷5=1087272×5=360正六邊形6(6－2)×180÷6=1206060×6=360正八邊形8(8－2)×180÷8=1354545×8=360

從表中可以看出，畫正多邊形時(shí)，轉(zhuǎn)角的度數(shù)是正多邊形的一個(gè)外角的度數(shù)。在畫正多邊形時(shí)只要用360度除以邊數(shù)，就可以得到轉(zhuǎn)角的度數(shù)。畫正多邊形的公式：REPEAT邊數(shù)[FD邊長RT360/邊數(shù)]第二講第15頁/共97頁小經(jīng)驗(yàn)注意：在計(jì)算機(jī)語言中，除號(hào)是/乘號(hào)是*在畫正多邊形時(shí)，邊數(shù)越多，邊長就要越小些。否則畫出的圖形會(huì)出界導(dǎo)致錯(cuò)亂。第二講第16頁/共97頁練一練練習(xí)畫一下正三角形、正方形、正五、六、七、八、九、十邊形。想一想：畫正七邊形時(shí)，轉(zhuǎn)角的度數(shù)怎么表示呢？第二講第17頁/共97頁畫圓

如何用REPEAT命令畫一個(gè)圓呢？（在LOGO語言中，通常采用畫一個(gè)正36邊形來近似畫圓。我們畫圓一般是根據(jù)確定圓心和圓的半徑來畫，如果圓的半徑為r，那么圓的周長就是2πr。這樣得到下面的式子：

36×邊長＝2πr所以，邊長＝2πr÷36＝πr÷18

所以，畫圓的公式為：repeat36[fd半徑*0.174rt10]

有了這個(gè)式子，只要確定了圓的半徑，就可以畫出指定半徑的圓了。例如：畫一個(gè)半徑為10的圓

repeat36[fd3.14*10/18rt360/36]

即repeat36[fd3.14*10/18rt10]或repeat36[fd10*0.174rt10]

在LOGO語言中，圓周率π可以寫成PI，系統(tǒng)默認(rèn)是兩位小數(shù)。所以，上面的語句也可以寫成：

repeat36[fdPI*10/18rt10]

提示：若不指定半徑，我們常常直接使用這樣的命令畫圓：repeat36[fd邊長rt10]如：repeat36[fd10rt10]

也可以使用這樣的兩次旋轉(zhuǎn)，使畫出的圓更平滑：

repeat36[rt5fd10rt5]第二講第18頁/共97頁小知識(shí)repeat命令是可以嵌套的。例如：

repeat4[repeat36[fd10rt10]rt90]

想一想：這個(gè)語句能畫出什么圖形？試一下。然后改變最外層的旋轉(zhuǎn)角度和旋轉(zhuǎn)次數(shù)，再試試。將用重復(fù)命令畫的其它圖形，加上外部的嵌套（重復(fù)次數(shù)自定），看看能畫出什么圖形。例如：

repeat18[repeat5[fd80rt144]rt20]repeat12[repeat6[fd70rt60]rt30]repeat6[repeat6[fd70rt60]rt30]

提示：當(dāng)最外層的旋轉(zhuǎn)次數(shù)與旋轉(zhuǎn)角度的積是360的時(shí)候，正好會(huì)旋轉(zhuǎn)一周。若積小于360呢？第二講第19頁/共97頁重復(fù)命令嵌套練習(xí)

用重復(fù)命令嵌套完成下面的練習(xí)，要求旋轉(zhuǎn)一周：1、用重復(fù)命令畫一個(gè)圓，并旋轉(zhuǎn)18次。2、用重復(fù)命令畫一個(gè)正方形，并旋轉(zhuǎn)6次。3、用重復(fù)命令畫一個(gè)正八邊形，并旋轉(zhuǎn)8次。4、用重復(fù)命令畫一個(gè)五角星，并旋轉(zhuǎn)18次。第二講第20頁/共97頁重復(fù)命令嵌套練習(xí)

用重復(fù)命令嵌套完成下面的練習(xí)，要求旋轉(zhuǎn)一周：1、用重復(fù)命令畫一個(gè)圓，并旋轉(zhuǎn)18次。

repeat18[repeat36[fd10rt10]rt20]

或repeat18[repeat36[rt5fd10rt5]rt20]

或repeat18[repeat36[rt5fd5rt5]lt20]2、用重復(fù)命令畫一個(gè)正方形，并旋轉(zhuǎn)6次。

repeat6[repeat4[fd100lt90]lt60]

或repeat6[repeat4[fd100rt90]rt60]3、用重復(fù)命令畫一個(gè)正八邊形，并旋轉(zhuǎn)8次。

repeat8[repeat8[fd50lt45]lt45]

或repeat8[repeat8[fd50rt45]rt45]4、用重復(fù)命令畫一個(gè)五角星，并旋轉(zhuǎn)18次。

repeat18[repeat5[fd120rt144]rt20]第二講第21頁/共97頁REPEAT命令使用范例setpc2repeat12120]

lt30pubk40rt30][pufd40rt30pdrepeat3[fd40rtsetpc12repeat6[repeat2[fd30rt90fd60rt90]rt60]第二講第22頁/共97頁REPEAT命令使用范例setw5setpc2repeat6[lt45repeat4[repeat9[fd10rt10]repeat9[fd10lt10]rt90]rt105]或setw5setpc2repeat6[lt45repeat4[repeat9[fd5rt10]repeat9[fd5lt10]rt90]rt105]第二講提示：用重復(fù)命令畫弧的公式：REPEAT圓心角度數(shù)/10[FD半徑*0.174RT10]一般可以這樣：REPEAT圓心角度數(shù)/10[FD10RT10]第23頁/共97頁思考REPEAT命令中的中括號(hào)可以缺少一個(gè)嗎？利用重復(fù)命令，怎樣畫出下圖呢？第二講第24頁/共97頁參考答案repeat4[fd60bk60rt90pufd20lt90pd]第二講第25頁/共97頁改變筆色和背景色（P17）改變筆色：可以通過工具欄的按鈕改變筆色。也可以使用命令：setpc顏色代碼（0~15）背景色也可以改變，大家試試用工具欄改變背景色。用命令是：setbg顏色代碼（0~15）從工具欄中，單擊改變顏色按鈕，打開顏色列表?？纯锤黝伾拇a。記一下。第三講第26頁/共97頁顏色代碼表代碼0123456789101112131415顏色黑深藍(lán)綠青深紅紫棕灰白深灰淺藍(lán)淺綠淺青淺紅淺紫黃白第三講第27頁/共97頁填充顏色命令FILLFILL填充顏色命令。使用該命令時(shí)，必須先使小海龜抬筆走進(jìn)要填充顏色的封閉圖形中，然后落筆再執(zhí)行該命令。例如：

setpc12setbg14repeat4[fd100rt90]purt45fd30pdfill第三講第28頁/共97頁小知識(shí)

給帶有邊色線的圖形填充不同的顏色，命令格式為：（FILL圖形線的顏色）注意：一定要有括號(hào)。例如：setpc12（設(shè)筆色為淺紅）repeat4[fd100rt90];畫出一個(gè)邊線色為淺紅色的正方形rt60pufd40pdsetpc14

;設(shè)筆色為淺藍(lán)(fill12);在淺紅邊框的正方形內(nèi)填充淺藍(lán)色第三講第29頁/共97頁想一想下面的第二條語句能畫出什么圖形？若想給畫出的圖填色，橫線上應(yīng)該寫什么語句？drawsetw5repeat36[fd15rt10]rt90pufd30pdsetpc12________________(FILL0)第三講第30頁/共97頁反筆命令（PX）與筆擦命令（PE）反筆命令不太常用，略。請(qǐng)課后自已閱讀P18頁內(nèi)容。PE（PENERASE）筆擦命令。例如fd60pebk60請(qǐng)自由閱讀教材P19－21第三講第31頁/共97頁練習(xí)（P214）先想一想，下面語句能畫出什么圖形？然后畫一下。REPEAT4[REPEAT4[FD50RT90]RT90]畫出上面圖形后，若想擦除所畫的圖形，應(yīng)該輸入什么命令呢？PEREPEAT4[REPEAT4[FD50RT90]RT90]當(dāng)然，也可以先輸入PE，回車后，再把光標(biāo)定位在上面的語句上，再回車。第三講第32頁/共97頁想一想如何使用PE命令畫一條虛線？

可參考下面語句：FD150PUBK20PEBK20PUBK20PEBK20PUBK20PEBK20PUBK20PEBK20注意：執(zhí)行語句后若再想畫線，必須先執(zhí)行落筆命令。

也可參考下面語句：

FD20PUFD20PDFD20PUFD20PDFD20PUFD20PDFD20PUFD20PD第三講第33頁/共97頁設(shè)置筆寬命令

格式：SETWN

即，SETW筆寬值（N是筆頭型號(hào)，也就是筆寬的值。取值范圍是1~999值越大畫出的線越粗。初始化狀態(tài)值為1。例如：SETPC12SETW30FD60

再如：FD2BK2;畫點(diǎn)后海龜歸位

第三講第34頁/共97頁畫點(diǎn)的范例（P24）

setw20setpc12fd2bk2;畫出一個(gè)點(diǎn)purt90fd20lt90pd;改變位置setw10setpc2fd1bk1;畫出另一個(gè)點(diǎn)畫出連續(xù)的點(diǎn)：

SETW20FD2BK2PURT90FD40LT90PDSETW10FD1BK1PURT90FD40LT90PDSETW20SETPC12FD2BK2第三講第35頁/共97頁讀一讀自學(xué)教材P24~25的“練技能”部分。了解各語句的作用。想一想，P25第4題的各圖應(yīng)該如何畫？查詢筆寬命令：WIDTH例如：SETW20WIDTH，則電腦顯示

Result:20第三講第36頁/共97頁畫橢圓和矩形“看一看”(P27)DRAWSETPC12(STAMPOVAL4040“TRUE)PULT90FD350RT90BK130PDSETPC9(STAMPRECT700120“TRUE)第三講120700第37頁/共97頁畫橢圓命令畫空心橢圓格式：STAMPOVAL橫軸半徑縱軸半徑畫實(shí)心橢圓格式：(STAMPOVAL橫軸半徑縱軸半徑“TRUE)

注意：畫實(shí)心橢圓時(shí)，一定要有括號(hào)。兩個(gè)參數(shù)相等時(shí)為正圓。橫軸半徑縱軸半徑第三講第38頁/共97頁畫矩形命令畫空心矩形格式：STAMPRECT長寬畫實(shí)心矩形格式：(STAMPRECT長寬“TRUE)

注意：畫實(shí)心矩形時(shí)，一定要有括號(hào)。兩個(gè)參數(shù)相等時(shí)為正方形。長寬第三講第39頁/共97頁小知識(shí)用上述命令畫橢圓后，小海龜在橢圓的中心。用上述命令畫矩形后，小海龜在矩形的左下角。例如：STAMPOVAL12050STAMPRECT12050第三講第40頁/共97頁練一練（P293、4、5題）

提示：第3題的前兩圖可以用STAMPRECT和STAMPOVAL命令通過修改參數(shù)來實(shí)現(xiàn)。后一圖，可以先畫圓，也可以先畫正方形，畫完一圖后，要注意抬筆改變海龜?shù)奈恢迷俾涔P繪圖。特別要注意畫圓和畫正方形時(shí)，海龜處在所畫圖形中的位置。第三講第41頁/共97頁動(dòng)腦筋畫矩形或橢圓時(shí)，海龜分別處在圖形的什么位置？（答案略）海龜在同一位置畫兩個(gè)實(shí)心圖形時(shí)，要注意什么？

STAMPOVAL和STAMPRECT命令只能畫水平與垂直方向的橢圓和矩形嗎？第三講第42頁/共97頁動(dòng)腦筋畫矩形或橢圓時(shí)，海龜分別處在圖形的什么位置？（答案略）海龜在同一位置畫兩個(gè)實(shí)心圖形時(shí)，要注意什么？（答案：要注意區(qū)別兩個(gè)圖形的顏色。）

STAMPOVAL和STAMPRECT命令只能畫水平與垂直方向的橢圓和矩形嗎？（答案：不管海龜角度如何，都只能畫水平與垂直方向的橢圓和矩形）第三講第43頁/共97頁多龜作圖多龜作圖常用方法：指名法、激活法。退出多龜作圖可以用draw命令。1、指名法。使用呼叫命令：ASK用ASK指名調(diào)用海龜。這種方法不夠靈活，用得較少。格式：ASK[海龜代號(hào)][命令組]例如：ASK1[FD30ST]ASK2[FD60ST]ASK3[RT90FD60ST]SETPC12

可以發(fā)現(xiàn)有一只海龜變紅色了。這是系統(tǒng)初始狀態(tài)時(shí)那只0號(hào)海龜。默認(rèn)狀態(tài)下，除0號(hào)海龜以外的海龜是不顯示的。只有通過ST命令才能讓它們顯示出來。第四講第44頁/共97頁多龜作圖范例：ASK1[FD30ST]ASK2[FD60ST]ASK3[BK30ST]ASK[123][REPEAT3[FD30RT120]]第四講第45頁/共97頁多龜作圖2、激活法。激活法常用TELL—WHO—EACH命令激活并調(diào)用海龜。這是常用的多龜作圖方式。（告訴命令TELL是叫醒海龜?shù)拿?。用who命令可以查看叫醒了幾只。）格式：TELL[海龜代號(hào)]ASK1[FD30ST]ASK2[FD60ST]ASK3[BK30ST]

TELL[0123]RT90FD100上面語句可以調(diào)用0~3號(hào)海龜同時(shí)作圖。第四講第46頁/共97頁多龜作圖也可使用告訴命令TELLALL。這也是叫醒海龜?shù)拿睢Ｓ脀ho命令可以查看叫醒了幾只。）格式：TELLALL海龜代號(hào)1海龜代號(hào)2ASK1[FD30ST]ASK2[FD60ST]ASK3[BK30ST]

TELLALL02RT90FD100上面語句可以調(diào)用0~2號(hào)海龜同時(shí)作圖。第四講第47頁/共97頁溫馨提示

使用ASK呼叫命令和TELL告訴命令，只能調(diào)用16只（0~15）海龜。若要調(diào)用更多的海龜，可以用SETTURTLES命令設(shè)置海龜?shù)臄?shù)量。例如：setturtles300ask260[fd30st]

若沒用SETTURTLES命令設(shè)置海龜?shù)臄?shù)量（1~32767），則類似ask29[fd30st]這樣的語句就會(huì)報(bào)錯(cuò)。第四講第48頁/共97頁練技能（P344）第4題讓五只海龜一起來畫奧林匹克五環(huán)標(biāo)志圖。drawhtask1[setpc9lt90pufd90pd]ask2[setpc12rt90pufd90pd]ask3[setpc14pubk30lt90fd45pd]ask4[setpc2pubk30rt90fd45pd]ask[012345][stampoval3535]第四講第49頁/共97頁練技能（P345）第5題(1)用多只海龜畫出下列圖形參考答案1drawhtpufd50pdfd50ask1[rt24pufd50pdfd50]ask2[rt48pufd50pdfd50]ask3[rt72pufd50pdfd50]ask4[rt96pufd50pdfd50]ask5[rt120pufd50pdfd50]ask6[rt144pufd50pdfd50]ask7[rt168pufd50pdfd50]ask8[rt192pufd50pdfd50]ask9[rt216pufd50pdfd50]ask10[rt240pufd50pdfd50]ask11[rt264pufd50pdfd50]ask12[rt288pufd50pdfd50]ask13[rt312pufd50pdfd50]ask14[rt336pufd50pdfd50]第四講第50頁/共97頁練技能（P345）*第5題(1)用多只海龜畫出下列圖形答案2drawhttellall014each[rt24*whopufd50pdfd50]第四講第51頁/共97頁練技能（P345）第5題(2)用多只海龜畫出下列圖形，并把每個(gè)五角星變成不同的顏色。參考答案1：DRAWFD70REPEAT5[FD20RT144]ASK1[STSETPC1RT45FD70REPEAT5[FD20RT144]ASK2[STSETPC2RT90FD70REPEAT5[FD20RT144]ASK3[STSETPC3RT135FD70REPEAT5[FD20RT144]ASK4[STSETPC4RT180FD70REPEAT5[FD20RT144]ASK5[STSETPC5RT225FD70REPEAT5[FD20RT144]ASK6[STSETPC6RT270FD70REPEAT5[FD20RT144]ASK7[STSETPC7RT315FD70REPEAT5[FD20RT144]第四講第52頁/共97頁練技能（P345）第5題(2)用多只海龜畫出下列圖形，并把每個(gè)五角星變成不同的顏色。*參考答案2

DRAWTELLALL07STEACH[SETH45*WHOSETPCWHOFD80REPEAT5[FD30RT144]]each[命令列表]每只醒著的海龜都執(zhí)行命令列表who;當(dāng)前調(diào)出的海龜號(hào)。例如：tellall07who結(jié)果顯示：result:[01234567]seth參數(shù);設(shè)置海龜頭的方向第四講第53頁/共97頁過程的定義過程就是一系列有序命令的集合。

TO<過程名><過程體>END

過程的第一行稱為過程頭，以TO開頭，后面是過程名，如：SJXWJX，過程頭和過程名間要有空格中間部分是過程體，是我們用來繪圖或解決問題而按照一定次序編排的命令序列，它是整個(gè)過程的核心。過程體可以是一行命令，也可以是多行命令，還可以是其他一些過程名。最后一行是過程尾，用END表示過程的結(jié)束。第五講第54頁/共97頁過程定義范例定義一個(gè)畫三角形的過程TOSJXREPEAT3[FD90RT120]END定義一個(gè)畫五角星的過程TOWJXREPEAT5[FD70RT144]END定義過程后，輸入過程名，回車，即可執(zhí)行過程。第五講第55頁/共97頁過程定義范例2定義一個(gè)畫花的過程TOHUAREPEAT5[REPEAT3[FD50RT120]RT72]END

定義過程后，輸入HUA，回車，即可執(zhí)行過程，畫出花的圖形。第五講第56頁/共97頁過程定義范例3定義畫立體五角星的過程TOLWHTRT18REPEAT5[FD60RT144FD60RT54FD110BK110LT54+72]END

定義過程后，輸入LW，回車，即可執(zhí)行過程，畫出五角星的圖形。請(qǐng)大家分析一下上面畫立體五角星的方法。第五講第57頁/共97頁動(dòng)腦筋（41）1、原始命令可以用作過程名嗎？過程名可以重復(fù)嗎？原始命令不可以用作過程名，例如：

todraw

回車后，電腦會(huì)顯示：DRAWisalreadyinuse.Tryadifferentname.

tocs

回車后，電腦會(huì)顯示：CSisalreadyinuse.Tryadifferentname.

過程名也不可以重復(fù)。即，定義過的過程，若用它的過程名，再次定義另一個(gè)過程，則先定義的過程被替換。2、在一個(gè)過程中，如果命令輸入錯(cuò)了怎么辦？可以輸入EDIT過程名，回車后會(huì)調(diào)出過程編輯器。改正錯(cuò)誤后，按F2退出編輯器即可自動(dòng)保存修改。第五講第58頁/共97頁過程的編輯和修改定義過程后，使用EDIT過程名可調(diào)出編輯器，在編輯器中修改后，按F2即可關(guān)閉并保存修改。若定義了多個(gè)過程，則可以用EDITALL回車后，可以編輯器中編輯所有的過程。例如：TOFREPEAT4[FD90RT90]END

輸入F，回車后可畫出正方形。此時(shí)，輸入EDITF，回車則打開編輯器。在編輯器中添加SETPC12，過程變成：TOFSETPC12REPEAT4[FD90RT90]END然后按F2關(guān)閉編輯器再輸入F，回車后會(huì)發(fā)現(xiàn)，畫出的是紅色的正方形了。說明修改成功。第五講第59頁/共97頁過程的保存在命令窗口或在編輯器中編寫過程后，單擊“文件”菜單中的“保存”（快捷鍵是F6），或使用工具欄的SAVE按鈕，可以把過程保存下來，保存時(shí)的文件名，可以與過程名不同。保存過程以后，可以使用“文件”菜單中的“打開”或“裝載”命令，或使用工具欄上的LOAD按鈕，打開保存的過程文件（*.LGO)，再輸入過程名，回車后即可執(zhí)行過程。第五講第60頁/共97頁過程范例旋轉(zhuǎn)的風(fēng)車

tofcrepeat6[fd70repeat4[fd30rt90]bk70rt60]wait10cleanrt10fcend第五講第61頁/共97頁過程范例編寫一個(gè)畫地板圖案的過程（自己加顏色）TODBHTREPEAT6[REPEAT6[FD30LT60]FD30RT60]END

想一想，上面的語句是如何畫出地板圖形的？你能給地板圖形填上顏色嗎？第五講第62頁/共97頁巧定海龜位置設(shè)置坐標(biāo)命令SETXY[:X:Y]將海龜移到坐標(biāo)[:X:Y]處，海龜?shù)姆较虿蛔?。設(shè)置橫坐標(biāo)命令SETX:X將海龜移到X坐標(biāo)指定位置，Y坐標(biāo)和海龜方向不變。設(shè)置縱坐標(biāo)命令SETY:Y將海龜移到Y(jié)坐標(biāo)指定位置，X坐標(biāo)和海龜方向不變。注意：上面的命令，在移動(dòng)海龜時(shí)，會(huì)在前后位置間連上線。畫點(diǎn)命令DOT[:X:Y]在指定的坐標(biāo)位置畫一個(gè)點(diǎn)，海龜當(dāng)前位置不變。第六講第63頁/共97頁小知識(shí)GETXY顯示海龜當(dāng)前的坐標(biāo)。XCOR輸出海龜橫坐標(biāo)位置。YCOR輸出海龜Y坐標(biāo)位置。DOTCOLOR[:X:Y]返回指定坐標(biāo)點(diǎn)的顏色值。大家在電腦上試一下。第六講第64頁/共97頁多角星和空心星（1）畫非空心的多角星的公式REPEAT角數(shù)[FD步數(shù)RT360*K/角數(shù)]其中1<K<角數(shù)/2，且是與角數(shù)沒有（1以外的）公約數(shù)的正整數(shù)。計(jì)算K的方法舉例：五角星：5÷2＝2.5所以，K的取值是2。六角星：6÷2＝3K的取值范圍是2，但2與角數(shù)6有公約數(shù)，所以，無法取值。七角星：7÷2＝3.5K的取值是2、3。八角星：8÷2＝4K的取值范圍是2、3，但2與角數(shù)8有公約數(shù)，所以，K的取值是3。九角星：9÷2＝4.5K的取值范圍是2、3、4，但3與角數(shù)9有公約數(shù)。所以，K的取值為2、4。十角星：10÷2＝5K的取值范圍是2、3、4，但2、4與角數(shù)10有公約數(shù)，所以，K的取值是3。第六講第65頁/共97頁多角星和空心星（2）畫空心多角星的公式方法一：REPEAT角數(shù)[FD邊長RT720/角數(shù)FD邊長LT360/角數(shù)]方法二：REPEAT角數(shù)[FD邊長RT第一次轉(zhuǎn)角FD邊長LT第一次轉(zhuǎn)角-360/角數(shù)]例如：畫邊長為40、第一次轉(zhuǎn)角為100的空心五角星，方法是：REPEAT5[FD40RT100FD40LT100-72]第六講第66頁/共97頁帶參數(shù)（變量）的過程示例TOZFX:AREPEAT4[FD:ART90]END輸入ZFX20，回車。再輸入ZFX30，回車。再輸入ZFX40，回車……第六講第67頁/共97頁帶參數(shù)（變量）的過程示例二：TOYUAN:A:BSTAMPOVAL:A:BEND輸入YUAN2060，回車。再輸入YUAN8050，回車。再輸入YUAN10080，回車……第六講第68頁/共97頁想一想畫正多邊形的公式：REPEAT邊數(shù)[FD邊長RT360/邊數(shù)]

你能定義一個(gè)帶參數(shù)的過程來畫任意邊長和邊數(shù)的正多邊形嗎？TODBX:N:BREPEAT:N[FD:BRT360/:N]END輸入DBX690，回車后即可畫出邊長為90的六邊形。輸入DBX8100，回車后即可畫出邊長為100的八邊形。第六講第69頁/共97頁畫任意多角星（請(qǐng)參見本PPT68頁）TODJX:N:BC:KREPEAT:N[FD:BCRT360*:K/:N]END其中，:N表示多角星的角數(shù)。:BC表示多角星的線長。:K表示倍數(shù)。倍數(shù)K的確定方法，參見以前內(nèi)容。例如畫線長為70的八角星，輸入DJX8703，再回車即可。第六講第70頁/共97頁畫任意空心多角星（請(qǐng)參見本PPT69頁）TOKXX:N:BCREPEAT:N[FD:BCRT720/:NFD:BCLT360/:N]END其中，:N表示角數(shù)。:BC表示線長。例如畫線長為50的空心九角星，輸入KXX950，再回車即可。第六講第71頁/共97頁畫頂角可變的任意空心多角星（P54）

（請(qǐng)參見本PPT69頁）TOKXX:N:BC:JREPEAT:N[FD:BCRT:JFD:BCLT:J-360/:N]END其中，:N表示角數(shù)。:BC表示線長。:J表示第一次轉(zhuǎn)角。例如畫線長為40、第一次轉(zhuǎn)角為100的的空心五角星，輸入KXX540100，再回車即可。第六講第72頁/共97頁一個(gè)畫小海星的過程TOHX:B:CFD:BRT:CHX:B:C+10HTEND第六講第73頁/共97頁過程的遞歸調(diào)用

一個(gè)程序中可以包括多個(gè)過程，當(dāng)一個(gè)過程中出現(xiàn)另一個(gè)過程的過程名時(shí)，就表示要調(diào)用那個(gè)過程，這種情形稱之為過程調(diào)用。示例：

TOLX:AFD:ART120LX:A+10END

這里的參數(shù):A表示第一次前進(jìn)的步數(shù)。執(zhí)行LX10，會(huì)發(fā)現(xiàn)出現(xiàn)對(duì)話框報(bào)錯(cuò)。這是由于循環(huán)調(diào)用，成了死循環(huán)，無法停止而造成內(nèi)存緩沖區(qū)已滿的錯(cuò)誤。我們可以加一條控制過程停止的語句，避免死循環(huán)。如下頁：第七講第74頁/共97頁過程的遞歸調(diào)用TOS:AIF:A>300THENSTOPFD:ART120S:A+10ENDIF:A>300THENSTOP意思是，當(dāng)參數(shù)值增加到300以上時(shí)，就停止過程的運(yùn)行。第七講第75頁/共97頁練技能（P59）

畫正N邊形的過程：TOZHDBX:N:A;N是邊數(shù)，A是正多邊形的邊長REPEAT:N[FD:ART360/:N]END畫正多邊形螺旋線的過程：TODBLX:A:N

;N是邊數(shù)，A是起始多邊形的邊長IF:A>150THENSTOPFD:ART360/:N

;畫一條邊，然后轉(zhuǎn)到畫下一條邊的方向DBLX:A+3:N

;調(diào)用自身，邊長增加步END

分別輸入DBLX303、DBLX304、DBLX305再回車試試。第七講第76頁/共97頁練技能（p60）TOZFXREPEAT4[FD40RT90]ENDTOLXREPEAT2[FD40RT60FD40RT120]ENDTOSJREPEAT3[FD40RT120]ENDTOXGCSPUFD80RT90BK60PDZFXRT90LXLT90FD40RT30LXRT60FD40RT30SJFD40RT180SJRT60ZFXFD40LXFD40RT60FD9LT120SJEND執(zhí)行XG，可畫出小狗。

注意：若在編輯器或命令窗口中同時(shí)定義了多個(gè)過程，保存過程文件時(shí)，會(huì)將定義的多個(gè)過程同時(shí)保存到一個(gè)文件中。裝載保存的過程文件后，各過程會(huì)全部被調(diào)入內(nèi)存中。大家可以把本頁定義的各過程一起復(fù)制到編輯器中，再保存一下，然后裝載到LOGO中試試。若各個(gè)過程要單獨(dú)保存，則要在編輯器中一個(gè)一個(gè)的分別定義，再一個(gè)一個(gè)地分別保存下來。裝載時(shí)，要一個(gè)一個(gè)地分別裝載到內(nèi)存中，才可以相互調(diào)用。第七講第77頁/共97頁練技能（參考P61）tohuarepeat4[repeat3[fd30rt120]rt90]endtohuahuansetpc12repeat8[huart45pufd70pd]end定義過程后，輸入huahuan，再回車，即可畫出一個(gè)花環(huán)。第七講第78頁/共97頁用遞歸的方法畫三角形圓環(huán)setpc2repeat12[pufd40rt30pdrepeat3[fd40rt120]

lt30pubk40rt30]

上面的語句是我們以前畫右圖時(shí)使用的。現(xiàn)在，若用遞歸調(diào)用的方法，應(yīng)該怎樣寫呢？tosjsetpc2repeat3[fd40rt120]endtohuanrepeat12[pufd40rt30pdsjlt30pubk40rt30]end第七講第79頁/共97頁小知識(shí)1、調(diào)用磁盤上保存的過程，除了用“文件”菜單中的“裝載”外，還有以下方法：（1）按F5鍵（2）單擊工具欄上的Load按鈕2、停止按鈕在LOGO系統(tǒng)中有一個(gè)“交通崗”，當(dāng)你進(jìn)行遞歸調(diào)用時(shí)，如果想停止、暫?；蚶^續(xù)運(yùn)行該過程，可以單擊工具欄中的三個(gè)相應(yīng)的“紅綠燈”按鈕。（LOGO的“調(diào)試”菜單中也有相應(yīng)的命令）例如：這是以前我們做過的風(fēng)車旋轉(zhuǎn)的一個(gè)范例：tofcrepeat6[fd70repeat4[fd30rt90]bk70rt60]wait10cleanrt10fcend

大家運(yùn)行一下，并使用工具欄中的“紅綠燈”按鈕控制一下試試。第七講第80頁/共97頁條件判斷語句——IF語句

還記得以前我們畫過的風(fēng)車吧？那個(gè)旋轉(zhuǎn)的風(fēng)車，運(yùn)行時(shí)，需要單擊停止按鈕停止它的運(yùn)行。原因是，在那個(gè)過程中，使用了循環(huán)調(diào)用，產(chǎn)生了死循環(huán)。下面的范例，使用了IF語句，避免了死循環(huán)。TOFCREPEAT6[FD70REPEAT4[FD30RT90]BK70RT60]WAIT10CLEANRT10MAKE"N:N+1IF:N=60THENSTOPELSEFCEND定義這個(gè)過程后，在命令窗口輸入make“n0，回車后，再輸入fc，再回車。會(huì)發(fā)現(xiàn)風(fēng)車旋轉(zhuǎn)一會(huì)兒就自動(dòng)停止了。因?yàn)?，每旋轉(zhuǎn)一個(gè)新角度后，N的值都會(huì)加1，旋轉(zhuǎn)60次后，N的值變?yōu)?0時(shí)，過程就會(huì)自動(dòng)停止了。此時(shí)，若在命令窗口內(nèi)輸入pr:n，回車后會(huì)看到此時(shí)變量N的值為60.第七講第81頁/共97頁條件判斷語句——IF語句下面我們講解一下IF語句IF語句有兩種格式：格式1：IF條件THEN[命令]

（THEN可以省略不寫）當(dāng)符合條件時(shí)，執(zhí)行THEN后面的命令，否則就不執(zhí)行THEN后面的命令，直接執(zhí)行其它命令。注意：命令可以是一個(gè)或多個(gè)命令，命令間以空格分開，最后以回車結(jié)束。不屬于THEN中的命令，一定要寫到下一行。其中的“條件”，可以是等式或者不等式及表達(dá)式，如：S=40、R>35、R≤10、(OR:N<8,:N>20)等。請(qǐng)大家自行閱讀一下教材P63頁的兩個(gè)范例，對(duì)IF語句的這種格式加以理解。第八講第82頁/共97頁條件判斷語句——IF語句格式2：IF條件THEN[命令1]ELSE[命令2]當(dāng)條件表達(dá)式符合條件時(shí)，執(zhí)行THEN后面的命令1，跳過命令2，再接著執(zhí)行其它命令；否則，跳過命令1，執(zhí)行ELSE后面的命令2，再接著執(zhí)行其它命令。例如畫風(fēng)車的范例：TOFCREPEAT6[FD70REPEAT4[FD30RT90]BK70RT60]WAIT10CLEANRT10MAKE"N:N+1IF:N=60THENSTOPELSEFCEND

注意：在遞歸調(diào)用時(shí)，若過程自己調(diào)用自己，一定要設(shè)計(jì)至少一個(gè)出口，來結(jié)束過程，否則會(huì)造成死循環(huán)，過程不停地運(yùn)行，甚至導(dǎo)致死機(jī)等來重后果。語句中的STOP，是停止過程運(yùn)行的命令。它只能使用于過程當(dāng)中。第八講第83頁/共97頁IF語句編程范例（P64）

根據(jù)提示輸入一個(gè)1~360的數(shù)，表示一個(gè)角度，由電腦判斷這個(gè)角是不是銳角，在命令窗口輸出判斷結(jié)果，并在繪圖窗口中畫出這個(gè)角。tojd:ncsrt90fd100bk100;畫出一條邊lt:n;左轉(zhuǎn)輸入的角度fd100ht;畫出另一條邊后隱藏海龜endtopdjdpr[請(qǐng)輸入角度：];讓屏幕顯示"請(qǐng)輸入角度："make"rread;創(chuàng)建一個(gè)變量r，并等待輸入jd:r;用輸入的角度值r畫角，畫出一個(gè)r度的角if:r<90thenpr[您輸入的角度是銳角]elsepr[您輸入的角度不是銳角]end第八講第84頁/共97頁練技能（P65）

試調(diào)用下面的兩個(gè)過程，編寫一個(gè)名為XZ的過程，完成以下功能：命令窗口顯示提示：“請(qǐng)選擇：1同心圓2兩個(gè)正方形”，如果輸入1，調(diào)用YUAN畫出同心圓；如果輸入2，調(diào)用ZFX畫出兩個(gè)正方形；如果輸入其他數(shù)字，過程結(jié)束，無任何提示。TOYUANSETPC14(STAMPOVAL6060"TRUE)SETPC12(STAMPOVAL3030"TRUE)HTENDTOZFXSETPC13(STAMPRECT7878"TRUE)SETPC10(STAMPRECT5050"TRUE)HTENDTOXZDRAWPR[請(qǐng)選擇：1同心圓2兩個(gè)正方形]make"hreadif:h=1thenyuanif:h=2thenzfxend第八講第85頁/共97頁循環(huán)語句FOR循環(huán)控制命令FOR語句有兩種格式格式1：FOR“變量初值終值[命令串]功能：變量的值由初值開始，每次加1并將后面的命令串執(zhí)行一遍，直到超過終值為止。例如：

DRAWSETPC12SETW4FOR"I36[REPEAT3[FD:I*20RT120]]第九講第86頁/共97頁循環(huán)語句FOR格式2：(FOR“變量初值終值[命令串]步長）功能：變量的值由初值開始，每次增長一個(gè)步長，并將后面的命令串執(zhí)行一遍，直到超過終值為止。例如：(FOR"I17[PR:I]2)輸出結(jié)果為：1357(FOR"I17[PR:I]1)輸出結(jié)果為1234567(FOR"I101[PR:I]－3)輸出結(jié)果為10741(FOR"I101[PR:I]－4)輸出結(jié)果為1062注意：引號(hào)與變量名之間不能有空格。格式2中，步長若為1時(shí)，可以省略步長值。因此，格式1與格式2實(shí)際上是一樣的，相當(dāng)于格式2省略了步長。第九講第87頁/共97頁FOR語句應(yīng)用范例（P69）用FOR語句累乘求積編寫過程求1×2×3×4×…×30和值。思路分析：從1開始累乘求積時(shí)，要用一個(gè)變量來儲(chǔ)存所求和積，并將該變量的初值設(shè)為1。

FOR循環(huán)中變量每次加1，將其與存積變量S相乘，作為變量S的新值繼續(xù)保存。這樣，不斷循環(huán)，使S的值最終為1到30的積。過程如下：toshmake"s1;創(chuàng)建一個(gè)變量S，并賦值為1for"i130[make"s:s*:i];將變量值1