.版本 2
.DLL命令 系統(tǒng)關(guān)于對(duì)話框, , , "ShellAboutA"
  .參數(shù) 窗口句柄, 整數(shù)型
  .參數(shù) 應(yīng)用程序標(biāo)題, 文本型
  .參數(shù) 其他信息, 文本型
  .參數(shù) 圖標(biāo)句柄, 整數(shù)型

.版本 2
.圖片 圓點(diǎn)白色
.圖片 圓點(diǎn)貓
.圖片 圓點(diǎn)墻
.圖片 圓點(diǎn)叉

.版本 2
.程序集 窗口程序集_啟動(dòng)窗口
.程序集變量 圓點(diǎn)狀態(tài), 整數(shù)型, , "121", 0空白1圍墻2陷阱
.程序集變量 貓位置, 整數(shù)型
.程序集變量 游戲狀態(tài), 整數(shù)型, , , 0未開(kāi)始1正在游戲2游戲結(jié)束
.程序集變量 移動(dòng)路徑, 整數(shù)型, , "0", 貓的逃跑路徑
.程序集變量 圓點(diǎn)步數(shù), 整數(shù)型, , "121", 計(jì)算逃跑路徑時(shí)使用，貓到每一點(diǎn)位置的距離
.子程序 新建游戲
.局部變量 橫向計(jì)次, 整數(shù)型
.局部變量 縱向計(jì)次, 整數(shù)型
.局部變量 位置頂邊, 整數(shù)型
.局部變量 位置左邊, 整數(shù)型
.局部變量 臨時(shí)整數(shù), 整數(shù)型
.局部變量 計(jì)次變量, 整數(shù)型
.局部變量 當(dāng)前位置, 整數(shù)型
' 重置游戲狀態(tài)
.計(jì)次循環(huán)首 (121, 臨時(shí)整數(shù))
  圓點(diǎn)狀態(tài) [臨時(shí)整數(shù)] ＝ 0
.計(jì)次循環(huán)尾 ()
游戲狀態(tài) ＝ 1
貓位置 ＝ 61
清除數(shù)組 (移動(dòng)路徑)
' 畫(huà)出背景
臨時(shí)整數(shù) ＝ 載入圖片 (#圓點(diǎn)白色)
.計(jì)次循環(huán)首 (11, 縱向計(jì)次)
  .計(jì)次循環(huán)首 (11, 橫向計(jì)次)
    位置左邊 ＝ (橫向計(jì)次 － 1) × 48
    .如果真 (縱向計(jì)次 ％ 2 ＝ 0)
      位置左邊 ＝ 位置左邊 ＋ 24
    .如果真結(jié)束
    位置頂邊 ＝ (縱向計(jì)次 － 1) × 40
    畫(huà)板1.畫(huà)圖片 (臨時(shí)整數(shù), 位置左邊, 位置頂邊, , , －取顏色值 (128, 128, 128))
  .計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)尾 ()
