求助.在Autolisp中选取略等于指定数的物体

cxs863

求助.
在Autolisp中选取略等于指定数的物体.
我要选中所有半径为2.55的圆
(setq r 2.55)
(setq getone (ssget "x"(cons 40 r)))
以上语句只能选出 r 等与2.55的圆.
  但是我想将略等于2.55也要全部选中.
如:2.551,2.549•••等都一次选中.
不知要如何才能做到?
还请各位高手指点.
谢谢!

陈伯雄

chg

(setq ss (ssget "x" '((-4 . "<and")
                        (-4 . "<and")
                          (0 . "CIRCLE") (-4 . "<=") (40 . r1)
                        (-4 . "and>")
                        (-4 . "<and")
                          (0 . "CIRCLE") (-4 . ">=") (40 . r2)
                        (-4 . "and>")
                      (-4 . "and>"))
           )
  )

cxs863

非常感谢俩位的指点.
求版主能讲详细点
最好能具例说名一下.

cxs863

我已照chg兄弟的指点将问提搞定.
请求版主给chg兄弟加奖.以作鼓励.
再次谢谢俩位!