交点打断

chang1622

程序交点打断
(command "_.break" (car(entsel)) pause "@")
只能选择一个点，如何添加第二点或多点选择？


谢谢大家！

Gu_xl

(command "_.break" (car(entsel)) pause pause)

chang1622

谢谢版主！
不过(command "_.break" (car(entsel)) pause pause)，只是连续选择对象。
我要的是连续选择第二或更多的交点

Gu_xl

chang1622 发表于 2014-5-22 09:24
谢谢版主！
不过(command "_.break" (car(entsel)) pause pause)，只是连续选择对象。
我要的是连续选择第 ...

(defun c:tt()
  (while (and
           (setq pt (getpoint "\n打断位置点:"))
           (setq ss (ssget pt '((0 . "*line,arc"))))
           )
    (setq e (ssname ss 0))
    (command "break" e pt "@")
   
    )
  )

ymcui

Gu_xl 发表于 2014-5-22 08:18
(command "_.break" (car(entsel)) pause pause)

按现在程序点上下的就删除右边的，点左右就删除下边的.两点打断如何指定要删除那边就删除那边?