卸載圖片 (臨時(shí)整數(shù))
' 畫(huà)出貓
臨時(shí)整數(shù) ＝ 載入圖片 (#圓點(diǎn)貓)
縱向計(jì)次 ＝ (貓位置 － 1) ＼ 11
橫向計(jì)次 ＝ 貓位置 － 縱向計(jì)次 × 11
位置左邊 ＝ (橫向計(jì)次 － 1) × 48
.如果真 (縱向計(jì)次 ％ 2 ＝ 1)
  位置左邊 ＝ 位置左邊 ＋ 24
.如果真結(jié)束
位置頂邊 ＝ 縱向計(jì)次 × 40
畫(huà)板1.畫(huà)圖片 (臨時(shí)整數(shù), 位置左邊, 位置頂邊, , , －取顏色值 (128, 128, 128))
卸載圖片 (臨時(shí)整數(shù))
' 畫(huà)出隨機(jī)9個(gè)×
臨時(shí)整數(shù) ＝ 載入圖片 (#圓點(diǎn)叉)
.判斷循環(huán)首 (計(jì)次變量 ＜ 9)
  置隨機(jī)數(shù)種子 ()
  當(dāng)前位置 ＝ 取隨機(jī)數(shù) (1, 121)
  .如果真 (當(dāng)前位置 ≠ 貓位置 且 圓點(diǎn)狀態(tài) [當(dāng)前位置] ＝ 0)
    計(jì)次變量 ＝ 計(jì)次變量 ＋ 1
    圓點(diǎn)狀態(tài) [當(dāng)前位置] ＝ 2
    縱向計(jì)次 ＝ (當(dāng)前位置 － 1) ＼ 11
    橫向計(jì)次 ＝ 當(dāng)前位置 － 縱向計(jì)次 × 11
    位置左邊 ＝ (橫向計(jì)次 － 1) × 48
    .如果真 (縱向計(jì)次 ％ 2 ＝ 1)
      位置左邊 ＝ 位置左邊 ＋ 24
    .如果真結(jié)束
    位置頂邊 ＝ 縱向計(jì)次 × 40
    畫(huà)板1.畫(huà)圖片 (臨時(shí)整數(shù), 位置左邊, 位置頂邊, , , －取顏色值 (128, 128, 128))
  .如果真結(jié)束
.判斷循環(huán)尾 ()
卸載圖片 (臨時(shí)整數(shù))
.子程序 _畫(huà)板1_鼠標(biāo)左鍵被按下, 邏輯型
.參數(shù) 橫向位置, 整數(shù)型
.參數(shù) 縱向位置, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 縱坐標(biāo), 整數(shù)型
.局部變量 臨時(shí)整數(shù), 整數(shù)型
.局部變量 位置頂邊, 整數(shù)型
.局部變量 位置左邊, 整數(shù)型
.局部變量 位置序號(hào), 整數(shù)型
.如果真 (游戲狀態(tài) ≠ 1)
  返回 ()
.如果真結(jié)束
.如果真 (畫(huà)板1.取點(diǎn) (橫向位置, 縱向位置) ＝ #灰色)
  返回 ()
.如果真結(jié)束
縱坐標(biāo) ＝ 縱向位置 ＼ 40
.如果 (縱坐標(biāo) ％ 2 ＝ 1)
  橫坐標(biāo) ＝ (橫向位置 ＋ 24) ＼ 48 － 1
.否則
  橫坐標(biāo) ＝ 橫向位置 ＼ 48
.如果結(jié)束
' 計(jì)算點(diǎn)擊序號(hào)
位置序號(hào) ＝ 橫坐標(biāo) ＋ 縱坐標(biāo) × 11 ＋ 1
' 判斷是否可以圍墻
.如果真 (位置序號(hào) ＝ 貓位置)
  返回 ()
.如果真結(jié)束
.如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
  返回 ()
.如果真結(jié)束
' 畫(huà)出圍墻
臨時(shí)整數(shù) ＝ 載入圖片 (#圓點(diǎn)墻)
位置左邊 ＝ 橫坐標(biāo) × 48
.如果真 (縱坐標(biāo) ％ 2 ＝ 1)
  位置左邊 ＝ 位置左邊 ＋ 24
.如果真結(jié)束
位置頂邊 ＝ 縱坐標(biāo) × 40
畫(huà)板1.畫(huà)圖片 (臨時(shí)整數(shù), 位置左邊, 位置頂邊, , , )
卸載圖片 (臨時(shí)整數(shù))
' 修改位置狀態(tài)
圓點(diǎn)狀態(tài) [位置序號(hào)] ＝ 1
' 移動(dòng)貓
移動(dòng)貓 ()
' 檢查游戲狀態(tài)
檢查狀態(tài) ()
.子程序 移動(dòng)貓
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 縱坐標(biāo), 整數(shù)型
.局部變量 位置左邊, 整數(shù)型
.局部變量 位置頂邊, 整數(shù)型
.局部變量 臨時(shí)整數(shù), 整數(shù)型
' 尋找逃跑路徑
尋找路徑 ()
' 移動(dòng)路徑
.如果真 (取數(shù)組成員數(shù) (移動(dòng)路徑) ＞ 1 且 游戲狀態(tài) ＝ 1)
  ' 刪除貓
  臨時(shí)整數(shù) ＝ 載入圖片 (#圓點(diǎn)白色)
  縱坐標(biāo) ＝ (貓位置 － 1) ＼ 11
  橫坐標(biāo) ＝ 貓位置 － 縱坐標(biāo) × 11
  位置左邊 ＝ (橫坐標(biāo) － 1) × 48
  .如果真 (縱坐標(biāo) ％ 2 ＝ 1)
    位置左邊 ＝ 位置左邊 ＋ 24
  .如果真結(jié)束
  位置頂邊 ＝ 縱坐標(biāo) × 40
  畫(huà)板1.畫(huà)圖片 (臨時(shí)整數(shù), 位置左邊, 位置頂邊, , , －取顏色值 (128, 128, 128))
  卸載圖片 (臨時(shí)整數(shù))
  ' 移動(dòng)貓位置
  貓位置 ＝ 移動(dòng)路徑 [2]
  刪除成員 (移動(dòng)路徑, 1, )
  ' 畫(huà)出貓
  臨時(shí)整數(shù) ＝ 載入圖片 (#圓點(diǎn)貓)
  縱坐標(biāo) ＝ (貓位置 － 1) ＼ 11
  橫坐標(biāo) ＝ 貓位置 － 縱坐標(biāo) × 11
  位置左邊 ＝ (橫坐標(biāo) － 1) × 48
  .如果真 (縱坐標(biāo) ％ 2 ＝ 1)
    位置左邊 ＝ 位置左邊 ＋ 24
  .如果真結(jié)束
  位置頂邊 ＝ 縱坐標(biāo) × 40
  畫(huà)板1.畫(huà)圖片 (臨時(shí)整數(shù), 位置左邊, 位置頂邊, , , －取顏色值 (128, 128, 128))
  卸載圖片 (臨時(shí)整數(shù))
.如果真結(jié)束
.子程序 檢查路徑, , , 無(wú)用
.局部變量 計(jì)次變量, 整數(shù)型
.局部變量 是否可用, 邏輯型
.如果 (取數(shù)組成員數(shù) (移動(dòng)路徑) ＝ 0)
  尋找路徑 ()
.否則
  ' 判斷現(xiàn)有路徑是否還可用
  是否可用 ＝ 真
  .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (移動(dòng)路徑), 計(jì)次變量)
    .如果真 (圓點(diǎn)狀態(tài) [移動(dòng)路徑 [計(jì)次變量]] ＞ 0)
      是否可用 ＝ 假
      跳出循環(huán) ()
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
  .如果真 (是否可用 ＝ 假)
    尋找路徑 ()
  .如果真結(jié)束
.如果結(jié)束
.子程序 尋找路徑
.局部變量 當(dāng)前路徑, 整數(shù)型, , "0"
.局部變量 最短路徑, 整數(shù)型, , "0"
.局部變量 邊緣位置, 整數(shù)型, , "40"
.局部變量 計(jì)次變量, 整數(shù)型
.局部變量 是否完成, 邏輯型
.局部變量 臨時(shí)文本, 文本型
.局部變量 出口位置, 整數(shù)型
清除數(shù)組 (移動(dòng)路徑)
' 計(jì)算邊緣位置
.計(jì)次循環(huán)首 (11, 計(jì)次變量)
  邊緣位置 [計(jì)次變量] ＝ 計(jì)次變量
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)首 (9, 計(jì)次變量)
  邊緣位置 [計(jì)次變量 ＋ 11] ＝ 計(jì)次變量 × 11 ＋ 1
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)首 (9, 計(jì)次變量)
  邊緣位置 [計(jì)次變量 ＋ 20] ＝ (計(jì)次變量 ＋ 1) × 11
.計(jì)次循環(huán)尾 ()
.計(jì)次循環(huán)首 (11, 計(jì)次變量)
  邊緣位置 [計(jì)次變量 ＋ 29] ＝ 計(jì)次變量 ＋ 110
.計(jì)次循環(huán)尾 ()
' 重置步數(shù)
.計(jì)次循環(huán)首 (121, 計(jì)次變量)
  圓點(diǎn)步數(shù) [計(jì)次變量] ＝ 99
.計(jì)次循環(huán)尾 ()
圓點(diǎn)步數(shù) [貓位置] ＝ 0
' 遞歸計(jì)算貓位置到每個(gè)位置的步數(shù)
計(jì)算步數(shù) (貓位置)
' 尋找最短的出口位置
.計(jì)次循環(huán)首 (40, 計(jì)次變量)
  .如果真 (圓點(diǎn)步數(shù) [邊緣位置 [計(jì)次變量]] ＞ 1)
    .如果 (出口位置 ＝ 0)
      出口位置 ＝ 邊緣位置 [計(jì)次變量]
    .否則
      .如果真 (圓點(diǎn)步數(shù) [邊緣位置 [計(jì)次變量]] ＜ 圓點(diǎn)步數(shù) [出口位置])
        出口位置 ＝ 邊緣位置 [計(jì)次變量]
      .如果真結(jié)束
    .如果結(jié)束
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (出口位置 ＝ 0)
  返回 ()
.如果真結(jié)束
' 反向遞歸生成移動(dòng)路徑
加入成員 (移動(dòng)路徑, 出口位置)
生成路徑 (出口位置)
.子程序 生成路徑
.參數(shù) 當(dāng)前位置, 整數(shù)型
.局部變量 當(dāng)前步數(shù), 整數(shù)型
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 縱坐標(biāo), 整數(shù)型
.局部變量 周?chē)恢? 整數(shù)型, , "6"
.局部變量 下個(gè)位置, 整數(shù)型
.局部變量 計(jì)次變量, 整數(shù)型
當(dāng)前步數(shù) ＝ 圓點(diǎn)步數(shù) [當(dāng)前位置]
.如果真 (當(dāng)前步數(shù) ＝ 1)
  插入成員 (移動(dòng)路徑, 1, 貓位置)
  返回 ()
.如果真結(jié)束
縱坐標(biāo) ＝ (當(dāng)前位置 － 1) ＼ 11
橫坐標(biāo) ＝ 當(dāng)前位置 － 縱坐標(biāo) × 11 － 1
' 計(jì)算周?chē)奈恢?
' 查找左上角
.如果真 (縱坐標(biāo) ＞ 0)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    周?chē)恢?[1] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .否則
    .如果真 (橫坐標(biāo) ＞ 0)
      周?chē)恢?[1] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo)
    .如果真結(jié)束
  .如果結(jié)束
