CAD的多重插入块如何炸开

1、将以下程序复制到TXT文件中，然后另存为exm.lsp文件。

程序如下：

-------------------------------------------------------------

转换“多重插入块”为“禅宽物普通块”。

(DEFUNC:exm()

(setvar"cmdecho"0)

(SETQSTM(car(ENTSEL"\n点取多重块")))

(whilestm

(setqe(entgetstm))

(setqstlx(cdr(assoc0e)))

(if(=stlx"INSERT")

(PROGN

(setqr_zm70(assoc70e))

(setqc_zm71(assoc71e))

(setqr_dist_zm44(assoc44e))

(setqc_dist_zm45(assoc45e))

(setqe(subst(cons440)r_dist_zm44e))

(setqe(subst(cons450)c_dist_zm45e))

(setqe(subst(cons700)r_zm70e))

(setqe(subst(cons710)c_zm71e))

(setqe(subst(list100"AcDbBlockReference")(list100"AcDbMInsertBlock")e))

(entmakee)

(entdelstm)

))

(SETQSTM(car(ENTSEL"\n点取下一多重块")))

)

(setvar"cmdecho"1)

)

2、如图是“多重贺液插入块”，

3、加载刚巧陵保存的exm.lsp文件。

4、提示加载完成后，关闭。

5、输入“exm"命令，然后按提示 *** 作，选择多重块。

6、然后，按空格，终止命令。

7、输入"x"打散，就OK了。

8、完成效果图。

天正加密图纸“TCH_PROTECT_ENTITY”目前有4种破解方法：

1. 图元破解法：(本方法真正的用途是可以破解天正的打印限制)

①将天正加密的图纸用CAD打开后，输出生成：图元文件(*.wmf)

具体步骤为：打开图纸----文件----输出----wmf格式

②新建一个CAD图，将刚才生产的wmf文件插入新图中再炸开!

具体步骤为：新建---插入---图元文件----分解

这样，勉强可以编辑，只是图元都是破碎的,尤其是文字，乱线一堆，效果很差,但是打印效果不影响。散悉猜2、修复法：

①用修复打开文件，一定要用修复；②打开“工具”的“块编辑器”就可看到类似“TCH_PR"的块，那就是TCH_PROTECT_ENTITY锁住的东西，可以编辑。打开此块，复制出来,只是如果图纸中如果有几千个块,找起来很费神。3、程序法：

把以下内容保存为lsp文件（如exm.lsp）,加载后冲型运行exm既可把“多重插入块”转换为“普通块”，然后既可用“explode”分解。转换“多重插入块”为“普通块”。

(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)

)4、想省事的话淘宝上有卖家可以帮助炸开，搜索“无法分解 TCH_PROTECT_ENTITY ”上面有很多卖家，挑一个最便宜的，砍价吧！

---