大漠插件注册卡注问题 - 精易论坛

子程序名	返回值类型	公开	备注
注册	文本型		一天注册一次

变量名	类型	静态	数组	备注
zj	大漠类库
版本号	文本型
VIP	整数型
结果	文本型

如果真 (文件是否存在 (“C:\jbcj”) ＝假)

创建目录 (“C:\jbcj”)

如果真 (文件是否存在 (“C:\jbcj\dm.dll”) ＝假)

写到文件 (“C:\jbcj\dm.dll”, #d )

如果真 (文件是否存在 (“C:\jbcj\DmReg.dll”) ＝假)

写到文件 (“C:\jbcj\DmReg.dll”, #dd )

判断 (读配置项 (“C:\jbcj\zcsj.ini”, “注册时间”, “时间”, ) ＝年月日 ())

SetDllPathA (“C:\jbcj\dm.dll”, 0)

返回 (“注册成功”)

SetDllPathA (“C:\jbcj\dm.dll”, 0)

zj.创建 ()

版本号＝ “版本号 ” ＋ zj.Ver ()

VIP ＝ zj.RegEx (“你自己注册码”, “你自己附加码”, “121.204.252.143|123.129.231.44|121.204.253.161|123.129.231.45|125.77.165.62|123.129.231.85|125.77.165.131|123.129.231.86”)

zj.释放 ()

如果真 (VIP判断 (VIP) ＝ “VIP注册成功”)

写配置项 (“C:\jbcj\zcsj.ini”, “注册时间”, “时间”, 年月日 ())

返回 (版本号＋ “ ” ＋ VIP判断 (VIP))

子程序名	返回值类型	公开	备注
VIP判断	文本型		判断VIP注册返回值
参数名	类型	参考	可空	数组	备注
注册VIP返回值	整数型

判断 (注册VIP返回值＝ 1)

返回 (“VIP注册成功”)

判断 (注册VIP返回值＝ -1)

返回 (“无法连接网络”)

判断 (注册VIP返回值＝ -2)

返回 (“进程没有以管理员方式运行”)

判断 (注册VIP返回值＝ 0)

返回 (“失败”)

判断 (注册VIP返回值＝ 2)

返回 (“余额不足”)

判断 (注册VIP返回值＝ 3)

返回 (“绑定了本机器，但是账户余额不足50元”)

判断 (注册VIP返回值＝ 4)

返回 (“注册码错误”)

判断 (注册VIP返回值＝ 5)

返回 (“你的机器或者IP在黑名单列表中或者不在白名单列表中”)

判断 (注册VIP返回值＝ 6)

返回 (“非法使用插件”)

判断 (注册VIP返回值＝ 7)

返回 (“你的帐号因为非法使用被封禁”)

判断 (注册VIP返回值＝ 8)

返回 (“附加码不在你设置的附加白名单中”)

判断 (注册VIP返回值＝ 77)

返回 (“机器码或者IP因为非法使用，而被封禁”)

判断 (注册VIP返回值＝ 777)

返回 (“同一个机器码注册次数超过了服务器限制,被暂时封禁. 请登录后台，插件今日详细消费记录里，相应的机器码是否有次数异常，并立刻优化解决”)

判断 (注册VIP返回值＝ -8)

返回 (“版本附加信息长度超过了20”)

判断 (注册VIP返回值＝ -9)

返回 (“版本附加信息里包含了非法字母”)

判断 (注册VIP返回值＝ -10)

返回 (“非法的参数ip”)

返回 (“”)

子程序名	返回值类型	公开	备注
年月日	文本型		取年月日时间

变量名	类型	静态	数组	备注
注册时间	日期时间型

注册时间＝取现行时间 ()
返回 (到文本 (取年份 (注册时间)) ＋ “-” ＋到文本 (取月份 (注册时间)) ＋ “-” ＋到文本 (取日 (注册时间)))