.版本 2
.支持庫 iext2
.支持庫 OPenGL
.支持庫 spec
.支持庫 EThread
.程序集 窗口程序集_啟動(dòng)窗口
.程序集變量 人物標(biāo)識, 整數(shù)型
.程序集變量 熱狗標(biāo)識, 整數(shù)型, , "0"
.程序集變量 死亡, 邏輯型
.程序集變量 得分, 整數(shù)型
.子程序 _開始按鈕_被單擊
動(dòng)畫物體2.圖片 ＝ #人物
人物標(biāo)識 ＝ 動(dòng)畫框1.創(chuàng)建物體 (動(dòng)畫物體2, 取鼠標(biāo)水平位置 () － _啟動(dòng)窗口.左邊 － 25, 取鼠標(biāo)垂直位置 () － _啟動(dòng)窗口.頂邊 － 26, 真, )
得分 ＝ 0
顯示光標(biāo) (假)
開始按鈕.可視 ＝ 假
死亡 ＝ 假
開始游戲 ()
.子程序 開始游戲
.局部變量 熱狗, 整數(shù)型
.局部變量 移動(dòng)速度, 整數(shù)型
.局部變量 新增速度, 整數(shù)型
.局部變量 i, 整數(shù)型
動(dòng)畫物體1.圖片 ＝ #熱狗
移動(dòng)速度 ＝ 50
新增速度 ＝ 500
.判斷循環(huán)首 (死亡 ＝ 假)
  熱狗 ＝ 動(dòng)畫框1.創(chuàng)建物體 (動(dòng)畫物體1, 取隨機(jī)數(shù) (24, 368), 38, 真, )
  動(dòng)畫框1.置角度 (熱狗, 180)
  .如果真 (得分 ％ 20 ＝ 0 且 移動(dòng)速度 ＞ 10 且 新增速度 ＞ 200)
    移動(dòng)速度 ＝ 移動(dòng)速度 － 1
    新增速度 ＝ 新增速度 － 20
  .如果真結(jié)束
  動(dòng)畫框1.自動(dòng)前進(jìn) (熱狗, 5, 移動(dòng)速度, , , 真, 1, 真, { 0 }, )
  延遲 (新增速度)
.判斷循環(huán)尾 ()
.子程序 _動(dòng)畫框1_鼠標(biāo)位置被移動(dòng), 邏輯型
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
動(dòng)畫框1.置物體位置 (人物標(biāo)識, 取鼠標(biāo)水平位置 () － _啟動(dòng)窗口.左邊 － 25, 取鼠標(biāo)垂直位置 () － _啟動(dòng)窗口.頂邊 － 26, 真)
.子程序 _動(dòng)畫框1_碰撞到物體
.參數(shù) 碰撞物體標(biāo)識值, 整數(shù)型
.參數(shù) 碰撞前橫坐標(biāo), 整數(shù)型
.參數(shù) 碰撞前縱坐標(biāo), 整數(shù)型
.參數(shù) 被碰撞物體標(biāo)識值, 整數(shù)型
.如果真 (被碰撞物體標(biāo)識值 ＞ 得分 ＋ 1 或 碰撞物體標(biāo)識值 ＞ 得分 ＋ 1)
  得分 ＝ 得分 ＋ 1
  啟動(dòng)線程 (&顯示成功圖, , )
  _啟動(dòng)窗口.標(biāo)題 ＝ “王校長吃熱狗  得分：” ＋ 到文本 (得分)
.如果真結(jié)束
.子程序 顯示成功圖
動(dòng)畫框1.置圖片 (人物標(biāo)識, #成功, )
延遲 (200)
動(dòng)畫框1.置圖片 (人物標(biāo)識, #人物, )
.子程序 __啟動(dòng)窗口_可否被關(guān)閉, 邏輯型
結(jié)束 ()
.子程序 _動(dòng)畫框1_碰撞到邊界, 邏輯型
.參數(shù) 物體標(biāo)識值, 整數(shù)型
.參數(shù) 碰撞前橫坐標(biāo), 整數(shù)型
.參數(shù) 碰撞前縱坐標(biāo), 整數(shù)型
.參數(shù) 邊界類型, 整數(shù)型
.如果真 (物體標(biāo)識值 ≠ 人物標(biāo)識 且 邊界類型 ＝ 8)
  顯示光標(biāo) (真)
  死亡 ＝ 真
  動(dòng)畫框1.銷毀所有物體 ()
  信息框 (“游戲結(jié)束，得分：” ＋ 到文本 (得分), 0, , )
  開始按鈕.可視 ＝ 真
  得分 ＝ 0
  _啟動(dòng)窗口.標(biāo)題 ＝ “王校長吃熱狗”
.如果真結(jié)束