■LISP做的申请注册授权程序下的人多但币为啥不增加？所以免币了■

zhuquanmao · 发表于 2013-3-9 19:01

本帖最后由 zhuquanmao 于 2013-9-7 22:56 编辑

恭喜论坛恢复, 参考了论坛里的帖子http://bbs.mjtd.com/forum.php?mod=viewthread&tid=61767和http://bbs.mjtd.com/forum.php?mod=viewthread&tid=55520 将他们组合了一下，特此谢过原作者。
代码有不足的地方，请大家指出，以便提高，谢谢！
主程序:

对话框文件:

显示效果如下:

ben92101 · 发表于 2018-7-23 23:37

楼主我用您的代码全程操作无问题
但是后续有个面板程序可能涉及到DCL文件。
出现一个问题没有完成注册程序之前面板正常运行。完成注册程序后，重启CAD 再次加载面板程序，则报错。
上传相关附件请看看是什么原因？有没有办法挽回？

tianying307 · 发表于 2018-12-1 10:31

楼主在吗，首先感谢您的分享，可是我在试用时发现个问题，就是注册机算出来的注册码输入授权码时，还是会显示注册码不对，我试了些是那个zcm_sr值是空的，也就是输进去的授权码貌似没有赋给zcm_sr.因为我对对话框不熟，请楼主指教是哪的问题

zhuquanmao · 发表于 2013-3-9 20:28

本帖最后由 zhuquanmao 于 2014-7-5 14:54 编辑

注册码生成器

对话框程序

点击生出注册码按钮生成注册码的同时注册码也同时拷贝至剪贴板

啵浪鼓 · 发表于 2013-3-9 20:55

1~2位的注册码，很轻松被试出来

zhuquanmao · 发表于 2013-3-9 21:33

你可以根据申请码任意组合的我只是举例啊

q530496591 · 发表于 2013-3-10 15:17

谢谢关中大师！

长风（尚品） · 发表于 2013-3-11 08:55

如何将上面代码加入自已的lsp中。求实例详解

zhuquanmao · 发表于 2013-3-12 00:56

长风（尚品）发表于 2013-3-11 08:55
如何将上面代码加入自已的lsp中。求实例详解

把一楼的代码下载下来把自己的lsp拷贝到文件 zhuce.lsp的内容之后保存。然后把zhuce.lsp和zhuce.dcl这两个文件放在支持路径中，加载zhuce.lsp后，就会让输入注册码。注册码正确，则加载你自己的程序，否则则不加载。
其中子程序 phyhar_hdzcm 会产生注册码

【KAIXIN】 · 发表于 2013-3-12 08:15

思路可以，大家可以举一反三，加强算法.......

长风（尚品） · 发表于 2013-3-12 09:06

本帖最后由长风（尚品）于 2013-3-12 09:49 编辑

zhuquanmao 发表于 2013-3-12 00:56
把一楼的代码下载下来把自己的lsp拷贝到文件 zhuce.lsp的内容之后保存。然后把zhuce.lsp和zhuce.dcl这两 ...

我按上面步骤出现错误: 参数类型错误: VLA-OBJECT nil 对话框一闪而过。那里出了问题？
(c:zhuce)

(load "D:/soft/极速绘图工具箱/加载程序.lsp")
(load "D:/soft/极速绘图工具箱/极速绘图工具箱【`】.lsp")

我是加载的这两个文件

爱的真谛 · 发表于 2013-3-12 13:26

怎么才能用明经币

账号		自动登录	找回密码
密码			注册

■LISP做的申请注册程序■