[求助]有没有把首尾相连的直线转成3DPOLY(3P线)的方法？

yubfang

RT，工作中经常遇到要把一些首尾相连的直线转成3P线，因为3P线不好编辑，所以希望有这样一个程序，可以框选一些首尾相连的直线，自动转成3DPOLY（因为要提取它的坐标，包括Z坐标），不知道哪位大师有时候帮搞一个？顺便问一下大家遇到这种问题是怎么搞的？难不成也像我一样，几百条直线一根一根的描？谢谢了。

AMTONNY

呵呵，这个太好办了，看看这样行不？ 

(DEFUN C:ppp()
(command "pedit"  "m"  "all" "" "y"  "j"  "" )
(princ "\n全部多段线已合并:")(princ))

yubfang

不行的，我说的是转成3DPOLY线，因为这些直线不共面，做成3DPOLY线的目的是为了提取点坐标，或者扫描之用。不过还是先谢谢这位仁兄。