.如果真結(jié)束
' 查找右上角
.如果真 (縱坐標(biāo) ＞ 0)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    .如果真 (橫坐標(biāo) ＜ 10)
      周?chē)恢?[2] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 2
    .如果真結(jié)束
  .否則
    周?chē)恢?[2] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .如果結(jié)束
.如果真結(jié)束
' 查找左邊
.如果真 (橫坐標(biāo) ＞ 0)
  周?chē)恢?[3] ＝ 縱坐標(biāo) × 11 ＋ 橫坐標(biāo)
.如果真結(jié)束
' 查找右邊
.如果真 (橫坐標(biāo) ＜ 10)
  周?chē)恢?[4] ＝ 縱坐標(biāo) × 11 ＋ 橫坐標(biāo) ＋ 2
.如果真結(jié)束
' 查找左下角
.如果真 (縱坐標(biāo) ＜ 10)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    周?chē)恢?[5] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .否則
    .如果真 (橫坐標(biāo) ＞ 0)
      周?chē)恢?[5] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo)
    .如果真結(jié)束
  .如果結(jié)束
.如果真結(jié)束
' 查找右下角
.如果真 (縱坐標(biāo) ＜ 10)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    .如果真 (橫坐標(biāo) ＜ 10)
      周?chē)恢?[6] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 2
    .如果真結(jié)束
  .否則
    周?chē)恢?[6] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .如果結(jié)束
