how to make cross section from 3D Polyline

[zwonko]

Give sample dwg, mark what You need.

Also write od You want to set section number manualny od it should be increment.

Maybe just LeeMac NumInc lsp is what You need. 

Edited September 22, 2021 by zwonko

[AirBall]

I modified a litle bit a LISP long_section_3dp and a result is first section in example.dwg. Can anyone help me to modified a lisp to look similar like the second section in dwg (to add vertical scale bar, scale and number of point and distance between).

 

 

example.dwg long_section_3dp - modified.lsp

[Guest]

Hi, I use block attribute for the points. Is it possible to include in the update to read the numbers of the attributes and insert them to the long section ?

example.dwg

[AirBall]

Hello, 

Does anybody know how to set default value for horizontal and vertical scale 100 , and starting chainage 0 in previous LIPS long_section_3dp. But I want to keep option to enter scale.

 

 (setq h_s (getint "\nEnter horizontal scale :"))
   (setq v_s (getint "\nEnter vertical scale :"))
   (setq tex1 (getreal "\nEnter starting chainage :"))
 

[aridzv]

a litle late...

 (if (not(setq h_s (getint "\nEnter Horizontal Scale<100> :")))
 (setq h_s 100))

 (if (not(setq v_s (getint "\nEnter Vertical Scale<100> :")))
 (setq v_s 100))

 (if (not(setq tex1 (getreal "\nEnter Starting Distance<0> :")))
 (setq tex1 0))