.版本 2 .支持库 spec .支持库 eAPI .程序集 窗口程序集_启动窗口 .程序集变量 授权文件, 文本型 .程序集变量 授权数组, 文本型, , "0" .程序集变量 本机IP, 文本型 .程序集变量 授权IP, 文本型 .程序集变量 授权时间, 文本型 .程序集变量 本地时间, 文本型 .子程序 __启动窗口_创建完毕, , , ' 本源码来自三叶资源网(www.sanye.cx) .局部变量 加密文件, 文本型 .如果真 (文件是否存在 (取运行目录 () ＋ “\授权文件.dll”) ＝ 真) 授权文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\授权文件.dll”)) 授权数组 ＝ 分割文本 (授权文件, #换行符, ) 授权IP ＝ 编码_RC4解密 (授权数组 [1], “5556698cdd..52”) 授权时间 ＝ 编码_RC4解密 (授权数组 [2], “54dd55..5488512”) .如果真结束 调试输出 (授权IP, 授权时间) 本机IP ＝ 取IP地址 () ' 本源码来自三叶资源网(www.sanye.cx) 调试输出 (本机IP, 取时间 ()) 组合框_授权IP.内容 ＝ 本机IP .如果 (本机IP ≠ 授权IP) 标签3.标题 ＝ “请确认授权IP后操作” .否则 标签3.标题 ＝ 授权时间 授权时间 ＝ 文本区分_取数字 (授权时间) 本地时间 ＝ 文本区分_取数字 (取时间 ()) 调试输出 (授权时间, 本地时间) .如果真 (到整数 (授权时间) ＝ 到整数 (本地时间)) 加密文件 ＝ 到文本 (编码_RC4加密 (“授权文件已到期”, “dsf542221g44.5df4g5.5df”)) 写到文件 (“C:\Software maturity.ini”, 到字节集 (加密文件)) 信息框 (“软件授权已到期”, 0, , ) 结束 () .如果真结束 .如果真 (文件是否存在 (“C:\Software maturity.ini”) ＝ 真) 删除文件 (“C:\Software maturity.ini”) .如果真结束 .如果结束 .子程序 __启动窗口_首次激活 .局部变量 文件判断, 文本型 .局部变量 文件读入, 文本型 .如果真 (文件是否存在 (“C:\Software maturity.ini”) ＝ 真) 文件读入 ＝ 到文本 (读入文件 (“C:\Software maturity.ini”)) 文件判断 ＝ 编码_RC4解密 (文件读入, “dsf542221g44.5df4g5.5df”) 信息框 (“软件授权已到期”, 0, , ) 结束 () 调试输出 (文件判断) .如果真结束 .子程序 _按钮1_被单击 .如果真 (本机IP ≠ 授权IP) 信息框 (本机IP ＋ “，请确认授权IP后操作”, #警告图标 ＋ #确认钮, “提示：”, ) 返回 () .如果真结束 载入 (窗口1, , 假) 销毁 ()