.如果真結(jié)束
' 尋找下個(gè)位置
.計(jì)次循環(huán)首 (6, 計(jì)次變量)
  .如果真 (周?chē)恢?[計(jì)次變量] ＞ 0)
    .如果真 (圓點(diǎn)步數(shù) [周?chē)恢?[計(jì)次變量]] ＝ 當(dāng)前步數(shù) － 1)
      下個(gè)位置 ＝ 周?chē)恢?[計(jì)次變量]
      跳出循環(huán) ()
    .如果真結(jié)束
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
' 如果找不到路徑，游戲結(jié)束
.如果真 (下個(gè)位置 ＝ 0)
  當(dāng)前步數(shù) ＝ 0
  .計(jì)次循環(huán)首 (121, 計(jì)次變量)
    .如果真 (圓點(diǎn)狀態(tài) [計(jì)次變量] ＝ 1)
      當(dāng)前步數(shù) ＝ 當(dāng)前步數(shù) ＋ 1
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
  信息框 (“貓被圍住了！一共用了” ＋ 到文本 (當(dāng)前步數(shù)) ＋ “步。”, #信息圖標(biāo), “游戲結(jié)束”)
  游戲狀態(tài) ＝ 2
  返回 ()
.如果真結(jié)束
' 加入數(shù)組
插入成員 (移動(dòng)路徑, 1, 下個(gè)位置)
' 遞歸調(diào)用
生成路徑 (下個(gè)位置)
.子程序 計(jì)算步數(shù)
.參數(shù) 當(dāng)前位置, 整數(shù)型
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 縱坐標(biāo), 整數(shù)型
.局部變量 周?chē)恢? 整數(shù)型, , "6"
.局部變量 計(jì)次變量, 整數(shù)型
縱坐標(biāo) ＝ (當(dāng)前位置 － 1) ＼ 11
橫坐標(biāo) ＝ 當(dāng)前位置 － 縱坐標(biāo) × 11 － 1
' 計(jì)算周?chē)奈恢?
' 查找左上角
.如果真 (縱坐標(biāo) ＞ 0)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    周?chē)恢?[1] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .否則
    .如果真 (橫坐標(biāo) ＞ 0)
      周?chē)恢?[1] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo)
    .如果真結(jié)束
  .如果結(jié)束
