cad里的多重插入块怎么分解

1、将以下程序复制到TXT文件中并将其另存为exm.lsp文件。程序如下：;; ------------------------------------------------ -------------;;将“多个插入块”转换为“正常块”。（DEFUN C：exm（）（setvar“cmdecho”0）（SETQ STM（汽车（ENTSEL“\ n点多块”）））（而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（汽车（ENTSEL“\ n指向下一个多个街区”））））（setvar“cmdecho”1））2、进行“多重插块”的操作。3、加载刚刚保存的exm.lsp文件。4、加载提示后，关闭它。5、输入“exm”命令。6、按照提示选择多个块。7、然后，按空格键终止命令。8、输入“x”分解即可。9、最终的分解效果图如下。