Connect the Dots

[Anonymous]

Based on the article by Matt Kolberg posted at Civil3d.com today, I finished
up a little lisp that I started early last year (prior to jumping on the
.NET bandwagon). It does exactly what Matt describes, but all within the
drawing editor. All the user need do to connect Points with identical
descriptions, in the order of the point numbers, is select any point whose
description they wish to match and Voila! a 3dPolyline is drawn connecting
those points. Not as fancy as Figures/Autolinework when importing points,
but it works for misc. shots which weren't coded properly for use with the
other method.

Load the lisp, command name is CONNECTPTS

Someday soon I'll probably port this for use in the infamous SincPac3D, but
this is all I had time for today. Thanks to Matt for reminding me of this
unfinished routine. I could have used it recently to save quite a bit of
time.

Enjoy!

[Anonymous]

And as Matt has pointed out to me, you must issue (vl-load-com) prior to
running it. I have this loaded in my acad.lsp file so I always forget that
C3D2008 does not load it by default.


"Jeff Mishler" wrote in message
news:5669559@discussion.autodesk.com...
Based on the article by Matt Kolberg posted at Civil3d.com today, I finished
up a little lisp that I started early last year (prior to jumping on the
NET bandwagon). It does exactly what Matt describes, but all within the
drawing editor. All the user need do to connect Points with identical
descriptions, in the order of the point numbers, is select any point whose
description they wish to match and Voila! a 3dPolyline is drawn connecting
those points. Not as fancy as Figu
res/Autolinework when importing points,
but it works for misc. shots which weren't coded properly for use with the
other method.

Load the lisp, command name is CONNECTPTS

Someday soon I'll probably port this for use in the infamous SincPac3D, but
this is all I had time for today. Thanks to Matt for reminding me of this
unfinished routine. I could have used it recently to save quite a bit of
time.

Enjoy!

[Anonymous]

How do you issue (vl-load-com)?

Hello Jeff Mishler miffATsonicDOTnetIS_ALL,

> And as Matt has pointed out to me, you must issue (vl-load-com) prior
> to running it. I have this loaded in my acad.lsp file so I always
> forget that C3D2008 does not load it by default.
>
> "Jeff Mishler" wrote in message
> news:5669559@discussion.autodesk.com...
> Based on the article by Matt Kolberg posted at Civil3d.com today, I
> finished
> up a little lisp that I started early last year (prior to jumping on
> the
> NET bandwagon). It does exactly what Matt describes, but all within
> the
> drawing editor. All the user need do to connect Points with identical
> descriptions, in the order of the point numbers, is select any point
> whose
> description they wish to match and Voila! a 3dPolyline is drawn
> connecting
> those points. Not as fancy as Figu
> res/Autolinework when importing points,
> but it works for misc. shots which weren't coded properly for use with
> the
> other method.
> Load the lisp, command name is CONNECTPTS
>
> Someday soon I'll probably port this for use in the infamous
> SincPac3D, but this is all I had time for today. Thanks to Matt for
> reminding me of this unfinished routine. I could have used it recently
> to save quite a bit of time.
>
> Enjoy!
>

[Anonymous]

Many ways.... 🙂
At the command prompt just type it in:
Command: (vl-load-com)

Add it to the lisp I posted as the very first line.

Add it to your acad.lsp file so it loads everytime you start Acad/C3D.


"LM" wrote in message news:5670482@discussion.autodesk.com...
How do you issue (vl-load-com)?

Hello Jeff Mishler miffATsonicDOTnetIS_ALL,

> And as Matt has pointed out to me, you must issue (vl-load-com) prior
> to running it. I have this loaded in my acad.lsp file so I always
> forget that C3D2008 does not load it by default.
>
> "Jeff Mishler" wrote in message
> news:5669559@discussion.autodesk.com...
> Based on the article by Matt Kolberg posted at Civil3d.com today, I
> finished
> up a little lisp that I started early last year (prior to jumping on
> the
> NET bandwagon). It does exactly what Matt describes, but all within
> the
> drawing editor. All the user need do to connect Points with identical
> descriptions, in the order of the point numbers, is select any point
> whose
> description they wish to match and Voila! a 3dPolyline is drawn
> connecting
> those points. Not as fancy as Figu
> res/Autolinework when importing points,
> but it works for misc. shots which weren't coded properly for use with
> the
> other method.
> Load the lisp, command name is CONNECTPTS
>
> Someday soon I'll probably port this for use in the infamous
> SincPac3D, but this is all I had time for today. Thanks to Matt for
> reminding me of this unfinished routine. I could have used it recently
> to save quite a bit of time.
>
> Enjoy!
>

[sboon]

Hi Jeff,

