topic Trim at every other intersection LISP in Visual LISP, AutoLISP and General Customization Forum

Trim at every other intersection LISP

Anonymous — Wed, 26 Apr 2017 20:40:57 GMT

I am looking for a lisp to trim a line at every other intersection. I found something that very similar to my needs here: https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/routine-to-trim-every-other-segment/td-p/3555362

I am not skilled with visual LISP so I am unable at present to attempt to modify the routine I found.

Here is a screenshot of what I am after:

Has anyone come across such a routine?

Re: Trim at every other intersection LISP

Ranjit_Singh — Wed, 26 Apr 2017 23:35:40 GMT

@Anonymous wrote:

.................

https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/routine-to-trim-every-other-segment/td-p/3555362

.....................

Did you try the swamp link on that post

http://www.theswamp.org/index.php?topic=42350.0 Looks like it will work for you

Re: Trim at every other intersection LISP

Anonymous — Thu, 27 Apr 2017 12:56:27 GMT

ranjit.singh

I tried the second lisp in that thread and that did not work. This morning I realized there was a revision I missed. That works pretty well but missed a few lines at one end and oddly trimmed one of the intersecting lines (i drew that line back in and colored it red for illustration below). It is serviceable for my needs currently. Perhaps as I learn more about LISP, I will be able to debug that or determine what's going on with this file.

Also, these polylines were created from a third party program and I've had a few problems with them otherwise so that could be the issue. (sometimes, but not always they will lose 1 and only 1 vertex when I join all these newly trimmed lines to the existing polylines.)

But this works, Thanks