植物大战僵尸游戏资源解包工具

文件总长度 ＝ 取文件长度 (内存文件号)
移动读写位置 (内存文件号, , 8) ' 文件头（跳过之）
结束标记 ＝ 128
' =======================文件结构部分==========================
.判断循环首 (取读写位置 (内存文件号) ＜ 文件总长度)
读入数据 (内存文件号, 字节型)
.如果真 (字节型 ＝ 结束标记)
跳出循环 ()
.如果真结束
读入数据 (内存文件号, 文件名长度)
文件名 ＝ 读入字节集 (内存文件号, 文件名长度)
读入数据 (内存文件号, 文件长度)
读入数据 (内存文件号, 文件时间属性)
宝开PAK结构.文本型 ＝ 取字节集数据 (文件名, 10, )
宝开PAK结构.整数型 ＝ 文件长度
加入成员 (宝开PAK结构_数组, 宝开PAK结构)
.判断循环尾 ()
' =======================文件数据部分（未完善，缺少创建目录和写出文件）==========================
.判断循环首 (取数组成员数 (宝开PAK结构_数组) ≠ 文件数量)
文件数量 ＝ 文件数量 ＋ 1
宝开PAK结构_数组 [文件数量].字节集 ＝ 读入字节集 (内存文件号, 宝开PAK结构_数组 [文件数量].整数型)
调试输出 (取字节集左边 (宝开PAK结构_数组 [文件数量].字节集, 8), 宝开PAK结构_数组 [文件数量].文本型, 宝开PAK结构_数组 [文件数量].整数型)
.判断循环尾 ()