关于unlk的应用在记事本中复制以下内容:(defunc:unlk(/enent)(setqen(entsel\n请选择被加密的图形:))(ifen(if(=(cdr(assoc0(setqent(cdr(entget(setqen(caren)))))))INSERT)(progn(setqent(entmakex(list'(0.INSERT)(assoc2ent)(assoc10ent))))(command_.explode(entlast))(entdelen))))(princ\nOK,解密成功。)(princ))保存为“unlk.lsp”文件cad中用“APPLOAD”命令加载这个文件,然后输入“unlk”命令就行了。当cad中遇到多重插入引用时,在命令栏中输入appload命令,加载unlk,然后在命令栏中输入unlk命令,选取要解密图形,解密后用分解命令对要进行分解的图形进行分解