程序注册序列号生成器

文件内容 ＝ 读入文件 (文件)
.如果真 (寻找字节集 (文件内容, 到字节集 (“ ~”), ) ＝ -1)
信息框 (“文件格式错误。”, #错误图标, “错误”)
返回 (“0|0|0”)
.如果真结束
字节集组 ＝ 分割字节集 (文件内容, 到字节集 (“ ~”), )
文本 ＝ 到文本 (秘密 (字节集组 [2], 到文本 (字节集组 [1]), 0))
.如果真 (寻找文本 (文本, “|”, , 假) ＝ -1)
信息框 (“文件格式错误。”, #错误图标, “错误”)
返回 (“0|0|0”)
.如果真结束
文本组 ＝ 分割文本 (文本, “|”, )
返回 (文本组 [取数组成员数 (文本组) － 2] ＋ “|” ＋ 文本组 [取数组成员数 (文本组) － 1] ＋ “|” ＋ 文本组 [取数组成员数 (文本组)])