ssget 后跟mode 的部分理解(不断更新)

Gu_xl

回复 露水2 的帖子

1. ;;;坐标范围选择，有点类似(ssget "c" p1 p2 filter),但本函数在屏幕外的也可选择
   
2. ;;;测试 (tt (getpoint) (getpoint) '((0 . "insert")))
   
3. (defun tt (p1 p2 filter / minX minY maxX maxY)
   
4.   (setq        minX (min (car p1) (car p2))
   
5.         minY (min (cadr p1) (cadr p2))
   
6.         maxX (max (car p1) (car p2))
   
7.         maxY (max (cadr p1) (cadr p2))
   
8.   )
   
9.   (if filter
   
10.     (ssget "x"
    
11.            (append (list '(-4 . "<and")
    
12.                          '(-4 . ">=,>=,*")
    
13.                          (list 10 minX minY 0)
    
14.                          '(-4 . "<=,<=,*")
    
15.                          (list 10 maxX maxY 0)
    
16.                    )
    
17.                    (append filter '((-4 . "and>")))
    
18.            )
    
19.     )
    
20.     (ssget "X"
    
21.            (list '(-4 . "<and")
    
22.                  '(-4 . ">=,>=,*")
    
23.                  (list 10 minX minY 0)
    
24.                  '(-4 . "<=,<=,*")
    
25.                  (list 10 maxX maxY 0)
    
26.                  '(-4 . "and>")
    
27.            )
    
28.     )
    
29.   )
    
30. )
    

;;;坐标范围选择，有点类似(ssget "c" p1 p2 filter),但本函数在屏幕外的也可选择<br /> ;;;测试 (tt (getpoint) (getpoint) '((0 . "insert")))<br /> (defun tt (p1 p2 filter / minX minY maxX maxY)<br />   (setq        minX (min (car p1) (car p2))<br />         minY (min (cadr p1) (cadr p2))<br />         maxX (max (car p1) (car p2))<br />         maxY (max (cadr p1) (cadr p2))<br />   )<br />   (if filter<br />     (ssget "x"<br />            (append (list '(-4 . "<and")<br />                          '(-4 . ">=,>=,*")<br />                          (list 10 minX minY 0)<br />                          '(-4 . "<=,<=,*")<br />                          (list 10 maxX maxY 0)<br />                    )<br />                    (append filter '((-4 . "and>")))<br />            )<br />     )<br />     (ssget "X"<br />            (list '(-4 . "<and")<br />                  '(-4 . ">=,>=,*")<br />                  (list 10 minX minY 0)<br />                  '(-4 . "<=,<=,*")<br />                  (list 10 maxX maxY 0)<br />                  '(-4 . "and>")<br />            )<br />     )<br />   )<br /> )<br />

露水2

Gu_xl的方法不错

lyy

这个方法局限性太大

qcw911

学习了

snddd2000

(setq ss (ssget "_+.:S" '((0 . "INSERT"))))
(setq ss (ssget ":E:S" '((0 . "INSERT"))))
这两个效果是不是一样呢？

snddd2000

ssget有没有办法直接过滤出指定名称的动态块呢？

snddd2000

(setq ss (ssget "_+.:S" ));;唯一一个
(setq ss (ssget "_:E:S" ));;cross 标靶
这两个还是不同的，暂时是这样理解的

xcroy

好贴，学习了，谢谢！
还有这个怎么解释？
(setq ss1 (ssget "+.:E:S" '((0 . "LINE,ARC,SPLINE,LWPOLYLINE,POLYLINE,CIRCLE,ELLIPSE"))))

snddd2000

没发现
(setq ss1 (ssget "+.:E:S" '((0 . "LINE,ARC,SPLINE,LWPOLYLINE,POLYLINE,CIRCLE,ELLIPSE"))))
和
(setq ss1 (ssget ":E:S" '((0 . "LINE,ARC,SPLINE,LWPOLYLINE,POLYLINE,CIRCLE,ELLIPSE"))))
有什么区别

slzlfs

学习了，好用啊