(9) 將決策圖標拖動到“背景”圖標的下方，將它命名為“求和”。

(10) 雙擊決策圖標，打開決策圖標的屬性設置對話框。

(11) 打開 repeat 下拉列表框，選擇 fixed number of times 。

(12) 在 repeat 下方的文本框內輸入 i =10 。

(13) 打開 branch 下拉列表框，選擇 sequentially 。

(14) 單擊 ok 按鈕，關閉打開的屬性設置對話框。

(15) 將群組圖標拖動到決策圖標的右側，并命名為“累加”。

(16) 雙擊“累加”圖標的標識符，打開決策分支屬性設置對話框。

(17) 在 erase contents 下拉列表框選擇 before next selection 。

(18) 單擊 ok 按鈕，關閉打開的屬性設置對話框。

(19) 雙擊“累加”群組圖標，打開二級流程圖窗口。

(20) 將計算圖標拖動到流程線上，并命名為“計算”。

(21) 雙擊“計算”圖標，打開編輯窗口。

(22) 在編輯窗口內輸入 s : =s+1 及 i : =i+1 。

(23) 將顯示圖標拖動到“計算”圖標的下方，將它命名為“當前結果”。

(24) 雙擊“當前結果”圖標，打開演示窗口。

(25) 在演示窗口內輸入“從 1 累加到 {i-1} 的結果等于 {t} ”。

(26) 使用宋體、綠色及 12 格式化輸入的文本 ( 如圖 11-11 所示 ) 。

(27) 將等待圖標拖動到“當前結果”的下方。

(28) 雙擊打開等待圖標的屬性設置對話框，將等待時間確定為 1 秒。

(29) 關閉等待圖標的屬性設置對話框之后，得到如圖 11-12 所示的二級流程圖。

圖 11-11 格式化輸入的文本 　　　圖 11-12 “累加”圖標的流程圖

(30) 將交互圖標拖動到“求和”決策圖標的下方，并命名為“退出”。

(31) 將計算圖標拖動到“退出”圖標的右側，打開 response type 對話框。

(32) 選中 button 單選按鈕之后，單擊 ok 按鈕。

(33) 將計算圖標命名為 quit 。

(34) 雙擊 quit 圖標，打開編輯窗口。

(35) 在編輯窗口內輸入 quit() 之后關閉窗口。

(36) 運行課件文件時，雙擊 quit 圖標的標識符，打開按鈕響應的屬性設置對話框。

(37) 選擇演示窗口的按鈕之后，將它拖動到適當的位置。

(38) 單擊 ok 按鈕之后，得到如圖 11-13 所示的課件流程圖。

(39) 運行、測試并保存課件文件。

播放課件之后，每累加一次，其結果都將顯示在屏幕上 ( 如圖 11-14 所示 ) 。由于將決策分支的擦除屬性設置為 don't erase ，這樣即使退出決策結構，顯示的累加結果也不會被擦除。在退出決策結構之后，通過交互圖標及計算圖標，給演示窗口內添加了 quit 按鈕，只要單擊該按鈕時，都能關閉打開的演示窗口。

圖 11-13 課件流程圖 　　　　　　圖 11-14 實時在顯示累加結果

注釋：

在決策圖標的屬性對話框內，將 repeat 設置為 untiltrue 及 i=101( 如圖 11-15 所示 ) 之后， 同樣能夠從 1 一直加到 100 ，當 i 達到 101 時，由于循環條件變為真，因此自動退出決策結 構。

圖 11-15 調整決策屬性

下面是制作試題課件實例。為了制作試題課件，可準備一個題庫，然后通過決策圖標，將試題隨機地顯示在屏幕上。在給出的一組 ( 一般為 4 個 ) 答案中進行選擇，無論對錯都進行下一道試題的選擇。最后，將得分顯示在演示窗口內。

制作試題課件

(1) 單擊工具欄的 new 按鈕，創建新的課件。

(2) 將計算圖標拖動到流程線上，并命名為“初始化”。

(3) 雙擊“初始化”圖標，打開計算圖標的編輯窗口。

(4) 在編輯窗口內輸入“ resizewindow (320 ， 200) ”及“ x : =0 ”，完成對窗口大小及變量 x 的初始化。

(5) 關閉編輯窗口時，打開 new variables 對話框。

(6) 單擊 ok 按鈕。

(7) 將顯示圖標拖動到“初始化”圖標的下方，命名為“背景”。

(8) 雙擊“背景”圖標，打開演示窗口。

(9) 在演示窗口內導入背景圖片。

(10) 將決策圖標拖動到“背景”圖標的下方，并命名為“試題”。

(11) 雙擊決策圖標，打開屬性設置對話框。

[1] [2] 下一頁