.参数 窗口句柄, 整数型
 .参数 应用程序标题, 文本型
 .参数 其他信息, 文本型
 .参数 图标句柄, 整数型

.程序集 窗口程序集_启动窗口
.程序集变量 猫位置, 整数型
.程序集变量 游戏状态, 整数型, , , 0未開始1正在游戏2游戏结束
.程序集变量 移动路径, 整数型, , "0", 猫的逃跑路径
.程序集变量 圆点步数, 整数型, , "121", 计算逃跑路径时使用猫到每一点位置的距离
.局部变量 横向计次, 整数型
.局部变量 纵向计次, 整数型
.局部变量 位置顶边, 整数型
.局部变量 位置左边, 整数型
.局部变量 临时整数, 整数型
.局部变量 计佽变量, 整数型
.局部变量 当前位置, 整数型
 圆点状态 [临时整数] ＝ 0
清除数组 (移动路径)
临时整数 ＝ 载入图片 (#圆点白色)
.计次循环首 (11, 纵向计次)
 .计次循环艏 (11, 横向计次)
 位置左边 ＝ 位置左边 ＋ 24
卸载图片 (临时整数)
临时整数 ＝ 载入图片 (#圆点猫)
横向计次 ＝ 猫位置 － 纵向计次 × 11
 位置左边 ＝ 位置左边 ＋ 24
位置顶边 ＝ 纵向计次 × 40
卸载图片 (临时整数)
临时整数 ＝ 载入图片 (#圆点叉)
.判断循环首 (计次变量 ＜ 9)
 .如果真 (当前位置 ≠ 猫位置 且 圆点状态 [当前位置] ＝ 0)
 計次变量 ＝ 计次变量 ＋ 1
 圆点状态 [当前位置] ＝ 2
 横向计次 ＝ 当前位置 － 纵向计次 × 11
 位置左边 ＝ 位置左边 ＋ 24
 位置顶边 ＝ 纵向计次 × 40
卸载图片 (临时整数)
.子程序 _画板1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 横坐标, 整数型
.局部变量 纵唑标, 整数型
.局部变量 临时整数, 整数型
.局部变量 位置顶边, 整数型
.局部变量 位置左边, 整数型
.局部变量 位置序号, 整数型
.如果真 (游戏状态 ≠ 1)
.如果真 (畫板1.取点 (横向位置, 纵向位置) ＝ #灰色)
纵坐标 ＝ 纵向位置 ＼ 40
 横坐标 ＝ 横向位置 ＼ 48
位置序号 ＝ 横坐标 ＋ 纵坐标 × 11 ＋ 1
.如果真 (位置序号 ＝ 猫位置)
.如果嫃 (圆点状态 [位置序号] ＞ 0)
临时整数 ＝ 载入图片 (#圆点墙)
位置左边 ＝ 横坐标 × 48
 位置左边 ＝ 位置左边 ＋ 24
位置顶边 ＝ 纵坐标 × 40
画板1.画图片 (临时整数, 位置左边, 位置顶边, , , )
卸载图片 (临时整数)
圆点状态 [位置序号] ＝ 1
.局部变量 横坐标, 整数型
.局部变量 纵坐标, 整数型
.局部变量 位置左边, 整数型
.局部变量 位置顶边, 整数型
.局部变量 临时整数, 整数型
.如果真 (取数组成员数 (移动路径) ＞ 1 且 游戏状态 ＝ 1)
 临时整数 ＝ 载入图片 (#圆点白色)
 横坐标 ＝ 猫位置 － 纵坐標 × 11
 位置左边 ＝ 位置左边 ＋ 24
 位置顶边 ＝ 纵坐标 × 40
 卸载图片 (临时整数)
 猫位置 ＝ 移动路径 [2]
 临时整数 ＝ 载入图片 (#圆点猫)
 横坐标 ＝ 猫位置 － 纵坐标 × 11
 位置左边 ＝ 位置左边 ＋ 24
 位置顶边 ＝ 纵坐标 × 40
 卸载图片 (临时整数)
.子程序 检查路径, , , 无用
.局部变量 计次变量, 整数型
.局部变量 是否可用, 逻辑型
.如果 (取数组成员数 (移动路径) ＝ 0)
 ' 判断现有路径是否还可用
 .计次循环首 (取数组成员数 (移动路径), 计次变量)
 .如果真 (圆点状态 [移动路径 [计次变量]] ＞ 0)
 .如果嫃 (是否可用 ＝ 假)
.局部变量 计次变量, 整数型
.局部变量 是否完成, 逻辑型
.局部变量 临时文本, 文本型
.局部变量 出口位置, 整数型
清除数组 (移动路径)
.计佽循环首 (11, 计次变量)
 边缘位置 [计次变量] ＝ 计次变量
.计次循环首 (9, 计次变量)
.计次循环首 (9, 计次变量)
.计次循环首 (11, 计次变量)
 边缘位置 [计次变量 ＋ 29] ＝ 计次變量 ＋ 110
 圆点步数 [计次变量] ＝ 99
圆点步数 [猫位置] ＝ 0
' 递归计算猫位置到每个位置的步数
' 寻找最短的出口位置
.计次循环首 (40, 计次变量)
 .如果真 (圆点步数 [邊缘位置 [计次变量]] ＞ 1)
 出口位置 ＝ 边缘位置 [计次变量]
 .如果真 (圆点步数 [边缘位置 [计次变量]] ＜ 圆点步数 [出口位置])
 出口位置 ＝ 边缘位置 [计次变量]
.如果真 (出口位置 ＝ 0)
' 反向递归生成移动路径
加入成员 (移动路径, 出口位置)
生成路径 (出口位置)
.参数 当前位置, 整数型
.局部变量 当前步数, 整数型
.局部变量 横坐标, 整数型
.局部变量 纵坐标, 整数型
.局部变量 下个位置, 整数型
.局部变量 计次变量, 整数型
当前步数 ＝ 圆点步数 [当前位置]
.如果真 (当前步数 ＝ 1)
 插入成员 (移动路径, 1, 猫位置)
横坐标 ＝ 当前位置 － 纵坐标 × 11 － 1
.计次循环首 (6, 计次变量)
 .如果真 (周围位置 [计次变量] ＞ 0)
 .如果真 (圆点步数 [周围位置 [计次变量]] ＝ 当前步数 － 1)
 下个位置 ＝ 周围位置 [计次变量]
' 如果找不到路径，游戏结束
.如果真 (下个位置 ＝ 0)
 .如果真 (圆点状态 [计次变量] ＝ 1)
 当前步数 ＝ 当前步數 ＋ 1
 信息框 (“猫被围住了！一共用了” ＋ 到文本 (当前步数) ＋ “步”, #信息图标, “游戏结束”)
插入成员 (移动路径, 1, 下个位置)
生成路径 (下个位置)
.參数 当前位置, 整数型
.局部变量 横坐标, 整数型
.局部变量 纵坐标, 整数型
.局部变量 计次变量, 整数型
横坐标 ＝ 当前位置 － 纵坐标 × 11 － 1
.计次循环首 (6, 计佽变量)
 .如果真 (周围位置 [计次变量] ＞ 0)
 .如果 (圆点状态 [周围位置 [计次变量]] ＝ 0)
 .如果 (圆点步数 [周围位置 [计次变量]] ＞ 圆点步数 [当前位置] ＋ 1)
 圆点步数 [周围位置 [计次变量]] ＝ 圆点步数 [当前位置] ＋ 1
 周围位置 [计次变量] ＝ 0
 圆点步数 [周围位置 [计次变量]] ＝ -1
 周围位置 [计次变量] ＝ 0
.计次循环首 (6, 计次变量)
 .如果真 (周圍位置 [计次变量] ＞ 0)
 计算步数 (周围位置 [计次变量])
.局部变量 横坐标, 整数型
.局部变量 纵坐标, 整数型
.局部变量 位置序号, 整数型
.局部变量 缺口数量, 整數型
.局部变量 围墙数量, 整数型
.局部变量 计次变量, 整数型
横坐标 ＝ 猫位置 － 纵坐标 × 11 － 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙數量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 位置序号 ＝ 纵坐标 × 11 ＋ 横坐标
 .如果嫃 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 位置序号 ＝ 纵坐标 × 11 ＋ 横坐标 ＋ 2
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
 .如果真 (圆点状态 [位置序号] ＞ 0)
 围墙数量 ＝ 围墙数量 ＋ 1
 缺口数量 ＝ 缺口数量 ＋ 1
.如果真 (缺口数量 ＞ 0)
 信息框 (“猫逃跑了！”, #信息图标, “游戏结束”)
.如果真 (围墙数量 ＞ 5)
 .洳果真 (圆点状态 [计次变量] ＝ 1)
 缺口数量 ＝ 缺口数量 ＋ 1
 信息框 (“猫被围住了！一共用了” ＋ 到文本 (缺口数量) ＋ “步。”, #信息图标, “游戏结束”)
.孓程序 __启动窗口_创建完毕
_启动窗口.宽度 ＝ _启动窗口.宽度 ＋ 544 － _启动窗口.取用户区宽度 ()
_启动窗口.高度 ＝ _启动窗口.高度 ＋ 440 － _启动窗口.取用户区高喥 ()
.子程序 _菜单开始游戏_被选择