大海无量…
rocking2008 发表于 2022-2-20 19:20
提一点个人的小看法：
我认为对lsp加密，应该主要针对反编译，就是说加密后只要反编译出来的东西无法使 ...
很抱歉不管是我发的还是大鹏首发的，都达不到，运行速度没有变化，加载速度变慢了，另外存在被还原的风险，而一旦被还原，是完整的，所以只能玩玩而已，想要安全，建议购买大鹏的专业收费版加密
tryhi 发表于 2022-2-21 22:32
很抱歉不管是我发的还是大鹏首发的，都达不到，运行速度没有变化，加载速度变慢了，另外存在被还原的风险 ...
明白，感谢老师们的付出。
两天没来又出新的加密工具了顶，，，，
不知道为什么改完以后cad2021用不了，lsp格式的就可以，头秃啊
加密工具厉害了，非常好用。顶
rocking2008 发表于 2022-2-20 09:51
的确是，测试用一个300K的lsp，用vlide编译出来是150K，用大海老师的编译出来是300K，大了一倍。
加载的 ...
加载时间怎么测试的？ 用秒表？
支持，挺好的东西
f4800 发表于 2022-3-10 23:09
加载时间怎么测试的？ 用秒表？
;;计时器开始，返回时间戳
;;(返回的时间戳由try-time-end调用，返回毫秒整数)
;;(try-time-be)
;;(try-time-end nil t)(prin1)
(defun try-time-be () ;计时器开始
;(setq $try-timebe(getvar "TDUSRTIMER"));该变量不适用于高版本
(setq $try-timebe(getvar "millisecs"))
)
;(setq $try-timebe nil)
;;计时器结束，返回经历了多少毫秒，(整数)
;;参数1、由try-time-be返回的时间戳(nil为默认)2、是否打印(T为打印)
(defun try-time-end (time p / tt) ;计时器结束
(or time (setq time $try-timebe))
;(setq tt(* 86400000(- (getvar "TDUSRTIMER") time)))
(setq tt(- (getvar "millisecs") time))
(if p (print(strcat"经历时间为："(itoa tt)"毫秒")))
tt
)
tryhi 发表于 2022-4-1 11:11
;;计时器开始，返回时间戳
;;(返回的时间戳由try-time-end调用，返回毫秒整数)
;;(try-time-be)
大师厉害 LISP 还能实现加载计时 长知识了。。。 {:1_1:}