cad图纸怎么炸开块啊，请高手帮帮忙啊

cad图纸怎么炸开块啊，请高手帮帮忙啊

加密了的,用下面方法在记事本中复制以下内容：(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”文件cad中用“APPLOAD”命令加载这个文件，然后输入“unlk”命令就行了。