本帖最后由 vlisp2012 于 2013-10-9 16:27 编辑
通过ssget获得的选择集的排序,无法很好的控制,每次下面材的时候,都是通过fence,画线选择板块,很繁琐。
我想编辑一个程序,通过x坐标和y坐标来对面材(封闭多段线)排序后,进行板块的编号,得到排序后的选择集如下:
(((434613.0 -21571.4) ) ((441013.0 -21571.4) ) ((433388.0 -21571.4) ) ((441013.0 -19151.4) ) ((439413.0 -19151.4) ) ((436213.0 -19151.4) ) ((434613.0 -19151.4) ) ((433388.0 -19151.4) ) ((437813.0 -19151.4) ) ((441013.0 -16711.4) ) ((439413.0 -16711.4) ) ((437813.0 -16711.4) ) ((436213.0 -16711.4) ) ((434613.0 -16711.4) ) ((433388.0 -16711.4) ) ((433388.0 -14031.4) ) ((434613.0 -14031.4) ) ((436213.0 -14031.4) ) ((437813.0 -14031.4) ) ((439413.0 -14031.4) ) ((441013.0 -14031.4) ))
我想问大家的是,怎样将上表中,为排序而采用的坐标删掉呢?
我想要的表如下:
(() () () ( ) ( ) ( )…… )
程序如下:(defun c:tt ()
(command "undo" "be")
(princ "\n 选择四边形:"