保护我的lisp程序？

Mike55 · 发表于 2022-7-6 02:25:12

我看过加密程序解密，所以这不是我要找的。我想要的是在thumb驱动器上销售我的Auto lisp程序，该驱动器可以与AutoCAD一起使用，最早版本为12，但用户将无法复制它，或者甚至无法看到它。这可能吗？我正在使用AutoCAD 2002，但可以访问AutoCAD 2013。

Tharwat · 发表于 2022-7-6 02:53:42

嗨，迈克，

您可以将lisp编译为。fas和。打开Vlisp编辑器，从菜单文件->生成应用程序->新建应用程序。。。。等等

Dana W · 发表于 2022-7-6 02:59:42

并确保在某处以纯文本形式保留lisp代码的备份副本。

BIGAL · 发表于 2022-7-6 03:10:22

Re thumdrive你可以创建只在thumb驱动器上工作的文件，我已经复制了一些东西，然后它就不工作了。你们可以编写代码来寻找USB驱动器，这是获得USB设备号的最简单方法，你们也可以在某处看到。你也可以隐藏目录。

我们现在运行的软件没有usb没有工作，但工作代码可以在pc或usb上。

satishrajdev · 发表于 2022-7-6 03:25:13

请尝试以下代码，将Lisp（*.lsp）文件转换为快速安全的（*.fas）文件。。。

copy

;;  LSP2FAS.lsp                                    ; Scot Harris  11-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

[编程交流] 保护我的lisp程序？

发表回复

精选推荐