break all lisp Break all crossing LISP

[Jojo]

Happy new year, I have an old lsp that someone gave me but it stops working when I updated to Map3d 2023. What it supposed to do is break all the polyline that crosses it or touches it, it's like break at point. can someone please take a look and see. thank you in advance.

breakall.LSP

[Steven P]

I just tried it and appears to work for me, breaking the crossing lines and leaving a gap. I am on AutoCAD 2022, not Map2023 but the basic commands should still work the same.

 

Do you get any error messages or indication how far through the routine it goes before it stops? (Or even if it completes what it thinks it is meant to do with no result)

[pkenewell]

@Jojo Sorry i don't have Map 2023 to test this, but maybe some of the objects in your selection set are Map2023 custom objects that have a name that ends in "...LINE"?

 

I would try making the ssget statement more specific and see if that works:

change
(setq ss (ssget '((0 . "*LINE,ARC"))))
to
(setq ss (ssget '((0 . "*POLYLINE,LINE,ARC"))))

 

[Jojo]

@pkenewell that didn't work. thank you!

[pkenewell]

28 minutes ago, Jojo said:

@pkenewell that didn't work. thank you!

@Jojo Ok sorry I couldn't help more. 

[mhupp]

Try CAB's BreakAll its up to version 23 at the swamp but you can find some version posted here.

[Tsuky]

Quote

I updated to Map3d 2023

I have this, specifically for map. (but should also work without a map)
This breaks all the selected LWpolylines together, but for map also keeps the object data (as well as the xdata) for the new segments: which the native "_BREAK" command does not do.
Can this be a starting point?

break_all_lwpoly.lsp

[Jojo]

On 1/6/2024 at 7:37 AM, Tsuky said:

I have this, specifically for map. (but should also work without a map)
This breaks all the selected LWpolylines together, but for map also keeps the object data (as well as the xdata) for the new segments: which the native "_BREAK" command does not do.
Can this be a starting point?

break_all_lwpoly.lsp 8.25 kB · 5 downloads

Thank you Tsuky. it work.