LISP TO EXTRACT DISTANCES OF INTERCEPTIONS TO EXCEL

LISP TO EXTRACT DISTANCES OF INTERCEPTIONS TO EXCEL

Anonymous
Not applicable
953 Views
1 Reply
Message 1 of 2

LISP TO EXTRACT DISTANCES OF INTERCEPTIONS TO EXCEL

Anonymous
Not applicable

Hi,

I am in need for some help creating a LISP.

Right now to do this procedure I am using 65_Mark_Int.FAS which first opens a window a lets you select the name of the .csv file to be created and lets you choose where to save it, then asks for a base pline and then asks to select all intercepting lines, then it produces a .csv file with the path distance form vertex 1 of the base pline to all interceptions with the name of the layer that is creating the interception as shown in the "format example mark-int" file attatched.

 

After that I need to do some editing to that .csv file to get it to the format I need to run the next lisp, this format is as shown on file "format example after editing".

 

Once I have that edited .csv file I use IP.lsp which opens a window to browse for that .csv file and after selected it inserts the corresponding blocks (blocks with the same name of the intercepting layers, on this example "A B C D E F G") on the coordinates provided by columns A and B (where A are the distances between vertex 1 and the interceptions and B will always be a column of "0").

 

ALL EXAMPLES ATTACHED

 

What I need help with is somehow joining them together in ONE single LISP that has two options,  a "PEX" (Profile Extraction) and a "PIN" (Profile Insertion). Same idea, PEX lets you put the name of the .csv to be created and select its path withing the computer and then asks for a base pline and all intersecting plines after, then creates a .csv file with that information but in the format of the 2nd example after editing. Then PIN asks you to browse for that file and inserts the blocks pertinently. 

 

If someone could help me it would be greatly appreciated,

 

Thank you in advance,

Jorge Garcia.

 

0 Likes
954 Views
1 Reply
Reply (1)
Message 2 of 2

Anonymous
Not applicable

This is the command that I am using, the other one can be found here http://esurveying.net/land-survey/free-lisp-find-intersecting-polyline-layers

0 Likes