如何炸开（分解）CAD多重插入块
最新推荐文章于 2025-05-11 02:17:47 发布
bojoyor
最新推荐文章于 2025-05-11 02:17:47 发布
阅读量2.1w
收藏
6
点赞数
2
文章标签：
cad
本文提供了一个LISP程序，用于解锁AutoCAD中无法通过常规方法分解的加密图形。通过加载提供的LISP文件并运行命令，可以实现对加密块的解密。
摘要生成于
C知道
，由 DeepSeek-R1 满血版支持，
前往体验 >
新建一个空白文本文档，然后将下面“红色”代码复制到里面并保存，将文件名以及后缀名改成unlk.lsp
--------------------------------------------------------
(defun c:unlk (/ en ent)
(setq en (entsel "\n请选择被加密的图形:"))
(if en
(if (= (cdr (assoc 0 (setq ent (cdr (entget (setq en (car en)))))))
"INSERT"
)
(progn
(setq ent (entmakex
(list '(0 . "INSERT")
(assoc 2 ent)
(assoc 10 ent)
)
)
)
(command "_.explode" (entlast))
(entdel en)
)
)
)
(princ "\nOK，解密成功。")
(princ)
)
-----------------------------------------------------------------
先打开无法分解的图纸，然后找到 工具→加载应用程序，然后找到“unlk.lsp”那个文件点一下，然后点击“加载”按钮，对话框左下角提示”加载成功“，然后点击“关闭”按钮；
然后输入命令 unlk 空格，然后点一下图形，就大功告成了！
如果一次不成，就多用几次unlk，因为用了多次引用快……