程序加密配置项模块

.如果真 (寻找文本 (参数_配置文件名, “\”, , 假) ＝ -1)
参数_配置文件名 ＝ 取特定目录 (9) ＋ “\” ＋ 参数_配置文件名
.如果真结束
参数_配置文件名 ＝ 子文本替换 (参数_配置文件名, “\\”, “\”, , , 真)
局部_文件号 ＝ 打开加密文件 (参数_配置文件名, #读入, , 参数_文件密码, ) ' 用读文本行的方式来操作配置文件。配置文件小节一般用[]括起来。配置文件项目均以：项目= 项目值 的形式保存。读取小节，然后读取小节后面几行文本，以“=”分隔，即可取得项目名称及项目值。下同。
.如果真 (局部_文件号 ＝ 0) ' 打开失败
返回 (参数_默认文本)
.如果真结束
.判断循环首 (是否在文件尾 (局部_文件号, 真) ＝ 假)
局部_读取内容 ＝ 读入一行 (局部_文件号)
.如果真 (到大写 (局部_读取内容) ＝ 到大写 (“[” ＋ 参数_配置节名 ＋ “]”)) ' 判断是否小节名
跳出循环 ()
.如果真结束

.判断循环尾 ()
.判断循环首 (是否在文件尾 (局部_文件号, 真) ＝ 假) ' 循环读取，直到所读文本行中，包含指定项目名称。
局部_读取内容 ＝ 读入一行 (局部_文件号)
.如果真 (取文本左边 (删首尾空 (局部_读取内容), 1) ＝ “[” 且 取文本右边 (删首尾空 (局部_读取内容), 1) ＝ “]”) ' 如果读到下一个小节，则跳出循环。
跳出循环 ()
.如果真结束
.如果真 (寻找文本 (局部_读取内容, “=”, , 假) ≠ -1)
局部_取出内容 ＝ 分割文本 (局部_读取内容, “=”, ) ' 分割项目名称与项目值。
.如果真 (取数组成员数 (局部_取出内容) ≥ 2)
.如果真 (删首尾空 (局部_取出内容 [1]) ＝ 参数_配置项名)
关闭文件 (局部_文件号)
.如果真 (删首尾空 (取文本右边 (局部_读取内容, 取文本长度 (局部_读取内容) － 寻找文本 (局部_读取内容, “=”, , 假))) ＝ “”)
返回 (参数_默认文本)
.如果真结束
返回 (取文本右边 (局部_读取内容, 取文本长度 (局部_读取内容) － 寻找文本 (局部_读取内容, “=”, , 假)))