社区 › AutoLISP/Visual LISP 编程技术 › ssget 后跟mode 的部分理解(不断更新)

Gu_xl 发表于 2011-1-22 21:46:03

回复 露水2 的帖子


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

露水2 发表于 2011-1-24 11:32:08

Gu_xl的方法不错

lyy 发表于 2011-1-24 20:31:05

这个方法局限性太大

qcw911 发表于 2011-2-10 16:15:49

学习了

snddd2000 发表于 2011-3-9 14:04:01

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

snddd2000 发表于 2011-3-9 14:05:25

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

snddd2000 发表于 2011-3-9 14:41:16

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

xcroy 发表于 2011-3-16 13:33:32

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

snddd2000 发表于 2011-3-17 13:58:26

没发现
(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 发表于 2011-3-17 20:50:33

学习了，好用啊

查看完整版本: ssget 后跟mode 的部分理解(不断更新)