这是一个很好用测绘实用工具，各位同行可以下来用一下。((setvar "cmdecho" 1) (setq en (ssget (list '(0 . "spline,arc,line,ellipse,LWPOLYLINE")))) (setq i 0) (setq ll 0) (repeat (sslength en) (setq ss (ssname en i)) (setq endata (entget ss)) (comm

介绍了ssget在lisp中的应用，各种用法，应有尽有！(Introduces the application of ssget in lisp, various kinds of usage, everything!)