.版本 2
.DLL命令 寫(xiě)配置文件, 整數(shù)型, , "WritePrivateProfileStringA", , 如果配置文件不存在則將被創(chuàng)建
  .參數(shù) 小節(jié)名, 文本型, , 就是用中括號(hào)括起來(lái)的內(nèi)容
  .參數(shù) 項(xiàng)目名, 文本型, , 就是等號(hào)前邊的內(nèi)容
  .參數(shù) 項(xiàng)目值, 文本型, , 就是等號(hào)后面的內(nèi)容
  .參數(shù) 文件名, 文本型, , 就是你要寫(xiě)入的那個(gè)文件
.DLL命令 讀配置整數(shù), 整數(shù)型, , "GetPrivateProfileIntA"
  .參數(shù) 小節(jié)名, 文本型
  .參數(shù) 項(xiàng)目名, 文本型
  .參數(shù) 默認(rèn)值, 整數(shù)型, , 如果找不到對(duì)應(yīng)的項(xiàng)目則返回該值
  .參數(shù) 文件名, 文本型
.DLL命令 運(yùn)行文件, 整數(shù)型, "shell32.dll", "ShellExecuteA"
  .參數(shù) hwnd, 整數(shù)型
  .參數(shù) lpOperation, 文本型, , "open","print","explore" 
  .參數(shù) lpFile, 文本型
  .參數(shù) pParameters, 文本型
  .參數(shù) lpDirectory, 文本型
  .參數(shù) nShowCmd, 整數(shù)型, , 9
.DLL命令 讀配置文本, 整數(shù)型, , "GetPrivateProfileStringA", , 備注：該函數(shù)返回的值是被讀文本的字符個(gè)數(shù)，實(shí)際上該文本被存放在參數(shù)“緩沖容器”里面，利用“取文本左邊”命令可以得到需要的文本。
  .參數(shù) 小節(jié)名, 文本型
  .參數(shù) 項(xiàng)目名, 文本型
  .參數(shù) 默認(rèn)值, 文本型, , 可以為“”
  .參數(shù) 緩沖容器, 文本型, , 一般將容器的大小設(shè)定為255
  .參數(shù) 緩沖容積, 整數(shù)型, , 應(yīng)與緩沖容器的大小相等255
  .參數(shù) 文件名, 文本型

.版本 2
.常量 游戲版本號(hào), "“推箱子2.2”"
.常量 數(shù)據(jù)庫(kù)名, "“E-BOX”"
.常量 方案類(lèi)型, "“方案類(lèi)型”"
.常量 方案名稱(chēng), "“方案名稱(chēng)”"
.常量 數(shù)據(jù)1, "“數(shù)據(jù)1”"
.常量 數(shù)據(jù)2, "“數(shù)據(jù)2”"
.常量 數(shù)據(jù)3, "“數(shù)據(jù)3”"
.常量 數(shù)據(jù)4, "“數(shù)據(jù)4”"
.常量 數(shù)據(jù)5, "“數(shù)據(jù)5”"
.常量 數(shù)據(jù)6, "“數(shù)據(jù)6”"
.常量 數(shù)據(jù)7, "“數(shù)據(jù)7”"
.常量 數(shù)據(jù)8, "“數(shù)據(jù)8”"
.常量 場(chǎng)景方案, "“場(chǎng)景方案”"
.常量 小人方案, "“小人方案”"
.常量 音樂(lè)方案, "“音樂(lè)方案”"
.常量 游戲地圖, "“游戲地圖”"
.常量 默認(rèn)方案, "“默認(rèn)方案”"

.版本 2
.全局變量 保存標(biāo)志, 整數(shù)型
.全局變量 背景數(shù)組, 整數(shù)型, , "14,16", 背景數(shù)組
.全局變量 總圖片號(hào)組, 整數(shù)型, , "256", 用來(lái)保存游戲中用到的圖片的圖片號(hào)
.全局變量 撤消數(shù)組, 撤消類(lèi)型, , "0", 用來(lái)實(shí)現(xiàn)多次撤消操作
.全局變量 正在錄像中, 邏輯型
.全局變量 錄像播放中, 邏輯型
.全局變量 錄像數(shù)組, 整數(shù)型, , "0"
.全局變量 錄像地圖數(shù)據(jù), 字節(jié)集
.全局變量 臨時(shí)地圖數(shù)據(jù), 字節(jié)集
.全局變量 第一次畫(huà), 邏輯型
.全局變量 選擇關(guān)卡, 整數(shù)型
.全局變量 移動(dòng)音樂(lè), 字節(jié)集
.全局變量 結(jié)束音樂(lè), 字節(jié)集
.全局變量 推箱音樂(lè), 字節(jié)集
.全局變量 重來(lái)音樂(lè), 字節(jié)集
.全局變量 禁止音樂(lè), 字節(jié)集
.全局變量 點(diǎn)擊音樂(lè), 字節(jié)集
.全局變量 撤消音樂(lè), 字節(jié)集
.全局變量 背景音樂(lè), 字節(jié)集
.全局變量 小人方案名, 文本型
.全局變量 場(chǎng)景方案名, 文本型
.全局變量 音樂(lè)方案名, 文本型
.全局變量 方案被改變, 邏輯型

.版本 2
.數(shù)據(jù)類(lèi)型 撤消類(lèi)型
  .成員 x, 整數(shù)型
  .成員 y, 整數(shù)型
  .成員 ifmove, 邏輯型
.數(shù)據(jù)類(lèi)型 位置類(lèi)型
  .成員 x, 整數(shù)型
  .成員 y, 整數(shù)型
.數(shù)據(jù)類(lèi)型 數(shù)據(jù)類(lèi)型2
  .成員 步數(shù), 整數(shù)型
  .成員 位置, 位置類(lèi)型
  .成員 方向, 整數(shù)型
  .成員 上一步, 位置類(lèi)型