.如果真結(jié)束
' 查找右上角
.如果真 (縱坐標(biāo) ＞ 0)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    .如果真 (橫坐標(biāo) ＜ 10)
      周?chē)恢?[2] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 2
    .如果真結(jié)束
  .否則
    周?chē)恢?[2] ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .如果結(jié)束
.如果真結(jié)束
' 查找左邊
.如果真 (橫坐標(biāo) ＞ 0)
  周?chē)恢?[3] ＝ 縱坐標(biāo) × 11 ＋ 橫坐標(biāo)
.如果真結(jié)束
' 查找右邊
.如果真 (橫坐標(biāo) ＜ 10)
  周?chē)恢?[4] ＝ 縱坐標(biāo) × 11 ＋ 橫坐標(biāo) ＋ 2
.如果真結(jié)束
' 查找左下角
.如果真 (縱坐標(biāo) ＜ 10)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    周?chē)恢?[5] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .否則
    .如果真 (橫坐標(biāo) ＞ 0)
      周?chē)恢?[5] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo)
    .如果真結(jié)束
  .如果結(jié)束
.如果真結(jié)束
' 查找右下角
.如果真 (縱坐標(biāo) ＜ 10)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    .如果真 (橫坐標(biāo) ＜ 10)
      周?chē)恢?[6] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 2
    .如果真結(jié)束
  .否則
    周?chē)恢?[6] ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 1
  .如果結(jié)束
.如果真結(jié)束
' 設(shè)置周?chē)綌?shù)
.計(jì)次循環(huán)首 (6, 計(jì)次變量)
  .如果真 (周?chē)恢?[計(jì)次變量] ＞ 0)
    .如果 (圓點(diǎn)狀態(tài) [周?chē)恢?[計(jì)次變量]] ＝ 0)
      .如果 (圓點(diǎn)步數(shù) [周?chē)恢?[計(jì)次變量]] ＞ 圓點(diǎn)步數(shù) [當(dāng)前位置] ＋ 1)
        圓點(diǎn)步數(shù) [周?chē)恢?[計(jì)次變量]] ＝ 圓點(diǎn)步數(shù) [當(dāng)前位置] ＋ 1
      .否則
        周?chē)恢?[計(jì)次變量] ＝ 0
      .如果結(jié)束
    .否則
      圓點(diǎn)步數(shù) [周?chē)恢?[計(jì)次變量]] ＝ -1
      周?chē)恢?[計(jì)次變量] ＝ 0
    .如果結(jié)束
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
' 遞歸調(diào)用
.計(jì)次循環(huán)首 (6, 計(jì)次變量)
  .如果真 (周?chē)恢?[計(jì)次變量] ＞ 0)
    計(jì)算步數(shù) (周?chē)恢?[計(jì)次變量])
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.子程序 檢查狀態(tài)
.局部變量 橫坐標(biāo), 整數(shù)型
.局部變量 縱坐標(biāo), 整數(shù)型
.局部變量 位置序號(hào), 整數(shù)型
.局部變量 缺口數(shù)量, 整數(shù)型
.局部變量 圍墻數(shù)量, 整數(shù)型
.局部變量 計(jì)次變量, 整數(shù)型
縱坐標(biāo) ＝ (貓位置 － 1) ＼ 11
橫坐標(biāo) ＝ 貓位置 － 縱坐標(biāo) × 11 － 1
' 查找左上角
.如果 (縱坐標(biāo) ＞ 0)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    位置序號(hào) ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 1
    .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
      圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
    .如果真結(jié)束
  .否則
    .如果 (橫坐標(biāo) ＞ 0)
      位置序號(hào) ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo)
      .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
        圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
      .如果真結(jié)束
    .否則
      缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
    .如果結(jié)束
  .如果結(jié)束
