Trim at every other intersection LISP

Trim at every other intersection LISP

Anonymous
Not applicable
1,934 Views
2 Replies
Message 1 of 3

Trim at every other intersection LISP

Anonymous
Not applicable

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/...

 

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:

trim result.PNG

 

 

Has anyone come across such a routine? 

0 Likes
Accepted solutions (1)
1,935 Views
2 Replies
Replies (2)
Message 2 of 3

Ranjit_Singh
Advisor
Advisor
Accepted solution

@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

0 Likes
Message 3 of 3

Anonymous
Not applicable

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

trim result 2.PNG

0 Likes