atimao 发表于 2003-7-26 16:19:00

求助：有没有保护Autolisp的源程序？

在AutoCADR14环境中，有没有AutoLisp读网卡MAC地址进行加密方式源程序？主要防止是随意拷贝到其它电脑上就能直接使用。客户端的密码需要由这个卡号外加一个附加代码生成的一个密码，或其它类似方法跟网卡卡号绑定一在起生成的密码。

spring 发表于 2003-7-26 20:01:00

龍龍仔寫的一個程序

(defun C:CHECK ()
(if (or (= (getvar "_pkser") "400-12345678")
          ;;限制autocad版本(原版序號才有效)
          (= (getvar "loginname") "syshengyun")
          ;;限制使用者
          (= (getenv "computername") "SY08")
          ;;限制使用電腦
      )
    (progn
      (alert "未經同意請勿使用本程式\n\n      AUTOCAD將結束")
      (command "QUIT" "Y" "" "")
    )
)
)
如果你要绑定一在起生成的密码,那就再用 open read 循環一下

atimao 发表于 2003-7-27 15:12:00

非常感谢！
还想问一下，Autolisp能够直接获取电脑硬件的信息吗？能否直接读写注册表？

srf 发表于 2003-7-28 09:38:00

使用ACAD2000 以上版本，可以读、写、删注册表，还可将Auto-LSP编译，忌刻保护源代码。

goldenshin 发表于 2003-7-29 17:24:00

我好象写过一个绑定网卡的, 用VC++写的,在LISP里调用,只可惜没改完,源代码丢了,就不想再写了.
其实思路很简单, 在VC\VB里读网卡(或其他硬件)不难,加上你的加密算法,做成ARX,在Lsp能调用就可以了.

莫名 发表于 2003-9-26 22:38:00

有反编译LISP编译程序（后缀.fas）的程序吗？

Student 发表于 2003-10-8 15:21:00

过去不知道"_pkser"这个系统变量，请问这种没公开的系统变量还有那些？

SWAYWOOD 发表于 2004-4-22 20:08:00

<b>龍龍仔 斑竹，请教怎样用LISP检测公司局域网上存在某一台机器（用户）？</b>

aaddff 发表于 2004-5-7 15:42:00

shell


net view 结果输出到一个文件里就可以了
页: [1]
查看完整版本: 求助：有没有保护Autolisp的源程序？