批量打乱文件数据工具

.如果真 (PathIsDirectoryA (目录名))
.如果真 (取文本右边 (目录名, 1) ≠ “\”)
目录名 ＝ 目录名 ＋ “\”
.如果真结束
文件名 ＝ 寻找文件 (目录名 ＋ “*.*”, )
.判断循环首 (文件名 ≠ “”)
处理事件 ()
后缀名 ＝ 取后缀名 (文件名)
.如果真 (后缀名 ＝ “fnr” 或 后缀名 ＝ “fne” 或 后缀名 ＝ “dll” 或 后缀名 ＝ “exe”)
返回值 ＝ 打乱支持库 (目录名 ＋ 文件名, ELIB2 ＋ 取文件名 (文件名))
' 0 成功，-1 所提供数据无效，-2 数据中没有需要转换的部分，-3 无法找到转换代码插入空间，-4 文件写出失败
.判断开始 (返回值 ＝ 0)
输出调试文本 (文件名 ＋ “打乱成功！”)
.判断 (返回值 ＝ -1)
输出调试文本 (文件名 ＋ “所提供数据无效！”)
.判断 (返回值 ＝ -2)
输出调试文本 (文件名 ＋ “数据中没有需要转换的部分！”)
.判断 (返回值 ＝ -3)
输出调试文本 (文件名 ＋ “无法找到转换代码插入空间！”)
.判断 (返回值 ＝ -4)
输出调试文本 (文件名 ＋ “文件写出失败！”)
.默认

.判断结束

.如果真结束
文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
' ----------------------------以下这段代码是寻找下一个文件夹------------------------------------------
文件名 ＝ 寻找文件 (目录名 ＋ “*.*”, #子目录) ' 寻找文件夹
.判断循环首 (文件名 ≠ “”)
.如果真 (取文本左边 (文件名, 1) ≠ “.”) ' “.”判断是文件夹就寻找这个文件夹的所有文件和文件夹。
搜索文件 (目录名 ＋ 文件名)
.如果真结束
文件名 ＝ 寻找文件 (, #子目录)
.判断循环尾 ()