break at a point....help

[leonucadomi]

hello:

I want to run break command from lsp

the problem is that I want to break only at one point and it breaks me at two points

when i write break in the command line

this is shown

 

 

 

I use this line

(command "_break" "\\" "\\" "")

 

but I would like to break only at one point without having to use the icon

 

any suggestions?

 

 

 

 

[mhupp]

(command "_BREAK" (car (entsel "\nSelect Entity")) (getpoint "\nBreak at point") "@")

Edited December 13, 2022 by mhupp

[elyosua]

(DEFUN c:PartirEnPunto ()
  (PRINC "\n")
  (COMMAND "_.break" pause "_f" pause "@")
  (PRIN1)
)

[aridzv]

this is what I use to break by one point:

(defun c:Brk_Fp ()
 (if (and
       (setq ss (ssget ":S"))
       (setq pt (getpoint "\nSelect break point: "))
     )
  (progn
   (setq ename (ssname ss 0)) 
   (command "_.break" ename "_none" pt "_none" pt)
  )
 )

 (princ)
)

 

[j2lstaples]

I recently just saw this post and I've been trying my best to try to recursively break a polyline at points (in a list) that may or may not be on it.

So far, no luck. I'll sleep on it a while.

[troggarf]

There is a new BREAKATPOINT command that does this.

I made an alias of BAP for it

Edited January 2, 2023 by troggarf
Spelling

[Alexander]

On 12/13/2022 at 5:05 PM, leonucadomi said:

hello:

I want to run break command from lsp

the problem is that I want to break only at one point and it breaks me at two points

when i write break in the command line

this is shown

 

 

 

I use this line

(command "_break" "\\" "\\" "")

 

but I would like to break only at one point without having to use the icon

 

any suggestions?

 

 

 

 

 

Hi, I use

 

(defun c:bn ()(command "break" PAUSE "F")) 

 

to break at 2 points, but at one point

 

(defun c:nm ()
(setq p1 (getpoint "Punto de corte..."))
(command "break" pause "F" p1 p1)
)

 

its not a great solution, but may be you think a another best solution!!!

 

 

 

 

 

 

[SanganakSakha]

Quick and dirty code - (no error checking no data validation)

 

(setq brekData (nentsel "\nClick break point: "))
(setq entToBrek (car brekData))
(setq brekPt (cadr brekData))
(command "_.Break" entToBrek brekPt brekPt)