怎么把易语言编译出来软件程序上加注册码,

2024-10-31 17:30:16
有4个网友回答
网友(1):

.版本 2
.程序集 窗口程序集2
.程序集变量 程序集_机器码, 整数型
.程序集变量 程序集_用户输入的激活码, 文本型
.程序集变量 程序集_运算的激活码, 文本型
.程序集变量 程序集_临时存储, 文本型
.子程序 _按钮_确定_被单击
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框1.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框2.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框3.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框4.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框5.内容
程序集_机器码 = 取绝对值 (取硬盘特征字 ())
程序集_运算的激活码 = 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) \ 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) \ 5), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) \ 9), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) × 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) + 2), 5)
.如果 (程序集_用户输入的激活码 = 程序集_运算的激活码)
信息框 (“激活成功”, 0, )
写配置项 (“这里输入你要写的配置项的路径以及名称”, “是否激活”, “机器码”, 到文本 (程序集_机器码))
写配置项 (“这里输入你要写的配置项的路径以及名称”, “是否激活”, “激活码”, 程序集_用户输入的激活码)
全局_激活了吗 = 真
载入 (XXXXX, , 真)
.否则
信息框 (“激活码错误,激活失败”, 0, )
.如果结束

.子程序 __启动窗口_创建完毕
程序集_临时存储 = 读配置项 (“这里填写你写的配置项的目录和名称”, “是否激活”, “机器码”, )
程序集_机器码 = 取绝对值 (取硬盘特征字 ())
.如果 (程序集_临时存储 = 到文本 (程序集_机器码))
全局_激活了吗 = 真
载入 (XXXXX, , 真)
销毁 ()
.否则
全局_激活了吗 = 假
.如果结束

.子程序 _按钮2_被单击
.如果 (信息框 (“确定进入试用版吗?,试用版将XXXXX”, #询问图标 + #确认取消钮, “提示”) = #确认钮)
载入 (XXXXX, , 真)
全局_激活了吗 = 假
销毁 ()
.否则
返回 ()

这是注册界面的代码,再建一些窗口,做你的主程序,这个“全局_激活了吗”是个全局变量,类型是逻辑型,可以用它对试用版的功能做限制,界面自己设计,具体就是2个按钮5个编辑框和一个标签,这个XXXXX是你要在里面写的东西,可以随意换,你想写什么就写什么,我相信只要稍微懂点的人都能看懂这是什么意思

.版本 2
.程序集 窗口程序集1
.程序集变量 机器码, 文本型
.子程序 _按钮1_被单击
编辑框2.内容 = 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) \ 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) \ 5), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) \ 9), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) × 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) + 2), 5)
.子程序 __启动窗口_创建完毕
编辑框1.内容 = 到文本 (取绝对值 (取硬盘特征字 ()))

这是注册机的代码, 界面是两个标签两个编辑框和一个按钮,代码就是这样,可以自己看着改

网友(2):

.版本 2
.如果真 (到文本 (读入文件 (取运行目录 () + “\注册码”)) ≠ “注册码”)
_启动窗口.可视 = 真
载入 (注册窗口, , 真)
.如果真结束

网友(3):

下载此源码

网友(4):

本地注册码时间加密算法我都搞出来了