lisp中getword输入默认_ssget用法大全（基本上把能想到都覆盖了）

(setq ss (ssget ":S" '((0 . "LINE"))))        ;只选取一次直线(省约回车)

(setq ss (ssget "X" '((0 . "LINE"))))        ;自动选取直线，包含冻结的直线

(setq ss (ssget "A" '((0 . "LINE"))))        ;自动选取直线，不包含冻结的直线

(setq ss (ssget '((1 . "*[0-9]*"))))        ;只选取含数字的文本

(setq ss (ssget '((1 . "*#*"))))        ;只选取含数字的文本

(setq ss (ssget '((0 . "TEXT") (1 . "~*[~`--9]*")))) ;只选取数字文本

(ssget '((0 . "TEXT")(-4 . "")));只选择不是数字的文字

(ssget '((0 . "TEXT")(1 . "~*#*")));只选择不是数字的文字

(setq ss (ssget '((0 . "TEXT")(1 . "#,1#,2#,3#,4#,50"))));选取1—50的数字文本

(SETQ SS (SSGET '((0 . "*text")(1 . "*(*,*)*,*(*,**)**"))));选取含括号的文本

(setq ss (ssget '((1 . "*[a-A-z-Z]*"))));只选取字母

(setq ss (ssget '((0 . "~insert")))) ;选取不含块的对象

(SETQ ss (ssget (list '(0 . "CIRCLE")(cons 40 RR))));按半径的大小选取圆

(setq ss (ssget ":E:S" '((0 . "line"))));选取拾取框内的直线,选取不到就结束

(setq ss (ssget ":E" '((0 . "LINE"))));选取拾取框内的直线,选取不到就不结束，直到按右键

(setq ss (ssget ":N" '((0 . "LINE"))));只有通过窗口、窗交点拾取

(setq ss (ssget "

" '((0 . "LINE"))));会累加选取的直线,同一条直线，选取两次个数就会乘以2，3次则3.....

(setq ss (ssget "

" '((0 . "LINE"))));提示有几个在锁定图上,选取没有的锁定的直线

(setq ss (ssget &quot

" '((0 . "