Any chance of getting a 2009 version of this program? It's the best thing out there for joining up data from surveyors who use their own coding.

PS: If this version could create feature lines instead of 3d Polylines then that would be even better!

Thanks,

Steve Boon

[Anonymous]

To work in 2009, changing this section of the code:

(cond ((vl-string-search "R16.2" vrsn)(setq appstr "3.0"));;2006
((vl-string-search "R17.0" vrsn)(setq appstr "4.0"));;2007
((vl-string-search "R17.1" vrsn)(setq appstr "5.0"));;2008
(t (alert "This version of C3D not supported!"))
)

to this:

(cond ((vl-string-search "R16.2" vrsn)(setq appstr "3.0"));;2006
((vl-string-search "R17.0" vrsn)(setq appstr "4.0"));;2007
((vl-string-search "R17.1" vrsn)(setq appstr "5.0"));;2008
((vl-string-search "R17.2" vrsn)(setq appstr "6.0"));;2009
(t (alert "This version of C3D not supported!"))
)

should be all that is needed. I haven't had much time to play with the 2009
API yet so I'm not sure if the Featureline request can be done. But I will
look into it as time permits.

I'm glad you have found this tool useful!

Jeff

"SBoon" wrote in message news:6013818@discussion.autodesk.com...
Hi Jeff,

Any chance of getting a 2009 version of this program? It's the best thing
out there for joining up data from surveyors who use their own coding.

PS: If this version could create feature lines instead of 3d Polylines then
that would be even better!

Thanks,

Steve Boon

[TSymanneck]

Hi Jeff,

and what must we change, if we want to use this in C3D 2010?

And have you a chance founded for the feature line?

Best regards
Thomas

[Anonymous]

Below this line:

((vl-string-search "R17.2" vrsn)(setq appstr "6.0"));;2009

add this line:

((vl-string-search "R18.0" vrsn)(setq appstr "7.0"));;2010

I'm unable to test that at the moment, but it should
work.

Sorry, I haven't looked at the Featureline
request......I actually forgot about that request. Now that you've jogged my
memory I will look into it this afternoon.

Jeff

style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">

"tsymanneck" wrote in message
href="news:6200567@discussion.autodesk.com">news:6200567@discussion.autodesk.com...

Hi
Jeff, and what must we change, if we want to use this in C3D 2010? And have
you a chance founded for the feature line? Best regards
Thomas

[TSymanneck]

Hi Jeff,

this was my first suspicion, but it doesn't work.

1. I type (vl-load-com) in the commandline - what will do this?
2. I load the changed LISP
... and then I get the following message:

Befehl: Connectpts
; Fehler: Fehlerhafte Zeichenfolge für ssget-Modus = in english: incorrect character sequence in ssget

Have you any idea?

Best regards
Thomas

[Anonymous]

I don't have 2010 on this pc yet (I'm still at home
getting ready to head for work). I'll check it out once I get to the office,
about an hour from now.

style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">

"tsymanneck" wrote in message
href="news:6200627@discussion.autodesk.com">news:6200627@discussion.autodesk.com...

Hi
Jeff, this was my first suspicion, but it doesn't work. 1. I type
(vl-load-com) in the commandline - what will do this? 2. I load the
changed LISP ... and then I get the following message: Befehl: Connectpts ;
Fehler: Fehlerhafte Zeichenfolge für ssget-Modus = in english: incorrect
character sequence in ssget Have you any idea? Best regards
Thomas

[Anonymous]

Attached is a revised lisp that should work. It does
here, so if it doesn't there it's due to the language version and I have no way
to test it.

As for the featurelines, it looks like that option could
be added. However, it would involve a fair amount of work to get setup
correctly.....featurelines mean working with Sites and Featureline Styles so a
determination would have to be made, either by the user or hardcoded into the
routine, how to handle those options. This is more work than I care to put into
this routine....but if someone else would like to take a stab at it using my
code as a base, feel free to do so.

Here's a hint to get started.....

To add the Featureline to a site you must use the
AddFromPolyline method of the Featurelines Collection of a Site. That method
takes 2 arguments, the polyline ObjectID and a Featureline Style (as an ActiveX
Object).

style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">

"tsymanneck" wrote in message
href="news:6200627@discussion.autodesk.com">news:6200627@discussion.autodesk.com...

Hi
Jeff, this was my first suspicion, but it doesn't work. 1. I type
(vl-load-com) in the commandline - what will do this? 2. I load the
changed LISP ... and then I get the following message: Befehl: Connectpts ;
Fehler: Fehlerhafte Zeichenfolge für ssget-Modus = in english: incorrect
character sequence in ssget Have you any idea? Best regards
Thomas