.版本 2
.程序集 圖形處理程序集
.程序集變量 循環(huán)變量1, 整數(shù)型
.程序集變量 循環(huán)變量2, 整數(shù)型
.子程序 載入圖片號(hào), 邏輯型, , 返回真則圖片全部載入成功
.參數(shù) 類(lèi)型, 文本型
.參數(shù) 方案, 文本型
.局部變量 畫(huà)片數(shù), 整數(shù)型
重定義數(shù)組 (總圖片號(hào)組, 真, 256)
.判斷開(kāi)始 (類(lèi)型 ＝ #場(chǎng)景方案)
  .如果 (場(chǎng)景方案名 ＝ “”)
    場(chǎng)景方案名 ＝ #默認(rèn)方案
    總圖片號(hào)組 [1] ＝ 載入圖片 (#背景圖)
    總圖片號(hào)組 [2] ＝ 載入圖片 (#墻圖)
    總圖片號(hào)組 [3] ＝ 載入圖片 (#地板圖)
    總圖片號(hào)組 [4] ＝ 載入圖片 (#黃箱子圖)
    總圖片號(hào)組 [5] ＝ 載入圖片 (#箱子位置圖)
    總圖片號(hào)組 [8] ＝ 載入圖片 (#紅箱子圖)
  .否則
    跳到 (1)
    .如果 (查找 (讀 (#方案類(lèi)型) ＝ #場(chǎng)景方案 且 讀 (#方案名稱(chēng)) ＝ 場(chǎng)景方案名) ＝ 真)
      總圖片號(hào)組 [1] ＝ 載入圖片 (讀 (#數(shù)據(jù)1))
      總圖片號(hào)組 [2] ＝ 載入圖片 (讀 (#數(shù)據(jù)2))
      總圖片號(hào)組 [3] ＝ 載入圖片 (讀 (#數(shù)據(jù)3))
      總圖片號(hào)組 [4] ＝ 載入圖片 (讀 (#數(shù)據(jù)4))
      總圖片號(hào)組 [5] ＝ 載入圖片 (讀 (#數(shù)據(jù)5))
      總圖片號(hào)組 [8] ＝ 載入圖片 (讀 (#數(shù)據(jù)6))
    .否則
      總圖片號(hào)組 [1] ＝ 載入圖片 (#背景圖)
      總圖片號(hào)組 [2] ＝ 載入圖片 (#墻圖)
      總圖片號(hào)組 [3] ＝ 載入圖片 (#地板圖)
      總圖片號(hào)組 [4] ＝ 載入圖片 (#黃箱子圖)
      總圖片號(hào)組 [5] ＝ 載入圖片 (#箱子位置圖)
      總圖片號(hào)組 [8] ＝ 載入圖片 (#紅箱子圖)
    .如果結(jié)束
  .如果結(jié)束
  .如果真 (總圖片號(hào)組 [1] ＝ 0 或 總圖片號(hào)組 [2] ＝ 0 或 總圖片號(hào)組 [3] ＝ 0 或 總圖片號(hào)組 [4] ＝ 0 或 總圖片號(hào)組 [5] ＝ 0 或 總圖片號(hào)組 [8] ＝ 0)
    返回 (假)
  .如果真結(jié)束
  返回 (真)
.判斷 (類(lèi)型 ＝ #小人方案)
  .如果 (小人方案名 ＝ “”)
    小人方案名 ＝ #默認(rèn)方案
    總圖片號(hào)組 [52] ＝ 載入圖片 (#上1)
    總圖片號(hào)組 [53] ＝ 載入圖片 (#上2)
    總圖片號(hào)組 [54] ＝ 載入圖片 (#左1)
    總圖片號(hào)組 [55] ＝ 載入圖片 (#左2)
    總圖片號(hào)組 [56] ＝ 載入圖片 (#右1)
    總圖片號(hào)組 [57] ＝ 載入圖片 (#右2)
    總圖片號(hào)組 [58] ＝ 載入圖片 (#下1)
    總圖片號(hào)組 [59] ＝ 載入圖片 (#下2)
  .否則
    跳到 (1)
    .如果 (查找 (讀 (#方案類(lèi)型) ＝ #小人方案 且 讀 (#方案名稱(chēng)) ＝ 小人方案名) ＝ 真)
      總圖片號(hào)組 [52] ＝ 載入圖片 (讀 (#數(shù)據(jù)1))
      總圖片號(hào)組 [53] ＝ 載入圖片 (讀 (#數(shù)據(jù)2))
      總圖片號(hào)組 [54] ＝ 載入圖片 (讀 (#數(shù)據(jù)3))
      總圖片號(hào)組 [55] ＝ 載入圖片 (讀 (#數(shù)據(jù)4))
      總圖片號(hào)組 [56] ＝ 載入圖片 (讀 (#數(shù)據(jù)5))
      總圖片號(hào)組 [57] ＝ 載入圖片 (讀 (#數(shù)據(jù)6))
      總圖片號(hào)組 [58] ＝ 載入圖片 (讀 (#數(shù)據(jù)7))
      總圖片號(hào)組 [59] ＝ 載入圖片 (讀 (#數(shù)據(jù)8))
    .否則
      總圖片號(hào)組 [52] ＝ 載入圖片 (#上1)
      總圖片號(hào)組 [53] ＝ 載入圖片 (#上2)
      總圖片號(hào)組 [54] ＝ 載入圖片 (#左1)
      總圖片號(hào)組 [55] ＝ 載入圖片 (#左2)
      總圖片號(hào)組 [56] ＝ 載入圖片 (#右1)
      總圖片號(hào)組 [57] ＝ 載入圖片 (#右2)
      總圖片號(hào)組 [58] ＝ 載入圖片 (#下1)
      總圖片號(hào)組 [59] ＝ 載入圖片 (#下2)
    .如果結(jié)束
  .如果結(jié)束
  .如果真 (總圖片號(hào)組 [52] ＝ 0 或 總圖片號(hào)組 [53] ＝ 0 或 總圖片號(hào)組 [54] ＝ 0 或 總圖片號(hào)組 [55] ＝ 0 或 總圖片號(hào)組 [56] ＝ 0 或 總圖片號(hào)組 [57] ＝ 0 或 總圖片號(hào)組 [58] ＝ 0 或 總圖片號(hào)組 [59] ＝ 0)
    返回 (假)
  .如果真結(jié)束
  總圖片號(hào)組 [62] ＝ 總圖片號(hào)組 [52]
  總圖片號(hào)組 [63] ＝ 總圖片號(hào)組 [53]
  總圖片號(hào)組 [64] ＝ 總圖片號(hào)組 [54]
  總圖片號(hào)組 [65] ＝ 總圖片號(hào)組 [55]
  總圖片號(hào)組 [66] ＝ 總圖片號(hào)組 [56]
  總圖片號(hào)組 [67] ＝ 總圖片號(hào)組 [57]
  總圖片號(hào)組 [68] ＝ 總圖片號(hào)組 [58]
  總圖片號(hào)組 [69] ＝ 總圖片號(hào)組 [59]
  返回 (真)
.默認(rèn)
  返回 (假)
.判斷結(jié)束
返回 (真)
畫(huà)片數(shù) ＝ 0
.計(jì)次循環(huán)首 (256, 循環(huán)變量1)
  .如果真 (總圖片號(hào)組 [循環(huán)變量1] ＞ 0)
    畫(huà)片數(shù) ＝ 畫(huà)片數(shù) ＋ 1
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果 (畫(huà)片數(shù) ≠ 14 ＋ 8)
  返回 (假)
.否則
  返回 (真)
.如果結(jié)束
.子程序 載入音樂(lè), 邏輯型
.如果 (音樂(lè)方案名 ＝ “”)
  音樂(lè)方案名 ＝ #默認(rèn)方案
  移動(dòng)音樂(lè) ＝ #移動(dòng)音樂(lè)
  結(jié)束音樂(lè) ＝ #結(jié)束音樂(lè)
  推箱音樂(lè) ＝ #推箱音樂(lè)
  重來(lái)音樂(lè) ＝ #重來(lái)音樂(lè)
  禁止音樂(lè) ＝ #禁止音樂(lè)
  點(diǎn)擊音樂(lè) ＝ #點(diǎn)擊音樂(lè)
  撤消音樂(lè) ＝ #撤消音樂(lè)
  背景音樂(lè) ＝ #背景音樂(lè)
.否則
  跳到 (1)
  .如果 (查找 (讀 (#方案類(lèi)型) ＝ #音樂(lè)方案 且 讀 (#方案名稱(chēng)) ＝ 音樂(lè)方案名) ＝ 真)
    移動(dòng)音樂(lè) ＝ 讀 (#數(shù)據(jù)1)
    結(jié)束音樂(lè) ＝ 讀 (#數(shù)據(jù)2)
    推箱音樂(lè) ＝ 讀 (#數(shù)據(jù)3)
    重來(lái)音樂(lè) ＝ 讀 (#數(shù)據(jù)4)
    禁止音樂(lè) ＝ 讀 (#數(shù)據(jù)5)
    點(diǎn)擊音樂(lè) ＝ 讀 (#數(shù)據(jù)6)
    撤消音樂(lè) ＝ 讀 (#數(shù)據(jù)7)
    背景音樂(lè) ＝ 讀 (#數(shù)據(jù)8)
  .否則
    移動(dòng)音樂(lè) ＝ #移動(dòng)音樂(lè)
    結(jié)束音樂(lè) ＝ #結(jié)束音樂(lè)
    推箱音樂(lè) ＝ #推箱音樂(lè)
    重來(lái)音樂(lè) ＝ #重來(lái)音樂(lè)
    禁止音樂(lè) ＝ #禁止音樂(lè)
    點(diǎn)擊音樂(lè) ＝ #點(diǎn)擊音樂(lè)
    撤消音樂(lè) ＝ #撤消音樂(lè)
    背景音樂(lè) ＝ #背景音樂(lè)
  .如果結(jié)束
.如果結(jié)束
返回 (真)
.子程序 畫(huà)圖片
.參數(shù) 橫坐標(biāo), 整數(shù)型
.參數(shù) 縱坐標(biāo), 整數(shù)型
.參數(shù) 畫(huà)片編號(hào), 整數(shù)型
.如果真 (總圖片號(hào)組 [畫(huà)片編號(hào) ＋ 1] ＝ 0)
  返回 ()
.如果真結(jié)束
_啟動(dòng)窗口.畫(huà)板1.畫(huà)圖片 (總圖片號(hào)組 [畫(huà)片編號(hào) ＋ 1], (縱坐標(biāo) － 1) × 30, (橫坐標(biāo) － 1) × 30, 30, 30, 1)
.子程序 畫(huà)背景, , , 這個(gè)過(guò)程占用時(shí)間太多,起碼用去"_畫(huà)板1_按下某鍵"事件99%的時(shí)間,造成了畫(huà)面延時(shí),需改進(jìn).
.參數(shù) 快速畫(huà), 邏輯型
.局部變量 臨時(shí)循環(huán)變量1, 整數(shù)型
.局部變量 臨時(shí)循環(huán)變量2, 整數(shù)型
處理事件 ()
_啟動(dòng)窗口.時(shí)鐘1.時(shí)鐘周期 ＝ 0
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    .如果真 (快速畫(huà) ＝ 真)
      .如果真 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 0 或 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 1)
        到循環(huán)尾 ()
      .如果真結(jié)束
    .如果真結(jié)束
    畫(huà)圖片 (循環(huán)變量1, 循環(huán)變量2, 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2])
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
第一次畫(huà) ＝ 假
_啟動(dòng)窗口.時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 卸載圖片號(hào)
.計(jì)次循環(huán)首 (256, 循環(huán)變量1)
  .如果真 (總圖片號(hào)組 [循環(huán)變量1] ＞ 0)
    卸載圖片 (總圖片號(hào)組 [循環(huán)變量1])
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.子程序 創(chuàng)建數(shù)據(jù)庫(kù), 邏輯型
.局部變量 字段, 字段信息, , "10"
.如果真 (文件是否存在 (#數(shù)據(jù)庫(kù)名 ＋ “.edb”) ＝ 假)
  字段 [1].名稱(chēng) ＝ #方案類(lèi)型
  字段 [1].類(lèi)型 ＝ #文本型
  字段 [1].最大文本長(zhǎng)度 ＝ 8
  字段 [2].名稱(chēng) ＝ #方案名稱(chēng)
  字段 [2].類(lèi)型 ＝ #文本型
  字段 [2].最大文本長(zhǎng)度 ＝ 128
  字段 [3].名稱(chēng) ＝ #數(shù)據(jù)1
  字段 [3].類(lèi)型 ＝ #字節(jié)集型
  字段 [4].名稱(chēng) ＝ #數(shù)據(jù)2
  字段 [4].類(lèi)型 ＝ #字節(jié)集型
  字段 [5].名稱(chēng) ＝ #數(shù)據(jù)3
  字段 [5].類(lèi)型 ＝ #字節(jié)集型
  字段 [6].名稱(chēng) ＝ #數(shù)據(jù)4
  字段 [6].類(lèi)型 ＝ #字節(jié)集型
  字段 [7].名稱(chēng) ＝ #數(shù)據(jù)5
  字段 [7].類(lèi)型 ＝ #字節(jié)集型
  字段 [8].名稱(chēng) ＝ #數(shù)據(jù)6
  字段 [8].類(lèi)型 ＝ #字節(jié)集型
  字段 [9].名稱(chēng) ＝ #數(shù)據(jù)7
  字段 [9].類(lèi)型 ＝ #字節(jié)集型
  字段 [10].名稱(chēng) ＝ #數(shù)據(jù)8
  字段 [10].類(lèi)型 ＝ #字節(jié)集型
  .如果真 (創(chuàng)建 (#數(shù)據(jù)庫(kù)名, 字段) ＝ 假)
    返回 (假)
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (打開(kāi) (#數(shù)據(jù)庫(kù)名, , , , , , ) ＝ 假)
  返回 (假)
.如果真結(jié)束
返回 (真)
選擇方案窗口程序集
.版本 2
.程序集 選擇方案窗口程序集
.子程序 _選擇方案窗口_創(chuàng)建完畢
跳到 (1)
.如果真 (查找 (讀 (#方案類(lèi)型) ＝ #場(chǎng)景方案 且 讀 (#方案名稱(chēng)) ＝ #默認(rèn)方案) ＝ 假)
  加記錄 (#場(chǎng)景方案, #默認(rèn)方案, #背景圖, #墻圖, #地板圖, #黃箱子圖, #箱子位置圖, #紅箱子圖)
.如果真結(jié)束
更新 (場(chǎng)景方案組合框, #場(chǎng)景方案)
跳到 (1)
.如果真 (查找 (讀 (#方案類(lèi)型) ＝ #小人方案 且 讀 (#方案名稱(chēng)) ＝ #默認(rèn)方案) ＝ 假)
  加記錄 (#小人方案, #默認(rèn)方案, #上1, #上2, #下1, #下2, #左1, #左2, #右1, #右2)
.如果真結(jié)束
更新 (小人方案組合框, #小人方案)
跳到 (1)
.如果真 (查找 (讀 (#方案類(lèi)型) ＝ #音樂(lè)方案 且 讀 (#方案名稱(chēng)) ＝ #默認(rèn)方案) ＝ 假)
  加記錄 (#音樂(lè)方案, #默認(rèn)方案, #移動(dòng)音樂(lè), #結(jié)束音樂(lè), #推箱音樂(lè), #重來(lái)音樂(lè), #禁止音樂(lè), #點(diǎn)擊音樂(lè), #撤消音樂(lè), #背景音樂(lè))
.如果真結(jié)束
更新 (音樂(lè)方案組合框, #音樂(lè)方案)
方案被改變 ＝ 假
.子程序 更新
.參數(shù) 組合框, 組合框
.參數(shù) 類(lèi)型, 文本型
.局部變量 臨時(shí)變量, 整數(shù)型
跳到 (1)
組合框.清空 ()
.計(jì)次循環(huán)首 (取記錄數(shù) (), 臨時(shí)變量)
  .如果真 (查找 (讀 (#方案類(lèi)型) ＝ 類(lèi)型) ＝ 真)
    組合框.加入項(xiàng)目 (讀 (#方案名稱(chēng)), 取記錄號(hào) ())
    .如果真 (跳過(guò) () ＝ 假)
      跳出循環(huán) ()
    .如果真結(jié)束
  .如果真結(jié)束
  組合框.現(xiàn)行選中項(xiàng) ＝ 0
.計(jì)次循環(huán)尾 ()
.子程序 _按鈕1_被單擊
場(chǎng)景方案名 ＝ 場(chǎng)景方案組合框.取項(xiàng)目文本 (場(chǎng)景方案組合框.現(xiàn)行選中項(xiàng))
小人方案名 ＝ 小人方案組合框.取項(xiàng)目文本 (小人方案組合框.現(xiàn)行選中項(xiàng))
音樂(lè)方案名 ＝ 音樂(lè)方案組合框.取項(xiàng)目文本 (音樂(lè)方案組合框.現(xiàn)行選中項(xiàng))
方案被改變 ＝ 真
銷(xiāo)毀 ()
.子程序 _按鈕2_被單擊
方案被改變 ＝ 假
銷(xiāo)毀 ()

.版本 2
.支持庫(kù) iext
.程序集 啟動(dòng)窗口程序集
.程序集變量 上步橫坐標(biāo), 整數(shù)型, , , 上一次走的坐標(biāo)x
.程序集變量 上步縱坐標(biāo), 整數(shù)型, , , 上一次走的坐標(biāo)y
.程序集變量 當(dāng)前橫坐標(biāo), 整數(shù)型, , , 當(dāng)前位置x
.程序集變量 當(dāng)前縱坐標(biāo), 整數(shù)型, , , 當(dāng)前位置y
.程序集變量 上步箱子移到, 邏輯型, , , 上一次走時(shí)是否移動(dòng)了箱子
.程序集變量 當(dāng)前目錄, 文本型, , , 當(dāng)前目錄
.程序集變量 當(dāng)前關(guān)數(shù), 整數(shù)型, , , 當(dāng)前關(guān)數(shù)
.程序集變量 錯(cuò)誤箱子數(shù), 整數(shù)型, , , 未正確放置的箱子數(shù)
.程序集變量 小人步數(shù), 整數(shù)型, , , 小人走的步數(shù)
.程序集變量 行走路徑, 整數(shù)型, , "0", 小人的自動(dòng)尋路路徑數(shù)組
.程序集變量 不自動(dòng)尋路, 邏輯型, , , 在小人行走時(shí)不自動(dòng)尋路
.程序集變量 行走計(jì)數(shù), 整數(shù)型, , , 小人行走計(jì)數(shù)
.程序集變量 聲音效果, 邏輯型, , , 是否開(kāi)啟聲音效果
.程序集變量 移動(dòng)音樂(lè)開(kāi)關(guān), 整數(shù)型, , , N 0為播放 1為不播放
.子程序 讀取文件, 整數(shù)型
.局部變量 文件號(hào), 整數(shù)型
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
.局部變量 字節(jié)集長(zhǎng)度, 整數(shù)型
.局部變量 變量, 整數(shù)型, , , funre
.局部變量 關(guān)數(shù)名稱(chēng), 文本型, , , 當(dāng)前關(guān)數(shù)
.局部變量 字節(jié)集變量, 字節(jié)集
.局部變量 記次變量, 整數(shù)型
.局部變量 地圖字節(jié)集, 字節(jié)集
變量 ＝ 1
小人步數(shù) ＝ 0
關(guān)數(shù)名稱(chēng) ＝ 到文本 (當(dāng)前關(guān)數(shù))
跳到 (1)
.如果真 (查找 (讀 (#方案類(lèi)型) ＝ #游戲地圖 且 讀 (#方案名稱(chēng)) ＝ 關(guān)數(shù)名稱(chēng)) ＝ 假)
  ' 如果 (filenum ＝ 1)
  ' 如果真 (加記錄 (#游戲地圖, “1”, #數(shù)據(jù)1) ＝ 假)
  ' funre ＝ 0
  .如果真 (當(dāng)前關(guān)數(shù) ＞ 100)
    當(dāng)前關(guān)數(shù) ＝ 1
  .如果真結(jié)束
  跳到 (1)
  .如果真 (查找 (讀 (#方案類(lèi)型) ＝ #游戲地圖 且 讀 (#方案名稱(chēng)) ＝ 到文本 (當(dāng)前關(guān)數(shù))) ＝ 假)
    地圖字節(jié)集 ＝ 取字節(jié)集中間 (#地圖數(shù)據(jù), (當(dāng)前關(guān)數(shù) － 1) × 896 ＋ 1, 896)
    .如果真 (加記錄 (#游戲地圖, 到文本 (當(dāng)前關(guān)數(shù)), 地圖字節(jié)集) ＝ 假)
      變量 ＝ 0
    .如果真結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果 (變量 ≠ 0)
  錯(cuò)誤箱子數(shù) ＝ 0
  字節(jié)集變量 ＝ 讀 (#數(shù)據(jù)1)
  字節(jié)集長(zhǎng)度 ＝ 取字節(jié)集長(zhǎng)度 (字節(jié)集變量)
  .如果 (字節(jié)集長(zhǎng)度 ≠ 224 × 4)
    變量 ＝ 0
  .否則
    _啟動(dòng)窗口.標(biāo)題 ＝ #游戲版本號(hào) ＋ “ 你現(xiàn)在推的是” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “關(guān)”
    記次變量 ＝ 0
    .計(jì)次循環(huán)首 (14, 循環(huán)變量1)
      .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
        地圖字節(jié)集 ＝ 取字節(jié)集中間 (字節(jié)集變量, 記次變量 × 4 ＋ 1, 4)
        背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 取字節(jié)集數(shù)據(jù) (地圖字節(jié)集, #整數(shù)型)
        .判斷開(kāi)始 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 57 或 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 58)
          當(dāng)前橫坐標(biāo) ＝ 循環(huán)變量1
          當(dāng)前縱坐標(biāo) ＝ 循環(huán)變量2
        .判斷 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 3)
          錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
        .默認(rèn)
        .判斷結(jié)束
        記次變量 ＝ 記次變量 ＋ 1
      .計(jì)次循環(huán)尾 ()
    .計(jì)次循環(huán)尾 ()
  .如果結(jié)束
.否則
  當(dāng)前關(guān)數(shù) ＝ 0
.如果結(jié)束
撤消.禁止 ＝ 真
工具條1.加入狀態(tài) (0, #禁止)
清除數(shù)組 (撤消數(shù)組)
正在錄像中 ＝ 假
錄像播放中 ＝ 假
開(kāi)始錄像.禁止 ＝ 假
停止錄像.禁止 ＝ 真
播放錄像.禁止 ＝ 真
停止播放.禁止 ＝ 真
保存錄像.禁止 ＝ 真
返回游戲.禁止 ＝ 真
打開(kāi)錄像文件.禁止 ＝ 假
返回 (變量)
' 以下是舊程序,不使用
返回 (變量)
變量 ＝ 1
小人步數(shù) ＝ 0
關(guān)數(shù)名稱(chēng) ＝ 當(dāng)前目錄 ＋ “\bbk\box” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “.bbk”
.如果真 (文件是否存在 (關(guān)數(shù)名稱(chēng)) ＝ 假)
  .如果 (當(dāng)前關(guān)數(shù) ＝ 1)
    變量 ＝ 0
  .否則
    當(dāng)前關(guān)數(shù) ＝ 1
    關(guān)數(shù)名稱(chēng) ＝ 當(dāng)前目錄 ＋ “\bbk\box1.bbk”
    .如果真 (文件是否存在 (關(guān)數(shù)名稱(chēng)) ＝ 假)
      變量 ＝ 0
    .如果真結(jié)束
  .如果結(jié)束
.如果真結(jié)束
.如果 (變量 ≠ 0)
  錯(cuò)誤箱子數(shù) ＝ 0
  文件號(hào) ＝ 打開(kāi)文件 (關(guān)數(shù)名稱(chēng), #讀入, )
  移到文件首 (文件號(hào))
  字節(jié)集長(zhǎng)度 ＝ 取文件長(zhǎng)度 (文件號(hào))
  .如果 (字節(jié)集長(zhǎng)度 ≠ 224 × 4)
    變量 ＝ 0
  .否則
    _啟動(dòng)窗口.標(biāo)題 ＝ #游戲版本號(hào) ＋ “ 你現(xiàn)在推的是” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “關(guān)”
    .計(jì)次循環(huán)首 (14, 循環(huán)變量1)
      .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
        讀入數(shù)據(jù) (文件號(hào), 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2])
        .判斷開(kāi)始 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 57 或 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 58)
          當(dāng)前橫坐標(biāo) ＝ 循環(huán)變量1
          當(dāng)前縱坐標(biāo) ＝ 循環(huán)變量2
        .判斷 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 3)
          錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
        .默認(rèn)
        .判斷結(jié)束
      .計(jì)次循環(huán)尾 ()
    .計(jì)次循環(huán)尾 ()
  .如果結(jié)束
  關(guān)閉文件 (文件號(hào))
.否則
  當(dāng)前關(guān)數(shù) ＝ 0
.如果結(jié)束
撤消.禁止 ＝ 真
工具條1.加入狀態(tài) (0, #禁止)
返回 (變量)
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
.局部變量 返回結(jié)果, 整數(shù)型
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
.局部變量 場(chǎng)景方案名長(zhǎng)度, 整數(shù)型
.如果真 (創(chuàng)建數(shù)據(jù)庫(kù) () ＝ 真)
  跳到 (1)
  .如果真 (查找 (讀 (#方案類(lèi)型) ＝ #場(chǎng)景方案 且 讀 (#方案名稱(chēng)) ＝ #默認(rèn)方案) ＝ 假)
    加記錄 (#場(chǎng)景方案, #默認(rèn)方案, #背景圖, #墻圖, #地板圖, #黃箱子圖, #箱子位置圖, #紅箱子圖)
  .如果真結(jié)束
  跳到 (1)
  .如果真 (查找 (讀 (#方案類(lèi)型) ＝ #小人方案 且 讀 (#方案名稱(chēng)) ＝ #默認(rèn)方案) ＝ 假)
    加記錄 (#小人方案, #默認(rèn)方案, #上1, #上2, #下1, #下2, #左1, #左2, #右1, #右2)
  .如果真結(jié)束
  跳到 (1)
  .如果真 (查找 (讀 (#方案類(lèi)型) ＝ #音樂(lè)方案 且 讀 (#方案名稱(chēng)) ＝ #默認(rèn)方案) ＝ 假)
    加記錄 (#音樂(lè)方案, #默認(rèn)方案, #移動(dòng)音樂(lè), #結(jié)束音樂(lè), #推箱音樂(lè), #重來(lái)音樂(lè), #禁止音樂(lè), #點(diǎn)擊音樂(lè), #撤消音樂(lè), #背景音樂(lè))
  .如果真結(jié)束
.如果真結(jié)束
當(dāng)前目錄 ＝ 取當(dāng)前目錄 ()
.如果真 (倒找文本 (當(dāng)前目錄, “\”, , 真) ＝ 取文本長(zhǎng)度 (當(dāng)前目錄))
  當(dāng)前目錄 ＝ 子文本替換 (當(dāng)前目錄, “\”, “”, 取文本長(zhǎng)度 (當(dāng)前目錄), 1, 假)
.如果真結(jié)束
當(dāng)前目錄 ＝ 刪尾空 (當(dāng)前目錄)
.如果真 (是否為調(diào)試版 () ＝ 真)
  ' 改變目錄 (comdir)
.如果真結(jié)束
' 創(chuàng)建目錄 (“bbk”)
小人方案名 ＝ 取空白文本 (255)
場(chǎng)景方案名 ＝ 取空白文本 (255)
音樂(lè)方案名 ＝ 取空白文本 (255)
場(chǎng)景方案名長(zhǎng)度 ＝ 讀配置文本 (“config”, “ren”, #默認(rèn)方案, 小人方案名, 255, 當(dāng)前目錄 ＋ “\box.ini”)
小人方案名 ＝ 取文本左邊 (小人方案名, 場(chǎng)景方案名長(zhǎng)度)
.如果真 (載入圖片號(hào) (#小人方案, 小人方案名) ＝ 假)
  信息框 (“小人圖片載入失敗!”, 0, “退出”)
  結(jié)束 ()
.如果真結(jié)束
場(chǎng)景方案名長(zhǎng)度 ＝ 讀配置文本 (“config”, “gui”, #默認(rèn)方案, 場(chǎng)景方案名, 255, 當(dāng)前目錄 ＋ “\box.ini”)
場(chǎng)景方案名 ＝ 取文本左邊 (場(chǎng)景方案名, 場(chǎng)景方案名長(zhǎng)度)
.如果真 (載入圖片號(hào) (#場(chǎng)景方案, 場(chǎng)景方案名) ＝ 假)
  信息框 (“場(chǎng)景圖片載入失敗!”, 0, “退出”)
  結(jié)束 ()
.如果真結(jié)束
場(chǎng)景方案名長(zhǎng)度 ＝ 讀配置文本 (“config”, “sound”, #默認(rèn)方案, 音樂(lè)方案名, 255, 當(dāng)前目錄 ＋ “\box.ini”)
音樂(lè)方案名 ＝ 取文本左邊 (音樂(lè)方案名, 場(chǎng)景方案名長(zhǎng)度)
載入音樂(lè) ()
重定義數(shù)組 (背景數(shù)組, 假, 14, 16)
' 畫(huà)背景 (假)
_啟動(dòng)窗口.寬度 ＝ 488
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
當(dāng)前橫坐標(biāo) ＝ 0
當(dāng)前縱坐標(biāo) ＝ 0
當(dāng)前關(guān)數(shù) ＝ 讀配置整數(shù) (“score”, “l(fā)astscore”, 1, 當(dāng)前目錄 ＋ “\box.ini”)
.如果 (讀配置整數(shù) (“sound”, “sound”, 1, 當(dāng)前目錄 ＋ “\box.ini”) ＝ 1)
  聲音效果 ＝ 真
.否則
  聲音效果 ＝ 假
.如果結(jié)束
聲音.選中 ＝ 聲音效果
.如果 (聲音.選中 ＝ 真)
  工具條1.加入狀態(tài) (2, #選中)
.否則
  工具條1.去除狀態(tài) (2, #選中)
.如果結(jié)束
返回結(jié)果 ＝ 讀取文件 ()
.如果 (返回結(jié)果 ＝ 0)
  時(shí)鐘1.時(shí)鐘周期 ＝ 0
  信息框 (“沒(méi)有可以過(guò)的關(guān)!”, 0, “一個(gè)很?chē)?yán)重的問(wèn)題:”)
  當(dāng)前關(guān)數(shù) ＝ 0
.否則
  第一次畫(huà) ＝ 真
  畫(huà)背景 (假)
  _啟動(dòng)窗口.標(biāo)題 ＝ #游戲版本號(hào) ＋ “ 你現(xiàn)在推的是第” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “關(guān)”
  時(shí)鐘1.時(shí)鐘周期 ＝ 500
.如果結(jié)束
播放音樂(lè) (重來(lái)音樂(lè), )
.子程序 _時(shí)鐘1_周期事件
時(shí)鐘1.時(shí)鐘周期 ＝ 0
.如果真 (總圖片號(hào)組 [背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＋ 1] ＝ 0)
  返回 ()
.如果真結(jié)束
.如果 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ％ 2 ＝ 0)
  背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] － 1
.否則
  背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＋ 1
.如果結(jié)束
畫(huà)板1.畫(huà)圖片 (總圖片號(hào)組 [背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＋ 1], (當(dāng)前縱坐標(biāo) － 1) × 30, (當(dāng)前橫坐標(biāo) － 1) × 30, 30, 30, 1)
標(biāo)簽2.標(biāo)題 ＝ “X:” ＋ 到文本 (當(dāng)前橫坐標(biāo)) ＋ “ ” ＋ “Y:” ＋ 到文本 (當(dāng)前縱坐標(biāo))
狀態(tài)條1.置文本 (0, “X:” ＋ 到文本 (當(dāng)前橫坐標(biāo)) ＋ “ ” ＋ “Y:” ＋ 到文本 (當(dāng)前縱坐標(biāo)))
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _撤消_被選擇, , , 單次撤消
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
時(shí)鐘1.時(shí)鐘周期 ＝ 0
.如果真 (返回游戲.禁止 ＝ 真)
  _撤消_被選擇1 ()
.如果真結(jié)束
時(shí)鐘1.時(shí)鐘周期 ＝ 500
返回 ()
.如果真 (聲音效果 ＝ 真)
  播放音樂(lè) (撤消音樂(lè), )
.如果真結(jié)束
撤消.禁止 ＝ 真
工具條1.加入狀態(tài) (0, #禁止)
.判斷開(kāi)始 (背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 2)
  背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 57
  畫(huà)圖片 (上步橫坐標(biāo), 上步縱坐標(biāo), 57)
.判斷 (背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 4)
  背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 67
  畫(huà)圖片 (上步橫坐標(biāo), 上步縱坐標(biāo), 67)
.默認(rèn)
  返回 ()
.判斷結(jié)束
小人步數(shù) ＝ 小人步數(shù) － 1
標(biāo)簽1.標(biāo)題 ＝ “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù))
狀態(tài)條1.置文本 (1, “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù)))
.如果 (上步箱子移到 ＝ 真)
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 3
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 3)
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 7
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 7)
  .默認(rèn)
  .判斷結(jié)束
.否則
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
  .默認(rèn)
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
  .判斷結(jié)束
.如果結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo) － 1)
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) ＋ 1, 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) ＋ 1, 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo) ＋ 1)
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) － 1, 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) － 1, 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) － 1 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo))
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 1, 當(dāng)前縱坐標(biāo), 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 1, 當(dāng)前縱坐標(biāo), 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) ＋ 1 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo))
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) － 1, 當(dāng)前縱坐標(biāo), 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) － 1, 當(dāng)前縱坐標(biāo), 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
當(dāng)前橫坐標(biāo) ＝ 上步橫坐標(biāo)
當(dāng)前縱坐標(biāo) ＝ 上步縱坐標(biāo)
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
錯(cuò)誤箱子數(shù) ＝ 0
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    .如果真 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 3)
      錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
.子程序 _撤消_被選擇1, , , 多次撤消
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
.局部變量 記次變量, 整數(shù)型, , , 數(shù)組成員數(shù)
.如果真 (錄像播放中 ＝ 真)
  返回 ()
.如果真結(jié)束
.如果真 (聲音效果 ＝ 真)
  播放音樂(lè) (撤消音樂(lè), )
.如果真結(jié)束
記次變量 ＝ 取數(shù)組成員數(shù) (撤消數(shù)組)
.如果真 (記次變量 ＝ 0)
  返回 ()
.如果真結(jié)束
.如果真 (記次變量 ＝ 1)
  撤消.禁止 ＝ 真
  工具條1.加入狀態(tài) (0, #禁止)
.如果真結(jié)束
上步橫坐標(biāo) ＝ 撤消數(shù)組 [記次變量].x
上步縱坐標(biāo) ＝ 撤消數(shù)組 [記次變量].y
上步箱子移到 ＝ 撤消數(shù)組 [記次變量].ifmove
.判斷開(kāi)始 (背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 2)
  背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 57
  畫(huà)圖片 (上步橫坐標(biāo), 上步縱坐標(biāo), 57)
.判斷 (背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 4)
  背景數(shù)組 [上步橫坐標(biāo)] [上步縱坐標(biāo)] ＝ 67
  畫(huà)圖片 (上步橫坐標(biāo), 上步縱坐標(biāo), 67)
.默認(rèn)
  刪除成員 (撤消數(shù)組, 記次變量, 1)
  .如果真 (正在錄像中 ＝ 真)
    刪除成員 (錄像數(shù)組, 取數(shù)組成員數(shù) (錄像數(shù)組), 1)
  .如果真結(jié)束
  返回 ()
.判斷結(jié)束
小人步數(shù) ＝ 小人步數(shù) － 1
標(biāo)簽1.標(biāo)題 ＝ “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù))
狀態(tài)條1.置文本 (1, “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù)))
.如果 (上步箱子移到 ＝ 真)
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 3
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 3)
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 7
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 7)
  .默認(rèn)
  .判斷結(jié)束
.否則
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
  .默認(rèn)
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
  .判斷結(jié)束
.如果結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo) － 1)
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) ＋ 1, 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) ＋ 1, 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo) ＋ 1)
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) － 1, 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo) － 1, 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) － 1 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo))
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 1, 當(dāng)前縱坐標(biāo), 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 1, 當(dāng)前縱坐標(biāo), 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) ＋ 1 且 上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo))
  .如果真 (上步箱子移到 ＝ 真)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 7)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) － 1, 當(dāng)前縱坐標(biāo), 4)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 3)
      背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo) － 1, 當(dāng)前縱坐標(biāo), 2)
    .默認(rèn)
    .判斷結(jié)束
  .如果真結(jié)束
.如果真結(jié)束
當(dāng)前橫坐標(biāo) ＝ 上步橫坐標(biāo)
當(dāng)前縱坐標(biāo) ＝ 上步縱坐標(biāo)
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
錯(cuò)誤箱子數(shù) ＝ 0
刪除成員 (撤消數(shù)組, 記次變量, 1)
.如果真 (正在錄像中 ＝ 真)
  刪除成員 (錄像數(shù)組, 取數(shù)組成員數(shù) (錄像數(shù)組), 1)
.如果真結(jié)束
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    .如果真 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 3)
      錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
.子程序 _重來(lái)_被選擇
.如果真 (聲音效果 ＝ 真)
  播放音樂(lè) (重來(lái)音樂(lè), )
.如果真結(jié)束
小人步數(shù) ＝ 0
標(biāo)簽1.標(biāo)題 ＝ “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù))
狀態(tài)條1.置文本 (1, “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù)))
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
當(dāng)前橫坐標(biāo) ＝ 0
當(dāng)前縱坐標(biāo) ＝ 0
讀取文件 ()
第一次畫(huà) ＝ 真
畫(huà)背景 (假)
.子程序 __啟動(dòng)窗口_鼠標(biāo)左鍵被按下, 邏輯型
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.如果真 (聲音效果 ＝ 真)
  播放音樂(lè) (點(diǎn)擊音樂(lè), )
.如果真結(jié)束
' 重來(lái).禁止 ＝ 假
' 撤消.禁止 ＝ 真
' 工具條1.加入狀態(tài) (0, #禁止)
.如果真 (上步橫坐標(biāo) ≠ 0)
  ' 撤消.禁止 ＝ 假
  ' 工具條1.加入狀態(tài) (0,0)
.如果真結(jié)束
.子程序 _幫助文件_被選擇
運(yùn)行文件 (0, “open”, 當(dāng)前目錄 ＋ “\box.chm”, “”, “”, 9)
.子程序 _聲音_被選擇
聲音效果 ＝ 取反 (聲音效果)
聲音.選中 ＝ 聲音效果
.如果 (聲音.選中 ＝ 真)
  工具條1.加入狀態(tài) (2, #選中)
.否則
  工具條1.去除狀態(tài) (2, #選中)
.如果結(jié)束
.子程序 _退出_被選擇
卸載圖片號(hào) ()
.如果真 (小人方案名 ＝ “”)
  小人方案名 ＝ #默認(rèn)方案
.如果真結(jié)束
.如果真 (音樂(lè)方案名 ＝ “”)
  音樂(lè)方案名 ＝ #默認(rèn)方案
.如果真結(jié)束
.如果真 (場(chǎng)景方案名 ＝ “”)
  場(chǎng)景方案名 ＝ #默認(rèn)方案
.如果真結(jié)束
寫(xiě)配置文件 (“score”, “l(fā)astscore”, 到文本 (當(dāng)前關(guān)數(shù)), 當(dāng)前目錄 ＋ “\box.ini”)
寫(xiě)配置文件 (“config”, “ren”, 小人方案名, 當(dāng)前目錄 ＋ “\box.ini”)
寫(xiě)配置文件 (“config”, “sound”, 音樂(lè)方案名, 當(dāng)前目錄 ＋ “\box.ini”)
寫(xiě)配置文件 (“config”, “gui”, 場(chǎng)景方案名, 當(dāng)前目錄 ＋ “\box.ini”)
.如果 (聲音效果 ＝ 真)
  寫(xiě)配置文件 (“sound”, “sound”, “1”, 當(dāng)前目錄 ＋ “\box.ini”)
.否則
  寫(xiě)配置文件 (“sound”, “sound”, “0”, 當(dāng)前目錄 ＋ “\box.ini”)
.如果結(jié)束
關(guān)閉 ()
結(jié)束 ()
.子程序 _新的想法_被選擇
載入 (設(shè)計(jì)窗口, , 真)
.如果真 (保存標(biāo)志 ＝ 2 且 當(dāng)前關(guān)數(shù) ＝ 0)
  當(dāng)前關(guān)數(shù) ＝ 當(dāng)前關(guān)數(shù) ＋ 1
  上步橫坐標(biāo) ＝ 0
  上步縱坐標(biāo) ＝ 0
  當(dāng)前橫坐標(biāo) ＝ 0
  當(dāng)前縱坐標(biāo) ＝ 0
  讀取文件 ()
  第一次畫(huà) ＝ 真
  畫(huà)背景 (假)
  _啟動(dòng)窗口.標(biāo)題 ＝ #游戲版本號(hào) ＋ “ 你現(xiàn)在推的是” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “關(guān)”
.如果真結(jié)束
.子程序 _編輯方案_被選擇
載入 (方案設(shè)計(jì)窗口, , 真)
.子程序 _選擇方案_被選擇
載入 (選擇方案窗口, , 真)
.如果真 (方案被改變 ＝ 真)
  卸載圖片號(hào) ()
  載入圖片號(hào) (#小人方案, 小人方案名)
  載入圖片號(hào) (#場(chǎng)景方案, 場(chǎng)景方案名)
  載入音樂(lè) ()
  畫(huà)背景 (假)
.如果真結(jié)束
.子程序 __啟動(dòng)窗口_將被銷(xiāo)毀
時(shí)鐘1.時(shí)鐘周期 ＝ 0
_退出_被選擇 ()
.子程序 _關(guān)于_被選擇
載入 (關(guān)于窗口, , 真)
.子程序 _選關(guān)_被選擇
選擇關(guān)卡 ＝ 當(dāng)前關(guān)數(shù)
載入 (選關(guān)窗口, , 真)
.如果真 (選擇關(guān)卡 ＝ 當(dāng)前關(guān)數(shù))
  返回 ()
.如果真結(jié)束
當(dāng)前關(guān)數(shù) ＝ 選擇關(guān)卡
小人步數(shù) ＝ 0
標(biāo)簽1.標(biāo)題 ＝ “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù))
狀態(tài)條1.置文本 (1, “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù)))
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
當(dāng)前橫坐標(biāo) ＝ 0
當(dāng)前縱坐標(biāo) ＝ 0
讀取文件 ()
第一次畫(huà) ＝ 真
畫(huà)背景 (假)
.子程序 __啟動(dòng)窗口_按下某鍵, 邏輯型
.參數(shù) 鍵代碼, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.局部變量 步數(shù)配置變量, 整數(shù)型, , , bestmove
.局部變量 上下光標(biāo)鍵, 整數(shù)型, , , xflag
.局部變量 左右光標(biāo)鍵, 整數(shù)型
.局部變量 位置, 撤消類(lèi)型
.判斷開(kāi)始 (鍵代碼 ＝ #左光標(biāo)鍵)
  上下光標(biāo)鍵 ＝ 0
  左右光標(biāo)鍵 ＝ -1
.判斷 (鍵代碼 ＝ #上光標(biāo)鍵)
  上下光標(biāo)鍵 ＝ -1
  左右光標(biāo)鍵 ＝ 0
.判斷 (鍵代碼 ＝ #右光標(biāo)鍵)
  上下光標(biāo)鍵 ＝ 0
  左右光標(biāo)鍵 ＝ 1
.判斷 (鍵代碼 ＝ #下光標(biāo)鍵)
  上下光標(biāo)鍵 ＝ 1
  左右光標(biāo)鍵 ＝ 0
.默認(rèn)
  .如果真 (聲音效果 ＝ 真)
    播放音樂(lè) (點(diǎn)擊音樂(lè), )
  .如果真結(jié)束
  返回 (真)
.判斷結(jié)束
.如果真 (返回游戲.禁止 ＝ 假)
  返回 (真)
.如果真結(jié)束
上步箱子移到 ＝ 假
.判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 2)
  .如果真 (聲音效果 ＝ 真)
    .如果真 (移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0)
      播放音樂(lè) (移動(dòng)音樂(lè), 真)
    .如果真結(jié)束
  .如果真結(jié)束
  背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 54 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵
  畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵, 54 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
  .默認(rèn)
  .判斷結(jié)束
  上步箱子移到 ＝ 假
.判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 4)
  .如果真 (聲音效果 ＝ 真)
    .如果真 (移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0)
      播放音樂(lè) (移動(dòng)音樂(lè), 真)
    .如果真結(jié)束
  .如果真結(jié)束
  背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 64 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵
  畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵, 64 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
    背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
    畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
  .默認(rèn)
  .判斷結(jié)束
  上步箱子移到 ＝ 假
.判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 3)
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 2)
    .如果真 (聲音效果 ＝ 真)
      播放音樂(lè) (推箱音樂(lè), )
    .如果真結(jié)束
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 3
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵, 3)
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 54 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵, 54 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
    .默認(rèn)
    .判斷結(jié)束
    上步箱子移到 ＝ 真
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 4)
    .如果真 (聲音效果 ＝ 真)
      播放音樂(lè) (推箱音樂(lè), )
    .如果真結(jié)束
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 7
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵, 7)
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 54 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵, 54 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
    錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) － 1
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
    .默認(rèn)
    .判斷結(jié)束
    上步箱子移到 ＝ 真
  .默認(rèn)
    .如果真 (聲音效果 ＝ 真)
      播放音樂(lè) (禁止音樂(lè), )
    .如果真結(jié)束
    上下光標(biāo)鍵 ＝ 0
    左右光標(biāo)鍵 ＝ 0
  .判斷結(jié)束
.判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 7)
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 2)
    .如果真 (聲音效果 ＝ 真)
      播放音樂(lè) (推箱音樂(lè), )
    .如果真結(jié)束
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 3
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵, 3)
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 64 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵, 64 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
    錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
    .默認(rèn)
    .判斷結(jié)束
    上步箱子移到 ＝ 真
  .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 4)
    .如果真 (聲音效果 ＝ 真)
      播放音樂(lè) (推箱音樂(lè), )
    .如果真結(jié)束
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵] ＝ 7
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵 ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵 ＋ 左右光標(biāo)鍵, 7)
    背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵] [當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵] ＝ 64 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵
    畫(huà)圖片 (當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵, 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵, 64 ＋ 3 × 上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
    .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 51 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 58)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 2
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 2)
    .判斷 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≥ 61 且 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ≤ 68)
      背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo)] ＝ 4
      畫(huà)圖片 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 4)
    .默認(rèn)
    .判斷結(jié)束
    上步箱子移到 ＝ 真
  .默認(rèn)
    .如果真 (聲音效果 ＝ 真)
      播放音樂(lè) (禁止音樂(lè), )
    .如果真結(jié)束
    上下光標(biāo)鍵 ＝ 0
    左右光標(biāo)鍵 ＝ 0
  .判斷結(jié)束
.默認(rèn)
  .如果真 (聲音效果 ＝ 真)
    播放音樂(lè) (禁止音樂(lè), )
  .如果真結(jié)束
  上下光標(biāo)鍵 ＝ 0
  左右光標(biāo)鍵 ＝ 0
.判斷結(jié)束
上步橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo)
上步縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo)
當(dāng)前橫坐標(biāo) ＝ 當(dāng)前橫坐標(biāo) ＋ 上下光標(biāo)鍵
當(dāng)前縱坐標(biāo) ＝ 當(dāng)前縱坐標(biāo) ＋ 左右光標(biāo)鍵
位置.x ＝ 上步橫坐標(biāo)
位置.y ＝ 上步縱坐標(biāo)
位置.ifmove ＝ 上步箱子移到
.如果真 (返回游戲.禁止 ＝ 真)
  .如果真 (錄像播放中 ＝ 假)
    加入成員 (撤消數(shù)組, 位置)
  .如果真結(jié)束
.如果真結(jié)束
.如果真 (正在錄像中 ＝ 真)
  加入成員 (錄像數(shù)組, 鍵代碼)
.如果真結(jié)束
標(biāo)簽2.標(biāo)題 ＝ “X:” ＋ 到文本 (當(dāng)前橫坐標(biāo)) ＋ “ ” ＋ “Y:” ＋ 到文本 (當(dāng)前縱坐標(biāo))
狀態(tài)條1.置文本 (0, “X:” ＋ 到文本 (當(dāng)前橫坐標(biāo)) ＋ “ ” ＋ “Y:” ＋ 到文本 (當(dāng)前縱坐標(biāo)))
' 輸出調(diào)試文本 (到文本 (lastx) ＋ 字符 (9) ＋ 到文本 (lasty))
' 輸出調(diào)試文本 (到文本 (localx) ＋ 字符 (9) ＋ 到文本 (localy) ＋ #換行符)
時(shí)鐘1.時(shí)鐘周期 ＝ 0
小人步數(shù) ＝ 小人步數(shù) ＋ 取絕對(duì)值 (上下光標(biāo)鍵 ＋ 左右光標(biāo)鍵)
標(biāo)簽1.標(biāo)題 ＝ “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù))
狀態(tài)條1.置文本 (1, “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù)))
撤消.禁止 ＝ 假
工具條1.去除狀態(tài) (0, #禁止)
移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 1
.如果 (錯(cuò)誤箱子數(shù) ＝ 0 且 正在錄像中 ＝ 假 且 錄像播放中 ＝ 假)
  .如果真 (聲音效果 ＝ 真)
    播放音樂(lè) (結(jié)束音樂(lè), )
  .如果真結(jié)束
  步數(shù)配置變量 ＝ 讀配置整數(shù) (“box”, “box” ＋ 到文本 (當(dāng)前關(guān)數(shù)), 0, 當(dāng)前目錄 ＋ “\box.ini”)
  .如果 (小人步數(shù) ＜ 步數(shù)配置變量 或 步數(shù)配置變量 ＝ 0)
    寫(xiě)配置文件 (“box”, “box” ＋ 到文本 (當(dāng)前關(guān)數(shù)), 到文本 (小人步數(shù)), 當(dāng)前目錄 ＋ “\box.ini”)
    信息框 (“你做的真不錯(cuò)!我佩服你!繼續(xù)努力吧!”, 0, “恭喜”)
  .否則
    .如果 (小人步數(shù) ＝ 步數(shù)配置變量)
      信息框 (“你這次的成績(jī)和上次一樣，繼續(xù)努力吧!”, 0, “沒(méi)進(jìn)步”)
    .否則
      信息框 (“你還要繼續(xù)鍛煉!一定要打破以前的記錄!”, 0, “你的成績(jī)......”)
    .如果結(jié)束
  .如果結(jié)束
  小人步數(shù) ＝ 0
  標(biāo)簽1.標(biāo)題 ＝ “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù))
  狀態(tài)條1.置文本 (1, “你的移動(dòng)步數(shù)為:” ＋ 到文本 (小人步數(shù)))
  當(dāng)前關(guān)數(shù) ＝ 當(dāng)前關(guān)數(shù) ＋ 1
  上步橫坐標(biāo) ＝ 0
  上步縱坐標(biāo) ＝ 0
  當(dāng)前橫坐標(biāo) ＝ 0
  當(dāng)前縱坐標(biāo) ＝ 0
  讀取文件 ()
  第一次畫(huà) ＝ 真
  畫(huà)背景 (假)
.否則
  時(shí)鐘1.時(shí)鐘周期 ＝ 500
.如果結(jié)束
.子程序 獲取移動(dòng)路徑, 邏輯型, , 已 OK!  2001.11.30.00:10 "程序配制"還未更新
.參數(shù) 當(dāng)前x, 整數(shù)型
.參數(shù) 當(dāng)前y, 整數(shù)型
.參數(shù) 目標(biāo)x, 整數(shù)型
.參數(shù) 目標(biāo)y, 整數(shù)型
.局部變量 地圖數(shù)據(jù), 數(shù)據(jù)類(lèi)型2, , "14,16", 探索路徑時(shí)用的臨時(shí)地圖
.局部變量 節(jié)點(diǎn)1, 整數(shù)型, , "0", 保存每次找到的節(jié)點(diǎn)
.局部變量 節(jié)點(diǎn)2, 整數(shù)型, , "0", 保存每次找到的節(jié)點(diǎn)
.局部變量 數(shù)量, 整數(shù)型
.局部變量 完成, 邏輯型, , , 是否已經(jīng)完成探索
.局部變量 步數(shù), 整數(shù)型, , , 當(dāng)前步數(shù)
.局部變量 變量1, 整數(shù)型
.局部變量 變量2, 整數(shù)型
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
.局部變量 最大次數(shù), 整數(shù)型, , , 要搜索的最大次數(shù)
.如果真 (取數(shù)組成員數(shù) (行走路徑) ＞ 0)
  返回 (假)
.如果真結(jié)束
.如果真 (不自動(dòng)尋路 ＝ 真)
  返回 (假)
.如果真結(jié)束
.如果真 (當(dāng)前x ＝ 目標(biāo)x 且 當(dāng)前y ＝ 目標(biāo)y)
  返回 (假)
.如果真結(jié)束
.如果真 (目標(biāo)x ＞ 14 或 目標(biāo)y ＞ 16)
  返回 (假)
.如果真結(jié)束
完成 ＝ 假
最大次數(shù) ＝ 0
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    .如果真 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 0 或 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 1)
      最大次數(shù) ＝ 最大次數(shù) ＋ 1
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
最大次數(shù) ＝ 14 × 16 － 最大次數(shù)
清除數(shù)組 (節(jié)點(diǎn)1)
清除數(shù)組 (節(jié)點(diǎn)2)
加入成員 (節(jié)點(diǎn)1, 當(dāng)前x)
加入成員 (節(jié)點(diǎn)2, 當(dāng)前y)
地圖數(shù)據(jù) [當(dāng)前x] [當(dāng)前y].步數(shù) ＝ 99999
地圖數(shù)據(jù) [當(dāng)前x] [當(dāng)前y].位置.x ＝ 節(jié)點(diǎn)1 [1]
地圖數(shù)據(jù) [當(dāng)前x] [當(dāng)前y].位置.y ＝ 節(jié)點(diǎn)2 [1]
' map [p1 [rq1] ＋ 1] [p2 [rq1]].方向 ＝ #下光標(biāo)鍵
地圖數(shù)據(jù) [當(dāng)前x] [當(dāng)前y].上一步.x ＝ 節(jié)點(diǎn)1 [1]
地圖數(shù)據(jù) [當(dāng)前x] [當(dāng)前y].上一步.y ＝ 節(jié)點(diǎn)2 [1]
步數(shù) ＝ 1
.計(jì)次循環(huán)首 (最大次數(shù), 變量1)
  數(shù)量 ＝ 取數(shù)組成員數(shù) (節(jié)點(diǎn)1)
  .計(jì)次循環(huán)首 (數(shù)量, 變量2)
    .如果真 (背景數(shù)組 [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]] ＝ 2 或 背景數(shù)組 [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]] ＝ 4)
      .如果真 (地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].步數(shù) ＝ 0)
        加入成員 (節(jié)點(diǎn)1, 節(jié)點(diǎn)1 [變量2] ＋ 1)
        加入成員 (節(jié)點(diǎn)2, 節(jié)點(diǎn)2 [變量2])
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].步數(shù) ＝ 步數(shù)
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].位置.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].位置.y ＝ 節(jié)點(diǎn)2 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].方向 ＝ #下光標(biāo)鍵
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].上一步.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] ＋ 1] [節(jié)點(diǎn)2 [變量2]].上一步.y ＝ 節(jié)點(diǎn)2 [變量2]
        ' 畫(huà)板1.定位寫(xiě)出 ((p2 [rq1] － 1) × 30, (p1 [rq1] ＋ 1 － 1) × 30, step)
      .如果真結(jié)束
      .如果真 (目標(biāo)x ＝ 節(jié)點(diǎn)1 [變量2] ＋ 1 且 目標(biāo)y ＝ 節(jié)點(diǎn)2 [變量2])
        完成 ＝ 真
        跳出循環(huán) ()
      .如果真結(jié)束
    .如果真結(jié)束
    .如果真 (背景數(shù)組 [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]] ＝ 2 或 背景數(shù)組 [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]] ＝ 4)
      .如果真 (地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].步數(shù) ＝ 0)
        加入成員 (節(jié)點(diǎn)1, 節(jié)點(diǎn)1 [變量2] － 1)
        加入成員 (節(jié)點(diǎn)2, 節(jié)點(diǎn)2 [變量2])
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].步數(shù) ＝ 步數(shù)
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].位置.x ＝ 節(jié)點(diǎn)1 [變量2] － 1
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].位置.y ＝ 節(jié)點(diǎn)2 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].方向 ＝ #上光標(biāo)鍵
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].上一步.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2] － 1] [節(jié)點(diǎn)2 [變量2]].上一步.y ＝ 節(jié)點(diǎn)2 [變量2]
        ' 畫(huà)板1.定位寫(xiě)出 ((p2 [rq1] － 1) × 30, (p1 [rq1] － 1 － 1) × 30, step)
      .如果真結(jié)束
      .如果真 (目標(biāo)x ＝ 節(jié)點(diǎn)1 [變量2] － 1 且 目標(biāo)y ＝ 節(jié)點(diǎn)2 [變量2])
        完成 ＝ 真
        跳出循環(huán) ()
      .如果真結(jié)束
    .如果真結(jié)束
    .如果真 (背景數(shù)組 [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1] ＝ 2 或 背景數(shù)組 [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1] ＝ 4)
      .如果真 (地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].步數(shù) ＝ 0)
        加入成員 (節(jié)點(diǎn)1, 節(jié)點(diǎn)1 [變量2])
        加入成員 (節(jié)點(diǎn)2, 節(jié)點(diǎn)2 [變量2] ＋ 1)
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].步數(shù) ＝ 步數(shù)
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].位置.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].位置.y ＝ 節(jié)點(diǎn)2 [變量2] ＋ 1
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].方向 ＝ #右光標(biāo)鍵
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].上一步.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] ＋ 1].上一步.y ＝ 節(jié)點(diǎn)2 [變量2]
        ' 畫(huà)板1.定位寫(xiě)出 ((p2 [rq1] － 1 ＋ 1) × 30, (p1 [rq1] － 1) × 30, step)
      .如果真結(jié)束
      .如果真 (目標(biāo)x ＝ 節(jié)點(diǎn)1 [變量2] 且 目標(biāo)y ＝ 節(jié)點(diǎn)2 [變量2] ＋ 1)
        完成 ＝ 真
        跳出循環(huán) ()
      .如果真結(jié)束
    .如果真結(jié)束
    .如果真 (背景數(shù)組 [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1] ＝ 2 或 背景數(shù)組 [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1] ＝ 4)
      .如果真 (地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].步數(shù) ＝ 0)
        加入成員 (節(jié)點(diǎn)1, 節(jié)點(diǎn)1 [變量2])
        加入成員 (節(jié)點(diǎn)2, 節(jié)點(diǎn)2 [變量2] － 1)
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].步數(shù) ＝ 步數(shù)
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].位置.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].位置.y ＝ 節(jié)點(diǎn)2 [變量2] － 1
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].方向 ＝ #左光標(biāo)鍵
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].上一步.x ＝ 節(jié)點(diǎn)1 [變量2]
        地圖數(shù)據(jù) [節(jié)點(diǎn)1 [變量2]] [節(jié)點(diǎn)2 [變量2] － 1].上一步.y ＝ 節(jié)點(diǎn)2 [變量2]
        ' 畫(huà)板1.定位寫(xiě)出 ((p2 [rq1] － 1 － 1) × 30, (p1 [rq1] － 1) × 30, step)
      .如果真結(jié)束
      .如果真 (目標(biāo)x ＝ 節(jié)點(diǎn)1 [變量2] 且 目標(biāo)y ＝ 節(jié)點(diǎn)2 [變量2] － 1)
        完成 ＝ 真
        跳出循環(huán) ()
      .如果真結(jié)束
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
  刪除成員 (節(jié)點(diǎn)1, 1, 數(shù)量) ' 刪除舊節(jié)點(diǎn)
  刪除成員 (節(jié)點(diǎn)2, 1, 數(shù)量)
  .如果真 (取數(shù)組成員數(shù) (節(jié)點(diǎn)1) ＝ 0 或 完成 ＝ 真)
    跳出循環(huán) ()
  .如果真結(jié)束
  步數(shù) ＝ 步數(shù) ＋ 1
.計(jì)次循環(huán)尾 ()
.如果 (完成 ＝ 真)
  ' 倒推出小人的行走路徑
  重定義數(shù)組 (行走路徑, 假, 步數(shù))
  行走路徑 [步數(shù)] ＝ 地圖數(shù)據(jù) [目標(biāo)x] [目標(biāo)y].方向
  變量2 ＝ 目標(biāo)x
  目標(biāo)x ＝ 地圖數(shù)據(jù) [變量2] [目標(biāo)y].上一步.x
  目標(biāo)y ＝ 地圖數(shù)據(jù) [變量2] [目標(biāo)y].上一步.y
  .變量循環(huán)首 (步數(shù) － 1, 1, -1, 變量1)
    .如果真 (地圖數(shù)據(jù) [目標(biāo)x] [目標(biāo)y].方向 ＝ 99999)
      跳出循環(huán) ()
    .如果真結(jié)束
    行走路徑 [變量1] ＝ 地圖數(shù)據(jù) [目標(biāo)x] [目標(biāo)y].方向
    變量2 ＝ 目標(biāo)x
    目標(biāo)x ＝ 地圖數(shù)據(jù) [變量2] [目標(biāo)y].上一步.x
    目標(biāo)y ＝ 地圖數(shù)據(jù) [變量2] [目標(biāo)y].上一步.y
  .變量循環(huán)尾 ()
  返回 (真)
.否則
  返回 (假)
.如果結(jié)束
.子程序 _畫(huà)板1_鼠標(biāo)左鍵被按下, 邏輯型
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 縱坐標(biāo), 整數(shù)型
移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0
.如果真 (不自動(dòng)尋路 ＝ 假)
  橫坐標(biāo) ＝ 取整 (縱向位置 ÷ 30 ＋ 1)
  縱坐標(biāo) ＝ 取整 (橫向位置 ÷ 30 ＋ 1)
  ' 輸出調(diào)試文本 (到文本 (box [x] [y]))
  .判斷開(kāi)始 (背景數(shù)組 [橫坐標(biāo)] [縱坐標(biāo)] ＝ 2 或 背景數(shù)組 [橫坐標(biāo)] [縱坐標(biāo)] ＝ 4)
    ' 小人自動(dòng)移動(dòng)
    .如果真 (獲取移動(dòng)路徑 (當(dāng)前橫坐標(biāo), 當(dāng)前縱坐標(biāo), 橫坐標(biāo), 縱坐標(biāo)) ＝ 真)
      .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (行走路徑), 行走計(jì)數(shù))
        不自動(dòng)尋路 ＝ 真
        __啟動(dòng)窗口_按下某鍵 (行走路徑 [行走計(jì)數(shù)], 0)
        移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 1
        不自動(dòng)尋路 ＝ 真
        延時(shí) (50)
      .計(jì)次循環(huán)尾 ()
      停止播放 ()
      移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0
      不自動(dòng)尋路 ＝ 假
      清除數(shù)組 (行走路徑)
    .如果真結(jié)束
    不自動(dòng)尋路 ＝ 假
  .判斷 (背景數(shù)組 [橫坐標(biāo)] [縱坐標(biāo)] ＝ 3 或 背景數(shù)組 [橫坐標(biāo)] [縱坐標(biāo)] ＝ 7)
    ' 小人自動(dòng)推箱子
    .判斷開(kāi)始 (當(dāng)前橫坐標(biāo) ＋ 1 ＝ 橫坐標(biāo) 且 當(dāng)前縱坐標(biāo) ＝ 縱坐標(biāo))
      __啟動(dòng)窗口_按下某鍵 (#下光標(biāo)鍵, 0)
    .判斷 (當(dāng)前橫坐標(biāo) － 1 ＝ 橫坐標(biāo) 且 當(dāng)前縱坐標(biāo) ＝ 縱坐標(biāo))
      __啟動(dòng)窗口_按下某鍵 (#上光標(biāo)鍵, 0)
    .判斷 (當(dāng)前橫坐標(biāo) ＝ 橫坐標(biāo) 且 當(dāng)前縱坐標(biāo) ＋ 1 ＝ 縱坐標(biāo))
      __啟動(dòng)窗口_按下某鍵 (#右光標(biāo)鍵, 0)
    .判斷 (當(dāng)前橫坐標(biāo) ＝ 橫坐標(biāo) 且 當(dāng)前縱坐標(biāo) － 1 ＝ 縱坐標(biāo))
      __啟動(dòng)窗口_按下某鍵 (#左光標(biāo)鍵, 0)
    .默認(rèn)
    .判斷結(jié)束
  .默認(rèn)
  .判斷結(jié)束
.如果真結(jié)束
.子程序 __啟動(dòng)窗口_放開(kāi)某鍵, 邏輯型, , N
.參數(shù) 鍵代碼, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.如果 (錯(cuò)誤箱子數(shù) ＝ 0)
.否則
  .判斷開(kāi)始 (鍵代碼 ＝ #左光標(biāo)鍵)
    時(shí)鐘2.時(shí)鐘周期 ＝ 200
    移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0
  .判斷 (鍵代碼 ＝ #上光標(biāo)鍵)
    時(shí)鐘2.時(shí)鐘周期 ＝ 200
    移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0
  .判斷 (鍵代碼 ＝ #右光標(biāo)鍵)
    時(shí)鐘2.時(shí)鐘周期 ＝ 200
    移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0
  .判斷 (鍵代碼 ＝ #下光標(biāo)鍵)
    時(shí)鐘2.時(shí)鐘周期 ＝ 200
    移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 0
  .默認(rèn)
  .判斷結(jié)束
.如果結(jié)束
.子程序 _時(shí)鐘2_周期事件, , , N
時(shí)鐘2.時(shí)鐘周期 ＝ 0
停止播放 ()
.子程序 _畫(huà)板1_鼠標(biāo)右鍵被按下, 邏輯型, , N
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.局部變量 變量
.局部變量 移動(dòng)步數(shù)
.局部變量 移動(dòng)x1
.局部變量 移動(dòng)y1
.如果真 (不自動(dòng)尋路 ＝ 假)
  移動(dòng)x1 ＝ 取整 (縱向位置 ÷ 30 ＋ 1)
  移動(dòng)y1 ＝ 取整 (橫向位置 ÷ 30 ＋ 1)
.如果真結(jié)束
' 小人自動(dòng)推箱子
.判斷開(kāi)始 (當(dāng)前橫坐標(biāo) ＜ 移動(dòng)x1 － 1 且 當(dāng)前縱坐標(biāo) ＝ 移動(dòng)y1)
  移動(dòng)步數(shù) ＝ 移動(dòng)x1 － 當(dāng)前橫坐標(biāo) － 1
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [移動(dòng)y1] ＝ 3 或 背景數(shù)組 [當(dāng)前橫坐標(biāo) ＋ 1] [移動(dòng)y1] ＝ 7)
    .變量循環(huán)首 (1, 移動(dòng)步數(shù), 1, 變量)
      __啟動(dòng)窗口_按下某鍵 (#下光標(biāo)鍵, 0)
    .變量循環(huán)尾 ()
  .默認(rèn)
  .判斷結(jié)束
.判斷 (當(dāng)前橫坐標(biāo) ＞ 移動(dòng)x1 ＋ 1 且 當(dāng)前縱坐標(biāo) ＝ 移動(dòng)y1)
  移動(dòng)步數(shù) ＝ 當(dāng)前橫坐標(biāo) － 移動(dòng)x1 － 1
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [移動(dòng)y1] ＝ 3 或 背景數(shù)組 [當(dāng)前橫坐標(biāo) － 1] [移動(dòng)y1] ＝ 7)
    .變量循環(huán)首 (1, 移動(dòng)步數(shù), 1, 變量)
      __啟動(dòng)窗口_按下某鍵 (#上光標(biāo)鍵, 0)
    .變量循環(huán)尾 ()
  .默認(rèn)
  .判斷結(jié)束
.判斷 (當(dāng)前縱坐標(biāo) ＜ 移動(dòng)y1 － 1 且 當(dāng)前橫坐標(biāo) ＝ 移動(dòng)x1)
  移動(dòng)步數(shù) ＝ 移動(dòng)y1 － 當(dāng)前縱坐標(biāo) － 1
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 3 或 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) ＋ 1] ＝ 7)
    .變量循環(huán)首 (1, 移動(dòng)步數(shù), 1, 變量)
      __啟動(dòng)窗口_按下某鍵 (#右光標(biāo)鍵, 0)
    .變量循環(huán)尾 ()
  .默認(rèn)
  .判斷結(jié)束
.判斷 (當(dāng)前縱坐標(biāo) ＞ 移動(dòng)y1 ＋ 1 且 當(dāng)前橫坐標(biāo) ＝ 移動(dòng)x1)
  移動(dòng)步數(shù) ＝ 當(dāng)前縱坐標(biāo) － 移動(dòng)y1 － 1
  .判斷開(kāi)始 (背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 3 或 背景數(shù)組 [當(dāng)前橫坐標(biāo)] [當(dāng)前縱坐標(biāo) － 1] ＝ 7)
    .變量循環(huán)首 (1, 移動(dòng)步數(shù), 1, 變量)
      __啟動(dòng)窗口_按下某鍵 (#左光標(biāo)鍵, 0)
    .變量循環(huán)尾 ()
  .默認(rèn)
  .判斷結(jié)束
.默認(rèn)
.判斷結(jié)束
.子程序 _工具條1_被單擊
.參數(shù) 按鈕索引, 整數(shù)型
.判斷開(kāi)始 (按鈕索引 ＝ 0)
  _撤消_被選擇 ()
.判斷 (按鈕索引 ＝ 1)
  _重來(lái)_被選擇 ()
.判斷 (按鈕索引 ＝ 2)
  _聲音_被選擇 ()
.判斷 (按鈕索引 ＝ 3)
  _選關(guān)_被選擇 ()
.判斷 (按鈕索引 ＝ 4)
  _退出_被選擇 ()
.判斷 (按鈕索引 ＝ 6)
  _新的想法_被選擇 ()
.判斷 (按鈕索引 ＝ 7)
  _編輯方案_被選擇 ()
.判斷 (按鈕索引 ＝ 8)
  _選擇方案_被選擇 ()
.默認(rèn)
.判斷結(jié)束
.子程序 _開(kāi)始錄像_被選擇
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
時(shí)鐘1.時(shí)鐘周期 ＝ 0
正在錄像中 ＝ 真
開(kāi)始錄像.禁止 ＝ 真
停止錄像.禁止 ＝ 假
播放錄像.禁止 ＝ 真
停止播放.禁止 ＝ 真
保存錄像.禁止 ＝ 真
打開(kāi)錄像文件.禁止 ＝ 真
返回游戲.禁止 ＝ 真
重來(lái).禁止 ＝ 真
選關(guān).禁止 ＝ 真
設(shè)計(jì).禁止 ＝ 真
清除數(shù)組 (錄像數(shù)組)
錄像地圖數(shù)據(jù) ＝ { } ' 保存地圖
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    錄像地圖數(shù)據(jù) ＝ 錄像地圖數(shù)據(jù) ＋ 到字節(jié)集 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2])
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _停止錄像_被選擇
時(shí)鐘1.時(shí)鐘周期 ＝ 0
正在錄像中 ＝ 假
.如果真 (取數(shù)組成員數(shù) (錄像數(shù)組) ＞ 0)
  開(kāi)始錄像.禁止 ＝ 假
  停止錄像.禁止 ＝ 真
.如果真結(jié)束
播放錄像.禁止 ＝ 假
停止播放.禁止 ＝ 真
保存錄像.禁止 ＝ 假
開(kāi)始錄像.禁止 ＝ 假
停止錄像.禁止 ＝ 真
打開(kāi)錄像文件.禁止 ＝ 假
返回游戲.禁止 ＝ 真
重來(lái).禁止 ＝ 假
選關(guān).禁止 ＝ 假
設(shè)計(jì).禁止 ＝ 假
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _播放錄像_被選擇
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
.局部變量 記次變量, 整數(shù)型
.局部變量 臨時(shí)字節(jié)集, 字節(jié)集
.如果真 (取數(shù)組成員數(shù) (錄像數(shù)組) ＝ 0)
  返回 ()
.如果真結(jié)束
時(shí)鐘1.時(shí)鐘周期 ＝ 0
錄像播放中 ＝ 真
播放錄像.禁止 ＝ 真
停止播放.禁止 ＝ 假
保存錄像.禁止 ＝ 真
開(kāi)始錄像.禁止 ＝ 真
停止錄像.禁止 ＝ 真
打開(kāi)錄像文件.禁止 ＝ 真
返回游戲.禁止 ＝ 真
撤消.禁止 ＝ 真
重來(lái).禁止 ＝ 真
選關(guān).禁止 ＝ 真
設(shè)計(jì).禁止 ＝ 真
.如果真 (臨時(shí)地圖數(shù)據(jù) ＝ { })
  .計(jì)次循環(huán)首 (14, 循環(huán)變量1)
    .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
      臨時(shí)地圖數(shù)據(jù) ＝ 臨時(shí)地圖數(shù)據(jù) ＋ 到字節(jié)集 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2])
    .計(jì)次循環(huán)尾 ()
  .計(jì)次循環(huán)尾 ()
.如果真結(jié)束
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
當(dāng)前橫坐標(biāo) ＝ 0
當(dāng)前縱坐標(biāo) ＝ 0
錯(cuò)誤箱子數(shù) ＝ 0
記次變量 ＝ 0
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    臨時(shí)字節(jié)集 ＝ 取字節(jié)集中間 (錄像地圖數(shù)據(jù), 記次變量 × 4 ＋ 1, 4)
    背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 取字節(jié)集數(shù)據(jù) (臨時(shí)字節(jié)集, #整數(shù)型)
    .判斷開(kāi)始 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 57 或 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 58)
      當(dāng)前橫坐標(biāo) ＝ 循環(huán)變量1
      當(dāng)前縱坐標(biāo) ＝ 循環(huán)變量2
    .判斷 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 3)
      錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
    .默認(rèn)
    .判斷結(jié)束
    記次變量 ＝ 記次變量 ＋ 1
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
畫(huà)板1.清除 (, , , )
第一次畫(huà) ＝ 真
畫(huà)背景 (假)
_啟動(dòng)窗口.標(biāo)題 ＝ #游戲版本號(hào) ＋ “ 你現(xiàn)在推的是第” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “關(guān)”
畫(huà)板1.禁止 ＝ 真
_啟動(dòng)窗口.禁止 ＝ 真
.計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (錄像數(shù)組), 循環(huán)變量1)
  不自動(dòng)尋路 ＝ 真
  __啟動(dòng)窗口_按下某鍵 (錄像數(shù)組 [循環(huán)變量1], 0)
  移動(dòng)音樂(lè)開(kāi)關(guān) ＝ 1
  不自動(dòng)尋路 ＝ 真
  延時(shí) (200)
.計(jì)次循環(huán)尾 ()
不自動(dòng)尋路 ＝ 假
_停止播放_(tái)被選擇 ()
畫(huà)板1.禁止 ＝ 假
_啟動(dòng)窗口.禁止 ＝ 假
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _停止播放_(tái)被選擇
時(shí)鐘1.時(shí)鐘周期 ＝ 0
錄像播放中 ＝ 假
.如果 (取數(shù)組成員數(shù) (撤消數(shù)組) ＞ 0)
  撤消.禁止 ＝ 假
.否則
  撤消.禁止 ＝ 真
.如果結(jié)束
播放錄像.禁止 ＝ 假
停止播放.禁止 ＝ 真
保存錄像.禁止 ＝ 假
開(kāi)始錄像.禁止 ＝ 假
停止錄像.禁止 ＝ 真
打開(kāi)錄像文件.禁止 ＝ 假
返回游戲.禁止 ＝ 假
重來(lái).禁止 ＝ 假
選關(guān).禁止 ＝ 假
設(shè)計(jì).禁止 ＝ 假
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _保存錄像_被選擇
.局部變量 臨時(shí)字節(jié)集, 字節(jié)集
.局部變量 循環(huán)變量, 整數(shù)型
.局部變量 標(biāo)志, 字節(jié)集
時(shí)鐘1.時(shí)鐘周期 ＝ 0
通用對(duì)話(huà)框1.類(lèi)型 ＝ 1
通用對(duì)話(huà)框1.初始目錄 ＝ 當(dāng)前目錄
通用對(duì)話(huà)框1.標(biāo)題 ＝ “保存游戲錄像”
通用對(duì)話(huà)框1.文件必須存在 ＝ 真
通用對(duì)話(huà)框1.文件覆蓋提示 ＝ 真
.如果真 (通用對(duì)話(huà)框1.打開(kāi) () ＝ 真)
  臨時(shí)字節(jié)集 ＝ { }
  .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (錄像數(shù)組), 循環(huán)變量)
    臨時(shí)字節(jié)集 ＝ 臨時(shí)字節(jié)集 ＋ 到字節(jié)集 (錄像數(shù)組 [循環(huán)變量])
  .計(jì)次循環(huán)尾 ()
  標(biāo)志 ＝ 到字節(jié)集 (“E-box Recoder”)
  寫(xiě)到文件 (通用對(duì)話(huà)框1.文件名, 標(biāo)志 ＋ 錄像地圖數(shù)據(jù) ＋ 臨時(shí)字節(jié)集)
.如果真結(jié)束
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _打開(kāi)錄像文件_被選擇
.局部變量 標(biāo)志, 文本型
.局部變量 變量, 整數(shù)型
.局部變量 臨時(shí)字節(jié)集, 字節(jié)集
.局部變量 臨時(shí)判斷, 邏輯型
.局部變量 臨時(shí)字節(jié)集1, 字節(jié)集
.局部變量 臨時(shí)字節(jié)集2, 字節(jié)集
.局部變量 記次變量, 整數(shù)型
時(shí)鐘1.時(shí)鐘周期 ＝ 0
通用對(duì)話(huà)框1.類(lèi)型 ＝ 0
通用對(duì)話(huà)框1.初始目錄 ＝ 當(dāng)前目錄
通用對(duì)話(huà)框1.標(biāo)題 ＝ “打開(kāi)游戲錄像”
通用對(duì)話(huà)框1.文件必須存在 ＝ 真
通用對(duì)話(huà)框1.文件覆蓋提示 ＝ 真
.如果真 (通用對(duì)話(huà)框1.打開(kāi) () ＝ 真)
  臨時(shí)字節(jié)集 ＝ 讀入文件 (通用對(duì)話(huà)框1.文件名)
  臨時(shí)判斷 ＝ 假
  .如果真 (取字節(jié)集長(zhǎng)度 (臨時(shí)字節(jié)集) ≥ 224 × 4 ＋ 14)
    標(biāo)志 ＝ 取字節(jié)集數(shù)據(jù) (取字節(jié)集左邊 (臨時(shí)字節(jié)集, 14), #文本型)
    .如果真 (標(biāo)志 ＝ “E-box Recoder”)
      臨時(shí)字節(jié)集1 ＝ 取字節(jié)集中間 (臨時(shí)字節(jié)集, 15, 224 × 4)
      .如果真 (取字節(jié)集長(zhǎng)度 (臨時(shí)字節(jié)集1) ＝ 224 × 4)
        臨時(shí)判斷 ＝ 真
        臨時(shí)字節(jié)集2 ＝ 取字節(jié)集中間 (臨時(shí)字節(jié)集, 224 × 4 ＋ 14 ＋ 1, 取字節(jié)集長(zhǎng)度 (臨時(shí)字節(jié)集) － 224 × 4 ＋ 14)
        記次變量 ＝ 取字節(jié)集長(zhǎng)度 (臨時(shí)字節(jié)集2) ÷ 4
        清除數(shù)組 (錄像數(shù)組)
        .如果真 (記次變量 ＞ 0)
          .計(jì)次循環(huán)首 (記次變量, 變量)
            加入成員 (錄像數(shù)組, 取字節(jié)集數(shù)據(jù) (取字節(jié)集中間 (臨時(shí)字節(jié)集2, (變量 － 1) × 4 ＋ 1, 4), #整數(shù)型))
          .計(jì)次循環(huán)尾 ()
        .如果真結(jié)束
      .如果真結(jié)束
    .如果真結(jié)束
  .如果真結(jié)束
  .如果 (臨時(shí)判斷 ＝ 真)
    錄像地圖數(shù)據(jù) ＝ 臨時(shí)字節(jié)集1
    _停止錄像_被選擇 ()
  .否則
    信息框 (“選定的文件不是推箱子的錄像文件”, 0, “錯(cuò)誤”)
  .如果結(jié)束
.如果真結(jié)束
時(shí)鐘1.時(shí)鐘周期 ＝ 500
.子程序 _返回游戲_被選擇
.局部變量 循環(huán)變量1, 整數(shù)型
.局部變量 循環(huán)變量2, 整數(shù)型
.局部變量 臨時(shí)字節(jié)集, 字節(jié)集
.局部變量 記次變量, 整數(shù)型
時(shí)鐘1.時(shí)鐘周期 ＝ 0
正在錄像中 ＝ 假
錄像播放中 ＝ 假
上步橫坐標(biāo) ＝ 0
上步縱坐標(biāo) ＝ 0
當(dāng)前橫坐標(biāo) ＝ 0
當(dāng)前縱坐標(biāo) ＝ 0
錯(cuò)誤箱子數(shù) ＝ 0
記次變量 ＝ 0
.計(jì)次循環(huán)首 (14, 循環(huán)變量1)
  .計(jì)次循環(huán)首 (16, 循環(huán)變量2)
    臨時(shí)字節(jié)集 ＝ 取字節(jié)集中間 (臨時(shí)地圖數(shù)據(jù), 記次變量 × 4 ＋ 1, 4)
    背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 取字節(jié)集數(shù)據(jù) (臨時(shí)字節(jié)集, #整數(shù)型)
    .判斷開(kāi)始 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ≥ 52 且 背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ≤ 59)
      當(dāng)前橫坐標(biāo) ＝ 循環(huán)變量1
      當(dāng)前縱坐標(biāo) ＝ 循環(huán)變量2
    .判斷 (背景數(shù)組 [循環(huán)變量1] [循環(huán)變量2] ＝ 3)
      錯(cuò)誤箱子數(shù) ＝ 錯(cuò)誤箱子數(shù) ＋ 1
    .默認(rèn)
    .判斷結(jié)束
    記次變量 ＝ 記次變量 ＋ 1
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
臨時(shí)地圖數(shù)據(jù) ＝ { }
畫(huà)板1.清除 (, , , )
第一次畫(huà) ＝ 真
畫(huà)背景 (假)
_啟動(dòng)窗口.標(biāo)題 ＝ #游戲版本號(hào) ＋ “ 你現(xiàn)在推的是第” ＋ 到文本 (當(dāng)前關(guān)數(shù)) ＋ “關(guān)”
返回游戲.禁止 ＝ 真
時(shí)鐘1.時(shí)鐘周期 ＝ 500