论坛 › XDRX_API应用 › 快速生成直骨架

newer 发表于 2025-1-9 18:14:58

快速生成直骨架

(defun c:tt ()
(and (setq ss (xdrx-ssget
                      (xdrx-string-multilanguage
                        "\n选择带洞多边形<退出>:"
                        "\nSelect polygon with holes <exit>:"
                      )
                      '((-4 . "<and")
                        (0 . "*polyline")
                        (-4 . "&=")
                        (70 . 1)
                        (-4 . "and>")
                     )
                  )
         )
         (xdrx_polygon_get_interior_skeleton ss t t)
      )
(princ)
)

查看完整版本: 快速生成直骨架