topic Re: Subject: Divide closed object into equals parts with gap in Visual LISP, AutoLISP and General Customization Forum

Divide closed object into equals parts with gap

40901305 — Sun, 14 Jun 2020 11:55:00 GMT

Hi everyone, I'm new to AutoLisp and started using those few days ago which I found helping a lot to my work.

This Lisp I found on the internet can do part of my work. However I need to leave a gap between every sections after dividing. Please advise me on this.

Thanks so much.

Re: Divide closed object into equals parts with gap

hak_vz — Sun, 14 Jun 2020 13:34:50 GMT

You should give more details how would you like gapes to be created. This code has been written by @Kent1Cooper so it would be fair that to let him make adjustments.

Re: Divide closed object into equals parts with gap

40901305 — Sun, 14 Jun 2020 13:46:48 GMT

Thanks hak_vz, I meaned after division, between sections which were divided, there are gaps that seperate them. Sorry @Kent1Cooper, please feel free to help me out with this. I'm appreciated with many thanks.

Subject: Divide closed object into equals parts with gap

Udo_Huebner — Sun, 14 Jun 2020 14:00:26 GMT

You can do this manually using the command _LENGTHEN. An then you can do it in the lisp macro as well.

Modify the function subdiv and add a lengthen command.

(defun subdiv (obj brks) (repeat brks (command "_.break" obj (setq pt (trans (vlax-curve-getPointAtDist obj seclen) 0 1)) "@" ); end command ; create a -1 gap on the initial entity (command "_.Lengthen" "_delta" -1 (list obj pt) "") (setq obj (entlast)) ); end repeat ); end defun - subdiv

Re: Subject: Divide closed object into equals parts with gap

40901305 — Sun, 14 Jun 2020 15:57:55 GMT

Thanks a lot Udo, I just tested with your additional code, work well while dividing line and spline. However when using for closed object, when using the code it seems not work very well, and can not work on circle also. Maybe needing some more adjustment.

Re: Subject: Divide closed object into equals parts with gap

Udo_Huebner — Sun, 14 Jun 2020 16:43:15 GMT

Yes, it was just an idea of how to solve it, not the complete solution for every situation.

The case of circles, ellipses and closed splines is not completely handled by my code change.
This is because the gap is currently being added to the part that was cut off from the beginning of the object. So the length of the last segment remains unchanged so far. I don't know if this is a problem for you.

You still have to explain in more detail how the gap should be designed. So there is still much room for improvement.

Re: Subject: Divide closed object into equals parts with gap

40901305 — Sun, 14 Jun 2020 17:03:35 GMT

Thanks Udo for explanation, I just did an example as attachment. When dividing closed object, also create a gap at the cut point. I have to deal with around 350 closed objects so one by one is frustrating. That's why I'm looking for a lisp that let me choose multiple closed object and when I hit enter, automatically divide by 2 and add 2 gaps. The one written by Kent Cooper help me out with automatic dividing.

Re: Subject: Divide closed object into equals parts with gap

Udo_Huebner — Sun, 14 Jun 2020 17:20:00 GMT

Is the gap size fixed or do you prefer to ask for the gap?

Re: Subject: Divide closed object into equals parts with gap

40901305 — Sun, 14 Jun 2020 17:29:31 GMT

Dear Udo, could you please help me to make it ask for the gap at first. Thanks so much

Re: Subject: Divide closed object into equals parts with gap

Udo_Huebner — Sun, 14 Jun 2020 17:50:17 GMT

if the Objects are closed, do you expect the first gap on the start point or elsewhere?
And whats about multi select objects?
what AutoCAD version you are using? The error handler contains (command..) that have to be rewritten in newer versions. See http://help.autodesk.com/view/OARX/2021/DEU/?guid=GUID-620E034A-9151-427F-B6F5-B360D14DA925
I cannot imagine the real sense of this action. In general, I would avoid breaking objects only for visual reasons. You can place circular blocks with wipeouts instead on every breakpoint.
Please explain your intention.

Re: Subject: Divide closed object into equals parts with gap

john.uhden — Sun, 14 Jun 2020 17:56:37 GMT

Well, not circular blocks with wipeouts but multi-sided polygons will work.

Re: Subject: Divide closed object into equals parts with gap

40901305 — Sun, 14 Jun 2020 18:03:01 GMT

Dear Udo, I'm using AutoCAD 2020 and doing a project relating to laser cutting. Making gaps remains my pieces on the board and not fall out after cut. I'm adjusting my project frequently for best fitting so needed for making gaps again and again, that's why I need applying on multiple objects.

For example: I divide a circle in to two equal curve, between them are 2 gaps that I can adjust.

Re: Divide closed object into equals parts with gap

john.uhden — Sun, 14 Jun 2020 18:15:41 GMT

This is eerily similar to the Stripe.lsp I recently submitted with the difference that the gap length can be specified only approximately. It will have to be computed using the remains of a whole (integer) number of pen-downs.

With that, you can try figuring it out yourself. It's much more satisfying than just grabbing someone else's cooked and served code. That's probably why I like cooking; the recipes I find are only a guide as to what ingredients might want to be included. Yeah, okay, chicken is chicken but scallions are not shallots. And if you want to get more volume out of your au poivre sauce, go ahead and mix it into some Knorr brown gravy mix. And be brazen and throw in some sliced mushrooms, and of course the slightly sauteed chopped shallots. I used to use the Knorr mushroom gravy mix, but I can't find it anymore here around the Jersey Shore.

Re: Subject: Divide closed object into equals parts with gap

Udo_Huebner — Sun, 14 Jun 2020 18:42:47 GMT

Ok I upload an updated version. Feel free to test. I am off for the next 2 days.

Re: Subject: Divide closed object into equals parts with gap

devitg — Sun, 14 Jun 2020 22:21:36 GMT

@40901305 What about if you would started your post with a clear explanation , and some sample.dwg

as @john.uhden state, making meal , need recipe, cooking tools, a range or an oven, and mainly WHAT you want to meal.