[原创]把lisp程序加密成fas（有升级）

baitang36 · 发表于 2022-2-17 08:03:14

本帖最后由 baitang36 于 2023-9-27 07:30 编辑

原理很简单，就是把lisp文件变换成乱码，然后嵌入一个fas框架中，变成一个fas文件。这个fas框架是手工打造的，不是标准的，一般的反编译工具对它无效。加密强度和acad自带的原始lsp加密protected类似，用于保护免费软件够用了。卖钱的软件建议购买专业的pfas2.x
这个fas在被加载的时候，会自行把乱码解密成一个字符串，从内存中加载，不会产生临时文件。
程序内定义了一个函数 c:l2f
用法：L2F回车，选需要加密的lisp文件，点打开就可以加密成功。
注意lisp文件的大小不能超过64k，因为lsp中字符串的定义是用了两个字节，能表示的最大数是65535

为方便批量处理，新版定义了一个函数 lsp2fas 用法：(lsp2fas "d:/111.lsp")

有朋友问我，为什么升级后还是不支持大于64k的文件？
因为这种加密是把lsp文件加密后作为一个字符串来处理的，相当于给lsp文件直接加了一个壳，脱壳后拿到的是你完整的带注释的源码。
加密强度不够高，因此只适用于免费软件和小插件。大于64k的程序，编译后用免费的pvlx2.21加密更安全。
对于能卖钱的程序，建议不要用免费加密工具，购买收费的pfas3.0更专业，更安全。

baitang36 · 发表于 2022-2-17 12:55:14

无币的可以在这里下载

baitang36 · 发表于 2022-2-17 10:12:30

本帖最后由 baitang36 于 2022-2-23 12:37 编辑

yyzhan12 发表于 2022-2-17 09:20
感谢分享。

有bug

好的，谢谢测试

baitang36 · 发表于 2022-2-18 16:18:00

emk 发表于 2022-2-17 15:23
lisp文件的大小不能超过64k，能再改大些吗？
命令太短冲突，最好直接改成 lisp2fas

如果大于64k需要用到字符串拼接，处理起来比较麻烦。你可以把lsp分段加密，然后把多个fas组合成一个。太大的lsp不建议用这种方式加密，速度慢，加密强度不高。可以考虑用pfas2.x专业加密

f4800 · 发表于 2022-2-17 08:24:05

不错好用支持点赞

xj6019 · 发表于 2022-2-17 08:32:04

不错好用支持点赞支持大佬新作感谢分享！！

baitang36 · 发表于 2022-2-17 08:46:00

本帖最后由 baitang36 于 2022-2-17 12:56 编辑

无币的请去15楼下载

p-3-ianlcc · 发表于 2022-2-17 08:56:42

支持，讚～
版大的東西都很棒！

paulpipi · 发表于 2022-2-17 09:13:37

很好，太牛丁，感谢

yyzhan12 · 发表于 2022-2-17 09:20:53

感谢分享。

有bug
CAD 2022加载出错
命令: (LOAD "D:/搜狗高速下载/lsp2fas.fas") ; 错误: 无效的二进制文件格式: 体 (2) 错误

加密后的fas在cad 2022不可加载

yanchao316 · 发表于 2022-2-17 10:29:07

谢谢分享。

流氓兔 · 发表于 2022-2-17 11:23:50

太牛了，增加多选功能，更香，更顺滑，大师出品

账号		自动登录	找回密码
密码			注册

[经验] [原创]把lisp程序加密成fas（有升级）

本帖子中包含更多资源

评分

本帖子中包含更多资源

评分