LISP to remove duplicate lines and segments

[kaos...@my-deja.com]

Does anyone have a LISP for r14 that will remove extra lines and line
segments that overlap oters?

Thanks
kaos...@my-deja.com

Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.

[John Burrill]

It would be called map except that it only works with lines whose
endpoints are very close together.

[Zbigniew Zborowski]

Posible way is to make a routine with:
1) select all or user choosen selection set
2) thru all line or line-segment entities in this selection extracting a
first and last point of line
3) make a small offsets of this point - to create a very closed window
4) call this points to ssget with window options and store this reported
selections
5) if selectoin is not empty erase it, but without a base-entities

Darek Sedziak.

[kaos...@my-deja.com]

In article <7lbqhm$dd...@adesknews2.autodesk.com>,

Thanks for the info, but I haven't any experience or knowledge on
programming for AutoCAD....yet. That is one of the things I plan on
fixing at AU though.

Kaosfury

[Jon Rizzo]

rather than creating a small offset, I think you can call ssget by
specifying a fence that is only defined by one point. This one point
can be the start or end point of your objexct. I'm not certain this
will work, but I'm pretty sure.

Even if this doesn't work, you should be aware of one thing...Before
you erase the entire selection set, you need to verify that the
objects are identical. It's not great drawing practice, but sometimes
you WANT 2 of the same objects with 1 or 2 properties slightly
different (layer for example). I would advise comparing all
properties to the first object in the selection set. and then erase
erase the ones that are in fact identical.

On Wed, 30 Jun 1999 03:15:07 +0100, "Zbigniew Zborowski"