Remove vertices from polylines

[Michael Bulatovich]

Anyone have a lisp to do this? An "aim-and-fire" approach is preferred.
--

MichaelB
www.michaelbulatovich.com

[bestafor]

HiHo;
Try this http://www.cadalyst.com/solutions/alispsols/0700als/0700als.htm


"Michael Bulatovich" <donteven@try.me> wrote in message
news:2oiLa.7128$Fe3.1113233@news20.bellglobal.com... Anyone have a lisp to do this? An "aim-and-fire" approach is preferred. -- MichaelB www.michaelbulatovich.com

[Michael Bulatovich]

I don't need this very much, so I'm not going to write one. This link would
help
if I was going to do so, however.
--

MichaelB
www.michaelbulatovich.com

"bestafor" <bestafor@hotmail.com> wrote in message
news:qklLa.45328$3d.23730@sccrnsc02... HiHo; Try this http://www.cadalyst.com/solutions/alispsols/0700als/0700als.htm "Michael Bulatovich" <donteven@try.me> wrote in message news:2oiLa.7128$Fe3.1113233@news20.bellglobal.com... Anyone have a lisp to do this? An "aim-and-fire" approach is preferred. -- MichaelB www.michaelbulatovich.com

[=?iso-8859-1?Q?J=FCrgen?= Palme]

Why you don't use the PEDIT (_Pedit -> _Edit -> Straighten ...) command?

Juergen


Michael Bulatovich schrieb: Anyone have a lisp to do this? An "aim-and-fire" approach is preferred. -- MichaelB www.michaelbulatovich.com

[=?iso-8859-1?Q?J=FCrgen?= Palme]

No, I dont't mean "decurve". I do this:

Command: _pedit
Select polyline or [Multiple]: [select a polyline]
Enter an option [Close/Join/Width/Edit vertex/Fit/Spline/Decurve/Ltype
gen/Undo]: _e

Enter a vertex editing option
[Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit]
<N>: _n
Enter a vertex editing option
[Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit]
<N>: _n
Enter a vertex editing option
[Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit]
<N>: _n

[repeat "n" (or "p") until the marker is at the first vertex - P1 -
wherefrom you want to delete vertexes]

Enter a vertex editing option
[Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit]
<N>: _s
Enter an option [Next/Previous/Go/eXit] <N>: _n
Enter an option [Next/Previous/Go/eXit] <N>: _n
Enter an option [Next/Previous/Go/eXit] <N>: _n

[repeat "n" (or "p") until the marker is at the last vertex - P2 -
whereto you want to delete vertexes]

Enter an option [Next/Previous/Go/eXit] <N>: _g

[now all vertexes between P1 and P2 will be deleted, voila]

Enter a vertex editing option
[Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit]
<N>: _x
Enter an option [Close/Join/Width/Edit vertex/Fit/Spline/Decurve/Ltype
gen/Undo]: [enter]
Command:

This command is known at least since Rel. 11.
The command lines above are a copypaste from the text window in ACAD
2004. May be in older versions this option is other labeled than
"Straighten"? Usually I use german ACAD versions.

Regards
Juergen



Michael Bulatovich schrieb: What version has that prompt? You don't mean "decurve" do you? That of course does something other than removing vertices. "Jürgen Palme" <jpalme@debitel.net> wrote in message news:3EFEA2B8.65E83D59@debitel.net... Why you don't use the PEDIT (_Pedit -> _Edit -> Straighten ...) command? Juergen Michael Bulatovich schrieb: Anyone have a lisp to do this? An "aim-and-fire" approach is preferred. -- MichaelB www.michaelbulatovich.com

[Michael Bulatovich]

Wow. No matter how long I work with this thing, I never seem to get to "know
it all".
Thanks for that one Juergen.

--

MichaelB
www.michaelbulatovich.com

"Jürgen Palme" <jpalme@debitel.net> wrote in message
news:3EFF149C.D09E7091@debitel.net... No, I dont't mean "decurve". I do this: Command: _pedit Select polyline or [Multiple]: [select a polyline] Enter an option [Close/Join/Width/Edit vertex/Fit/Spline/Decurve/Ltype gen/Undo]: _e Enter a vertex editing option [Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit] <N>: _n Enter a vertex editing option [Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit] <N>: _n Enter a vertex editing option [Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit] <N>: _n [repeat "n" (or "p") until the marker is at the first vertex - P1 - wherefrom you want to delete vertexes] Enter a vertex editing option [Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit] <N>: _s Enter an option [Next/Previous/Go/eXit] <N>: _n Enter an option [Next/Previous/Go/eXit] <N>: _n Enter an option [Next/Previous/Go/eXit] <N>: _n [repeat "n" (or "p") until the marker is at the last vertex - P2 - whereto you want to delete vertexes] Enter an option [Next/Previous/Go/eXit] <N>: _g [now all vertexes between P1 and P2 will be deleted, voila] Enter a vertex editing option [Next/Previous/Break/Insert/Move/Regen/Straighten/Tangent/Width/eXit] <N>: _x Enter an option [Close/Join/Width/Edit vertex/Fit/Spline/Decurve/Ltype gen/Undo]: [enter] Command: This command is known at least since Rel. 11. The command lines above are a copypaste from the text window in ACAD 2004. May be in older versions this option is other labeled than "Straighten"? Usually I use german ACAD versions. Regards Juergen Michael Bulatovich schrieb: What version has that prompt? You don't mean "decurve" do you? That of course does something other
than removing vertices. "Jürgen Palme" <jpalme@debitel.net> wrote in message news:3EFEA2B8.65E83D59@debitel.net... Why you don't use the PEDIT (_Pedit -> _Edit -> Straighten ...)
command? Juergen Michael Bulatovich schrieb: > > Anyone have a lisp to do this? An "aim-and-fire" approach is
preferred. > -- > > MichaelB > www.michaelbulatovich.com

[TomD]

Michael Bulatovich wrote:
<SNIPPED>LWPolys create a whole set of problems and complicate it. I think youwould have to do some sort of proximity type thing to find the selectedpoint. I also imagined this approach. When did they switch to LWPolys?

I believe they were introduced in R14. You can convert them first, but
for my work, and IMO, that's an unacceptable thing to do. Waaaay to
much potential for serious bloating.
If you're interested I can send you a couple of my routines for gettingpoint lists from polylines. (No promises on useability, of course. Iwrote them for very specific purposes.) Thanks Tom, but for my purposes the [slightly klunky] PEDIT function will do.

Same for me. When I'm editing PLines, they're generally 3D and it's
usually not just deleting. Some inserting, some moving, some deleting.
I've become proficient enough using PEDIT.