保护我的lisp程序?
我看过加密程序解密,所以这不是我要找的。我想要的是在thumb驱动器上销售我的Auto lisp程序,该驱动器可以与AutoCAD一起使用,最早版本为12,但用户将无法复制它,或者甚至无法看到它。这可能吗?我正在使用AutoCAD 2002,但可以访问AutoCAD 2013。 嗨,迈克,您可以将lisp编译为。fas和。打开Vlisp编辑器,从菜单文件->生成应用程序->新建应用程序。。。。等等 并确保在某处以纯文本形式保留lisp代码的备份副本。 Re thumdrive你可以创建只在thumb驱动器上工作的文件,我已经复制了一些东西,然后它就不工作了。你们可以编写代码来寻找USB驱动器,这是获得USB设备号的最简单方法,你们也可以在某处看到。你也可以隐藏目录。
我们现在运行的软件没有usb没有工作,但工作代码可以在pc或usb上。 请尝试以下代码,将Lisp(*.lsp)文件转换为快速安全的(*.fas)文件。。。
;;LSP2FAS.lsp ; Scot Harris11-29-2012
;; Minimizes the sequence needed to create FAS files.
;; Help facility added.
;; Streamlined from original program provided by aqdam1978.
(defun c:LSP2FAS-Help (/)
(alert (strcat
"\tLisp (LSP) to Fast and Secure (FAS) Help"
"\n "
"\nFile dialog begins in the current directory. "
"\nIt is suggested to place and open a drawing (DWG) "
"\ninside the input folder you wish to batch process. "
"\n "
"\nOutput file will be in the same folder as the file selected. "
"\n "
"\nThere is no provisional check for an existing FAS file of the same name. "
))
);end LSP2FAS-Help
(defun c:LSP2FAS ( / a )
(vl-load-com)
(prompt " Lisp to Fast and Secure (FAS). LSP2FAS-Help available. ")
(if (wcmatch (strcase (setq a (getfiled "Convert LSP File to FAS" (getvar "DWGPREFIX") "" 16))) "*.LSP")
(progn
(c:vlide)(vlisp-compile 'st a)
(princ (strcat "\n File " (vl-string-subst ".fas" ".lsp" a) " created. "))
);progn
(alert "File extension must be \".LSP\" ")
);if
(princ)
);end LSP2FAS
页:
[1]