.否則
  缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
.如果結(jié)束
' 查找右上角
.如果 (縱坐標(biāo) ＞ 0)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    .如果 (橫坐標(biāo) ＜ 10)
      位置序號(hào) ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 2
      .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
        圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
      .如果真結(jié)束
    .否則
      缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
    .如果結(jié)束
  .否則
    位置序號(hào) ＝ (縱坐標(biāo) － 1) × 11 ＋ 橫坐標(biāo) ＋ 1
    .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
      圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
    .如果真結(jié)束
  .如果結(jié)束
.否則
  缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
.如果結(jié)束
' 查找左邊
.如果 (橫坐標(biāo) ＞ 0)
  位置序號(hào) ＝ 縱坐標(biāo) × 11 ＋ 橫坐標(biāo)
  .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
    圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
  .如果真結(jié)束
.否則
  缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
.如果結(jié)束
' 查找右邊
.如果 (橫坐標(biāo) ＜ 10)
  位置序號(hào) ＝ 縱坐標(biāo) × 11 ＋ 橫坐標(biāo) ＋ 2
  .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
    圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
  .如果真結(jié)束
.否則
  缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
.如果結(jié)束
' 查找左下角
.如果 (縱坐標(biāo) ＜ 10)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    位置序號(hào) ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 1
    .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
      圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
    .如果真結(jié)束
  .否則
    .如果 (橫坐標(biāo) ＞ 0)
      位置序號(hào) ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo)
      .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
        圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
      .如果真結(jié)束
    .否則
      缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
    .如果結(jié)束
  .如果結(jié)束
.否則
  缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
.如果結(jié)束
' 查找右下角
.如果 (縱坐標(biāo) ＜ 10)
  .如果 (縱坐標(biāo) ％ 2 ＝ 1)
    .如果 (橫坐標(biāo) ＜ 10)
      位置序號(hào) ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 2
      .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
        圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
      .如果真結(jié)束
    .否則
      缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
    .如果結(jié)束
  .否則
    位置序號(hào) ＝ (縱坐標(biāo) ＋ 1) × 11 ＋ 橫坐標(biāo) ＋ 1
    .如果真 (圓點(diǎn)狀態(tài) [位置序號(hào)] ＞ 0)
      圍墻數(shù)量 ＝ 圍墻數(shù)量 ＋ 1
    .如果真結(jié)束
  .如果結(jié)束
.否則
  缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
.如果結(jié)束
.如果真 (缺口數(shù)量 ＞ 0)
  信息框 (“貓?zhí)优芰?！? #信息圖標(biāo), “游戲結(jié)束”)
  游戲狀態(tài) ＝ 2
  返回 ()
.如果真結(jié)束
.如果真 (圍墻數(shù)量 ＞ 5)
  .計(jì)次循環(huán)首 (121, 計(jì)次變量)
    .如果真 (圓點(diǎn)狀態(tài) [計(jì)次變量] ＝ 1)
      缺口數(shù)量 ＝ 缺口數(shù)量 ＋ 1
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
  信息框 (“貓被圍住了！一共用了” ＋ 到文本 (缺口數(shù)量) ＋ “步?！? #信息圖標(biāo), “游戲結(jié)束”)
  游戲狀態(tài) ＝ 2
  返回 ()
.如果真結(jié)束
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
_啟動(dòng)窗口.寬度 ＝ _啟動(dòng)窗口.寬度 ＋ 544 － _啟動(dòng)窗口.取用戶區(qū)寬度 ()
_啟動(dòng)窗口.高度 ＝ _啟動(dòng)窗口.高度 ＋ 440 － _啟動(dòng)窗口.取用戶區(qū)高度 ()
.子程序 _菜單開(kāi)始游戲_被選擇
新建游戲 ()