那个,不能说是空格号吧。
上面也说了,你现在替换成了 %%132,看你描述的意思,似乎是在保存时又被替换回 ...
前辈啊 还能给个lisp的?每次去这样替换也很痛苦!难道就是我用了ZDM才会替换好了 保存、打开又回来了?这样说就感觉ZDM是故意了么? 本帖最后由 dunkel 于 2015-8-13 08:53 编辑
没接触过 zdm,不了解具体缘由。我的 acad 上是没有其它方插件的,只有个天正的查看插件,不会被自动加载,主动加载后也不见影响。下面的代码,筛选条件是依照上面的图形来的,你随便改吧。(defun C:gjhz ( / xsel xl xi xc xtxt xt2)
(vl-load-com)
(setqxsel (ssget "X" (List (cons 0 "TEXT") (cons 7 "钢筋") (cons 8 "钢筋标注"))))
(ifxsel
(progn
(setqxc (sslengthxsel)xi 0)
(princ "\n")
(while(< xixc)
(setqxl (entget (ssname xsel xi))xtxt (cdr (assoc 1 xl))xt2 (vl-string-subst "%%132" "\\U+0084" xtxt)xi (1+ xi))
(if(/= xt2 xtxt)
(progn
(setq xln (subst (cons 1 xt2) (assoc 1 xl) xl))
(entmod xln)
)
)
(princ (strcat "\r" (itoa xi) ":" (itoa xc)))
); end of while(for each one in selection)
(princ "Finished.")
)
); end of if(has selects)
(princ)
); end of (C:gjhz)
(C:gjhz) dunkel 发表于 2015-8-11 09:42 static/image/common/back.gif
那个,不能说是空格号吧。
上面也说了,你现在替换成了 %%132,看你描述的意思,似乎是在保存时又被替换回 ...
我编辑的时候其实连空格也没有 没法替换的!比如原来应该40%%13220,但他只显示4020,中间的符号都不显示。我用CAD08的也试了一下 打开探索者,输入Tcc,先把钢筋符号转化成探索者自带的那个钢筋符号,再用钢筋符号转化成%%132,完美解决,块里面的都能解决(包括属性块、动态块)
页:
1
[2]