破解加密天正CAD图纸密码的解密软件有没有？
天正CAD图纸加密分解：
方法一：格式转换
1：将天正加密的图纸用AutoCad打开后，点击菜单“文件”－“输出”,在“文件类型”中选“图元文件(*.wmf)”,输出生成图元文件(*.wmf)；
2：新建一个AUTOcad图，将刚才生产的wmf文件插入新图中再炸开。
方法二：autolisp破解
1：将下面的代码复制在记事本内，另存为unlk.lsp文件；
(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)
)
2：用 AutoCAD 打开无法炸开的图纸，选择菜单“工具”—“加载应用程序”，打开“加载、卸载应用程序”对话框，在对话框里找到并点选那个名为 “unlk.lsp”的文件，依次点击“加载”、“关闭”按钮，关闭对话框；
3：在 AutoCAD的命令行里输入“unlk”并回车，当提示“请选择被加密的图形”的时候，点击一下图形，等待程序加载和执行；
4：等待过后，图纸被炸开，文字部分双击也可进入编辑状态。
方法一：格式转换
1：将天正加密的图纸用AutoCad打开后，点击菜单“文件”－“输出”,在“文件类型”中选“图元文件(*.wmf)”,输出生成图元文件(*.wmf)；
2：新建一个AUTOcad图，将刚才生产的wmf文件插入新图中再炸开。
方法二：autolisp破解
1：将下面的代码复制在记事本内，另存为unlk.lsp文件；
(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)
)
2：用 AutoCAD 打开无法炸开的图纸，选择菜单“工具”—“加载应用程序”，打开“加载、卸载应用程序”对话框，在对话框里找到并点选那个名为 “unlk.lsp”的文件，依次点击“加载”、“关闭”按钮，关闭对话框；
3：在 AutoCAD的命令行里输入“unlk”并回车，当提示“请选择被加密的图形”的时候，点击一下图形，等待程序加载和执行；
4：等待过后，图纸被炸开，文字部分双击也可进入编辑状态。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2011-10-24
cad图纸加密也分好多种的，有的可以破解，有的根本破解不了的。需要帮忙破解的话可以hi我。本回答被网友采纳
第2个回答 2011-11-03
图形被加密了！！！
将下面的代码复制在记事本内，另存为unlk.lsp文件，打开这张不能修改的图纸，命令appload选择加载程序文件unlk.lsp，命令行键入unlk，选择不能修改的图形。。。
(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文件，打开这张不能修改的图纸，命令appload选择加载程序文件unlk.lsp，命令行键入unlk，选择不能修改的图形。。。
(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)
)
参考资料：466470574
第3个回答 2011-10-25
我可以找到图纸的真正密码
