如何炸开(分解)CAD多重插入块

  • A+
所属分类:CAD安装使用教程

新建一个空白文本文档,然后将下面“红色”代码复制到里面并保存,将文件名以及后缀名改成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,因为用了多次引用快……

大家都在看:

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: