土木在线论坛 \ 建筑设计 \ CAD下载及教程 \ ！！！！！菜鸟问一个很菜LISP问题

！！！！！菜鸟问一个很菜LISP问题

发布于：2014-11-03 12:16:03 来自：建筑设计/CAD下载及教程 [复制转发]

菜鸟问一个很菜LISP问题
要删除" 0."到" 279." 问题：能直接选择0~279么而不是 (1 . " 1##.") (1 . " 2[0-6]#.")
(1 . " 27[0-9].")
程序如下

(defun c:qqq (/ a cm)
(setq cm (getvar "cmdecho"))
(setvar "cmdecho" 0)
(setq a (ssget "X"'(
(-4 . "
(0 . "TEXT")
(8 . "10")
(-4 . "
(1 . " #.")
(1 . " ##.")
(1 . " 1##.")
(1 . " 2[0-6]#.")
(1 . " 27[0-9].")
(-4 . "OR>")
(-4 . "AND>")

)
)
)
(if (/= a nil)(command"erase" a "") )

）

0人已收藏
0人已打赏
免费
0人已点赞
分享

复制链接新浪微博微信扫一扫

全部回复（2 ）

只看楼主我来说两句抢地板

qq_1415781847065 沙发

丝路
教育
室内
设计s i l u s h e j i.com
学习四群 3 7 0 7 3 3 7 5 0，欢迎大家加入学习交流！

2014-11-13 14:22:13
回复举报
赞同0
rui_8970 板凳

没看明白！帮不了你:lol

2014-11-04 14:51:04
回复举报
赞同0