45296876 发表于 2013-4-9 21:39 static/image/common/back.gif
这句话好难理解。前面你说的我明白，谁最后保存的就是谁的，但(setq a3 (entmod (subst (cons 41 c ) (as ...
这句话它是把第一次ENTMOD的结果返回给A3,然后再对A3进行SUBST后再ENTMOD
这样就避免了象你那样只entmod而不对A3进行修改就直接 subst
首先你的两个entmod实际上它都会起作用，但哪一个在最后它实际起作用的就只有哪一个
原因在于，第一次ENTMOD或者SUBST后，你没把结果返回A3
所以第二次SUBST或者ENTMOD的时候，A3它还是最初的值。
llsheng_73 发表于 2013-4-10 09:17 static/image/common/back.gif
这句话它是把第一次ENTMOD的结果返回给A3,然后再对A3进行SUBST后再ENTMOD
这样就避免了象你那样只entmod ...
这种解释我比较明白了，谢谢你了。明经威武，各坛友英明啊。
llsheng_73 发表于 2013-4-10 09:17 static/image/common/back.gif
这句话它是把第一次ENTMOD的结果返回给A3,然后再对A3进行SUBST后再ENTMOD
这样就避免了象你那样只entmod ...
再请教个问题 ，不知道能不能实现，就是天正图纸加过密的图元，能不能用LISP获取到里面的密码信息呢。我刚才试了几次，都得不到，0 . "TCH_PROTECT_ENTITY"是这样显示的，图块的名称都显不出来，不知道 有没有什么方法可以实现。
本帖最后由 llsheng_73 于 2013-4-10 11:47 编辑
对力元加密我还不如你，我就没碰到过经过加密处理的图元
cad
图被加密
一般，如果拿到的
CAD
导入出错，在
CAD
中夜无法分解，整张图纸表现为一
个块，并且，双击无法分解的图纸时候，可能会提示要求输入密码，那么，则表
示这张图纸进行过天正的图纸加密的处理。
方法：先修复打开这张图纸，在文件—绘图使用程序—修复
打开之后，运行“插入块”命令，在名称中选择“
TCH_PR
”，然后确定
插入当图中，运行分解
X
命令，将块分解，即可解决图纸加密的问题。
网上一篇文章中看到的，不知道有没有用
llsheng_73 发表于 2013-4-10 11:44 static/image/common/back.gif
对力元加密我还不如你，我就没碰到过经过加密处理的图元
把它存为DXF试试？
另存为 这种方式试过了，以WMF格式输出也不行，电脑跑不动，直接卡死，图形稍小点的倒是可以，只不过再打开这个WMF格式的图形，就是完全散掉的一个图形了，字体都是散开的。所以还是需要有密码才可以完美解决。不过这种问题 不是很多，如果有会做的倒是可以学学，没有就不能强求了。
45296876 发表于 2013-4-10 11:51 static/image/common/back.gif
另存为 这种方式试过了，以WMF格式输出也不行，电脑跑不动，直接卡死，图形稍小点的倒是可以，只不 ...
http://wenku.baidu.com/view/23dff581ec3a87c24028c4d2.html
看看这篇文章，不知道有用没，我也是刚找到它，手上没有被加密过的图，无法知道有没有用了
llsheng_73 发表于 2013-4-10 11:44 static/image/common/back.gif
对力元加密我还不如你，我就没碰到过经过加密处理的图元
cad
此方法可行，刚才试了一下，搞死机两次，哈哈，不过问题是解决了，我自已用天正加的密，然后用你给我的方法去爆力破解。解决了。
45296876 发表于 2013-4-10 12:06 static/image/common/back.gif
此方法可行，刚才试了一下，搞死机两次，哈哈，不过问题是解决了，我自已用天正加的密，然后用你给 ...
给我发个简单的加密的图形，我看下有没办法能不去破解它把图元弄出来，图形简单些，随便画几根线啊圆的还有文字什么的就行了
llsheng_73 发表于 2013-4-10 13:57 static/image/common/back.gif
给我发个简单的加密的图形，我看下有没办法能不去破解它把图元弄出来，图形简单些，随便画几根线啊圆的还 ...
我的QQ号，45296876.论坛上传不了那么大的，我们公司图纸要是保存了就加了密，发到别人那里，别人是打不开图形的，所以只能这样了，加上QQ吧
本帖最后由 llsheng_73 于 2013-10-23 15:09 编辑
45296876 发表于 2013-4-9 17:38 static/image/common/back.gif
(entmod (subst (cons 41 c ) (assoc 41 a3) a3))
(entmod (subst (cons 40 a ) (assoc 40 a3) a3))
...
这两句它是谁在最后就最后返回哪一个，可以这样
(setq a3 (subst (cons 41 c ) (assoc 41 a3) a3))
(entmod (subst (cons 40 a ) (assoc 40 a3) a3))
原因在于第一次ENTMOD后虽然也返回了值，但并不会改变a3,导致第二次ENTMOD时，a3的初始值仍然是第一次ENTMOD之前的值，所以虽然有两个ENTMOD,但最终它只能是最后一个起作用，除非每一次ENTMOD之后更新a3.显然这样做有点过，大可不必，所以改成前边直接改A3,最后才来ENTMOD,这样就不会有问题了