|
发表于 2013-11-29 11:12:21
|
显示全部楼层
四川省眉山市
.版本 2
.子程序 __启动窗口_创建完毕
.局部变量 注册表
编辑框1.内容 = 到文本 (取硬盘特征字 ())
注册表 = 取数值注册项 (#本地机器, “SYSTEM\CurrentControlSet\Control\123\9999999”, )
.如果 (注册表 = 999)
标签1.标题 = “已注册”
_启动窗口.标题 = “注册版”
按钮1.标题 = “已注册”
按钮1.禁止 = 真
信息框 (“你使用的是注册版!”, #信息图标, “提示”)
.否则
信息框 (“你使用的是未注册版!”, #信息图标, “提示”)
.如果结束
.子程序 _按钮1_被单击
.局部变量 算法
算法 = 取硬盘特征字 () + 1135485458 - 5245454 × 564546548648 ÷ 2 + 564584.版本 2
.子程序 _按钮1_被单击
.局部变量 算法
算法 = 取硬盘特征字 () + 1135485458 - 5245454 × 564546548648 ÷ 2 + 564584 - 90000
' 这个是算法
.如果 (编辑框2.内容 = 到文本 (算法))
写注册项 (#本地机器, “SYSTEM\CurrentControlSet\Control\123\9999999”, 999) ' 写注册表项
信息框 (“注册成功,请重启程序”, #信息图标, “提示”) ' 注册码错误提示
.否则
信息框 (“注册码错误!”, #信息图标, “提示”) ' 注册码错误提示
' 这个是算法
.如果 (编辑框2.内容 = 到文本 (算法))
写注册项 (#本地机器, “SYSTEM\CurrentControlSet\Control\123\9999999”, 999) ' 写注册表项
信息框 (“注册成功,请重启程序”, #信息图标, “提示”) ' 注册码错误提示
.否则
信息框 (“注册码错误!”, #信息图标, “提示”) ' 注册码错误提示
补充内容 (2013-11-29 11:12):
上面多了的自己删除 |
|