santalin 发表于 2009-4-7 11:45:00

【求助高手】如何用LSP程序选择所有块并炸开，选择所有光栅图象并删除...

<div class="t_msgfont" id="postmessage_13502642">如何用LSP程序选择所有块并炸开，选择所有光栅图象并删除，选择所有标注并删除，选择所有填充并删除，选择所有属性并删除...<br/>再用PURGE命令清除，请高手帮忙啊！</div>

ZZXXQQ 发表于 2009-4-17 20:41:00


(defun c:tt ()
(setvar "CMDECHO" 0)
(while (setq ss (ssget "X" '((0 . "INSERT"))))
(setvar "QAFLAGS" 1)
(command ".explode" ss)
(setvar "QAFLAGS" 0)
)
(if (setq ss (ssget "X" '((0 . "ATTDEF,HATCH,IMAGE,DIMENSION"))))
(command ".erase" ss "")
)
(command ".purge" "a" "*" "n" ".purge" "a" "*" "n")
(setvar "CMDECHO" 1)
(princ)
)

cxix64 发表于 2023-3-9 13:03:42

ZZXXQQ 发表于 2009-4-17 20:41


谢谢大神这个太需要了！！！

`中微子 发表于 2023-3-11 00:34:51

好像这个比较简单，初学者多磨一磨就会了。

santalin 发表于 2009-4-17 09:23:00

没人知道吗？唉～～～

nonsmall 发表于 2009-4-17 09:37:00

<p>建议先看看书</p><p>基本函数 ssget</p>

liminnet 发表于 2009-4-17 09:51:00

santalin 发表于 2009-4-20 08:45:00

liminnet发表于2009-4-17 9:51:00static/image/common/back.gif就是，我看书都看了一年才写代码的

<p>是啊，就该多看看书啊，只是时间少啊，我自己已经写好这个程序了，比较完美</p>

santalin 发表于 2009-8-1 17:08:00

<p>呵呵，自己已经学了，写了很长的程序，自定义了N个命令</p><p><strong>“如何用LSP程序选择所有块并炸开，选择所有光栅图象并删除...”</strong></p><p>这个问题真是太简单了，呵呵</p><p>&nbsp;************************************************************<br/>&nbsp;***&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; LIL 图形处理程序 V1.0&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; LIL(块 地质)，LIL1(块 标注 地质)，LIL2(全部 地质)&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; LIL3(块)，&nbsp; LIL4 (块 标注)，&nbsp; LIL5(块 标注 填充)&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; LIL6(地质 块颜色)，LIL7(钢筋图)，LIL8(图框)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; LILo(出图)&nbsp; gl(删除填充关联)，kys(块颜色)，bu(捕捉) ***<br/>&nbsp;***&nbsp; qm(删除图象)，dgs(删除光栅图像)，bz(帮助)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; cbz(标注前后缀)，bzys(标注颜色)，dss(标注样式)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; ae(封闭面积)，ba(交叉切断)，z0(z坐标归零)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; xxbl(更改线型比例)，abl(随层)，old(处理旧图)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp; fst,lmt,kt(仿宋,罗马,楷体)，tym,tym1(图元名)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;***&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; All Rights Reserved By LIL Studio (C) 2009&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ***<br/>&nbsp;************************************************************</p>

wqq8081 发表于 2011-1-16 23:52:02

建议先看看书

基本函数 ssget
该多看看书啊

hebebon 发表于 2011-9-17 23:27:06

该多看看书啊

功夫佬 发表于 2012-5-3 22:24:28

ZZXXQQ 发表于 2009-4-17 20:41 static/image/common/back.gif


谢谢ZZXXQQ你的无条件帮助
页: [1] 2
查看完整版本: 【求助高手】如何用LSP程序选择所有块并炸开，选择所有光栅图象并删除...