ap时如何生成密码
当我加载这个lisp时,我想为我的lisp(VLX)创建一个密码请帮帮我 我希望这些代码能帮助你
(defun c:Test(/ password loop ans)
(setq password 12345)
(setq loop t)
(while loop
(setq ans (getint "\nEnter Password to unlock:"))
(if (/= ans password)
(princ "\nInvalid Password try again.")
(progn
(princ "\nDone.");here you can add your main function
(setq loop nil)
)
)
)
(princ))
如果您想将Lisp文件转换为。fas公司
检查此线程
http://www.cadtutor.net/forum/showthread.php?83695-更改-。lsp到-。fas公司
谢谢你的帮助。但我需要在加载lisp文件时获取密码
我不明白你想说什么。。
这
(defun c:Test()
(if (eq password "BondJamesBond")
(princ "\nPassword Verified")
(princ "\nInvalid Password")
)
(princ))
(setq password (getstring"\nEnter Passwword for Test routine "))
感谢您的反馈,但我的问题是在lsp文件中输入密码。将lisp文件加载到图形时。密码将需要一次。如果密码正确。我可以使用lsp文件中的所有函数。再次感谢 将我发布的代码保存为“test.lsp”,然后尝试加载文件bienda。 感谢您的反馈
如果我在1 vlx中有3个lisp文件
使用时如何设置密码? 你可以用很多方式锁定你的代码序列号,密码,硬盘id,隐藏文件,很多东西,但你必须添加检查密码代码到每个程序,如果它已经是一个vlx,那么你可能无法做到这一点。
对于任何对CMD copy lockfile+lispfile newlispfile感兴趣的人,只需制作一个包含所有文件的bat文件,这会将锁定添加到所有Lisp中。 非常感谢你
页:
[1]