Topic: Triangulation (re-visited)

[pedroantonio]

Hi ymg I found an error with the breaklines. Can you fix it ?

Thanks

[topograph]

I think that lines on zero plane cannot be breaklines.
Try to connect points on your breaklines with 3dpolyline, it work perfect.
....
 In this drawing, check "BLOCK" option in TIN dialog

[pedroantonio]

Thank you topograph.

[pedroantonio]

Any news about Profile Along An Alignment ?

[sanju2323]

hi, how to plot interpolate elevation grid using lisp.

[ymg]

sanju,

Don't know if it is a question , but assuming it is,
all you need to do is to give a starting coordinates
and a spacing then call getz in a loop.

ymg

[ymg]

Topographer,

I've done some more work on profile.

However I am still not set as to how we should define an alignment.

It could be a 3dpolyline with extended data to define the horizontal curves
the vertical curves, the spirals etc.

All this not entirely clear in my head.

As it is you can get the profile from a simple lwpolyline or a 3dpoly (Straigth Line Only)

ymg

[sanju2323]

YMG sir,
        I need lisp to draw spot elevation at grid format.

[ElpanovEvgeniy]

hi, You can plot the surface of the 3d elevation grid using lisp.

[ymg]

Hi Evgenyi,

Assuming he has a break line in this zone, the triangulation
would be a Constrained Delaunay Triangulation. (CDT)

From sanju's sample drawing, he did not triangulate  and contour
it with your routine or my modifications of it.

We have not seen much of you lately, hope everything is fine.

How would you address the internal storage of alignment for profile ?

ymg

[sanju2323]

First I think you are not turn on all layers of sample drawing.
Second I don't know how to calculate and plot to elevation grid via lisp.

[RAYAKMAL]

I found out on TriangV0.5.9A.LSP

The result of

Code: [Select]


(setq prof (cons (list (vlax-curve-getDistAtPoint en p) (caddr (getz p t1 t2 t3))) prof))


sometimes contains nil and crashes my program. I modified it and use this instead:

Code: [Select]

      (if (vlax-curve-getDistAtPoint en p)
        (setq prof (cons (list (vlax-curve-getDistAtPoint en p)
                               (caddr (getz p t1 t2 t3))
                         )
                    prof)
        )
      );end if



[sanju2323]

RAYAKMAL sir,
    Please attach lisp TriangV0.5.9A.LSP If you made changes

[RAYAKMAL]

RAYAKMAL sir,
    Please attach lisp TriangV0.5.9A.LSP If you made changes

Sorry, I don't think I have a right to change anything. Probably what the other found is different than mine.
I just mentioned here in the forum, just in case someone use some of the codes from TriangV0.5.9A.LSP and found the same error.
Anyway, thank you for your suggestion.

[sanju2323]

Profile From Contour Lines