易语言注册机源码（易语言打开注册表启动项源码）
本文目录
易语言打开注册表启动项源码
写注册项 (#本地机器, “Software\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell”, “Explorer.exe;” ＋ 取运行目录 () ＋ “\” ＋ 取执行文件名 ())
易语言注册码注册机源码
去这个地方下载就行了 有源码
520nk.com/forum.php?mod=viewthread&tid=127
怎么把易语言编译出来软件程序上加注册码,
.版本 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.内容 ＝ 到文本 (取绝对值 (取硬盘特征字 ()))
这是注册机的代码， 界面是两个标签两个框和一个按钮，代码就是这样，可以自己看着改
易语言机器码/注册码
首先要取一个机器特有的代码。 如：取硬盘特征字（） ‘一般取出来的都是 -123456类似的数字。每个机器的硬盘特征都是不同的。 然后针对这一特点来进行加密。
给你写个列子吧：稍等给你附上源码！
----------软件注册。
.版本 2
.支持库 dp1
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 机器码, 整数型
机器码 ＝ 取绝对值 (取硬盘特征字 ()) ’ 因为取出来的特征字是﹣的，所以要去绝对值！
框机器码.内容 ＝ 到文本 (机器码)
.子程序 _注册按钮_被单击
.局部变量 待用数据, 文本型
.局部变量 机器码, 文本型
.如果真 (框注册码.内容 ＝ “”)
信息框 (“请输入注册码才能正确的注册！”, 0, )
返回 ()
.如果真结束
待用数据 ＝ 取数据摘要 (加密数据 (到字节集 (框机器码.内容), “jqm”, #RC4算法))
机器码 ＝ 到大写 (取文本左边 (待用数据, 25))
.如果 (机器码 ＝ 框注册码.内容)
分组框1.可视 ＝ 假
标题 ＝ “已经成功注册”
.否则
信息框 (“我猜注册码肯定错了。不然怎么注册不了呢？”, 0, )
.如果结束
------机器码。
.版本 2
.支持库 dp1
.程序集 窗口程序集1
.子程序 _注册按钮_被单击
.局部变量 注册码, 文本型
.如果真 (框机器码.内容 ≠ “”)
注册码 ＝ 到大写 (取文本左边 (取数据摘要 (加密数据 (到字节集 (框机器码.内容), “jqm”, #RC4算法)), 25))
框注册码.内容 ＝ 注册码
.如果真结束
-----
这只是个很简单的列程。 希望可以帮助到你！
易语言请问注册机怎么写只有第一次运行的时候需要注册！之后就不需要了
强悍，这么高难度的都整出来了，至于一个小小的注册机还劳驾别人啊。一般注册信息相关代码都是自己掌握，不会流入他人之手。
更多文章：
2025年8月2日 08:15
2025年10月4日 13:00
decorate是什么意思（decorate是什么意思中文翻译）
2026年2月15日 15:15
编程python电脑配置（如何在win7下安装Python及配置）
2025年10月11日 19:30
2025年8月14日 10:30
原生activemq使用（如何使用activemq 管理页面）
2025年6月27日 15:45
2026年9月8日 23:45
2026年4月11日 10:00
connection常用属性（在delphi7中，ADOconnection与ADOQuery都是用来干什么的，有什么联系或者区别吗）
2026年3月25日 08:45
2025年5月27日 01:45
2025年12月23日 06:00
2025年8月27日 13:30
2025年11月16日 06:30
2025年11月23日 19:30
split hairs（don’t split hairs 翻译一下，要直译和引申义）
2026年8月23日 00:45
2026年2月28日 09:30
profitable什么意思（be beneficial for和be profitable for的区别）
2026年1月18日 11:45
switch可以连接笔记本吗（请问switch怎么投屏到笔记本上玩 switch投屏笔记本的操作方法 详细的教程，谢谢！）
2026年8月28日 18:45
2025年6月16日 08:00
2025年8月1日 06:15
