|
|
你的程序中(setq sset (ssget (list (cons 8 ly1))))，(setq sset (ssget (list (cons 2 bk1))))),(setq sset (ssget (list (cons 0 en1))))的ly1,bk1,en1用法有点问题。CAD中过滤实体很方便，多重过滤可采用(-4 "这个挺好,不知哪位高手愿意完整一下:
1、并集过滤：按多个条件进行过滤，过滤出符合其中任一条件的物体;
2、交集过滤：按多个条件过滤后，过滤出符合所有条件的物体来。
并集过滤 、交集过滤可以作为2个不同的LISP程序，这样也许好改一些。
(过滤对象根据选到的实体直至结束，考虑颜色、线型）
|
|
置顶卡
