2013-01-11 20:09 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”命令就行了
如果还需要帮忙破解的话请hi我。