CAD如何才能分解一个多重插入的无名块

以下代码来自于网络：
(DEFUN C:exm ()
(setvar "cmdecho" 0)
(SETQ STM (car (ENTSEL "\n点取多重块")))
(while stm
(setq e (entget stm))
(setq stlx (cdr (assoc 0 e)))
(if (= stlx "INSERT")
(PROGN
(setq r_zm70 (assoc 70 e))
(setq c_zm71 (assoc 71 e))
(setq r_dist_zm44 (assoc 44 e))
(setq c_dist_zm45 (assoc 45 e))
(setq e (subst (cons 44 0) r_dist_zm44 e))
(setq e (subst (cons 45 0) c_dist_zm45 e))
(setq e (subst (cons 70 0) r_zm70 e))
(setq e (subst (cons 71 0) c_zm71 e))
(setq e (subst (list 100"AcDbBlockReference") (list 100"AcDbMInsertBlock") e))
(entmake e)
(entdel stm)
))
(SETQ STM (car (ENTSEL "\n点取下一多重块")))
)
(setvar "cmdecho" 1)
)
将上面的代码复制，粘贴到文本编辑器里面，保存为后缀名为lsp格式的，在cad工具-加载应用程序，找到你保存的这个文件，输入exm，然后就选择两此不能分解的多重块，就变成可以分解的普通块了。
祝你生活愉快。。。

有时候CAD图无法炸开的原因总结
要看你是怎么导入的：
1：如果插入的是块，那直接用炸开命令X就可以，当然插入的有可能是块中块，那就要进行多次用X炸开了！
2：如果是通过“插入---外部参照”导入的，那没有办法用炸开命令将其变为单个的。只有双击该外部参照，在d出的“参照编辑”对话框中进行相关设置后再进行编辑。
3：你导入的那图有可能是一个组，执行“group”命令，在打开的对话框中可以将组分解！注意组只能在对象编组对话框中分解，用炸开命令是无法分解的。
祝你好运！

---