I am new on this forum and in a search for LISP for auto levelling (Z axis ) of a level point.

Problem:

I am a landscape architect and working with pathways, plateaus that need to be leveled (actually this is not a problem , just intro :). At this moment I am using simple block with attribute that suffices graphical part of a drawing but when it comes to making a 3d model civil engineer (who makes 3dmodel) has to make a point for each level symbol and to put Z value for each point so we are spending a lot of time on this... I hope you understand our problem...we are very slow...

Here is the idea of what i need (in my opinion) to accelerate the process:

I would like to have a level point symbol (with a single point and also graphical symbol to be visible) with ability to be leveled at Z axis when i label it with an absolute level value (preferably some LISP code so we do not have to input level value twice/ first as a symbol and second in properties on Z axis). 

Thank you very much for your time and help , and by the way this is a great Forum!

In fact that particular bloc was made a new from an existing one working OK with X,Y found in a file from an other company ( I have just added the Z text ).

Maybe some one could upgrade it for it to work OK.

 

Find here the block to be inserted ( and not copy/paste ) COORDINATES-X-Y-Z.dwg and an example of use TEST_OD_Z.dwg.

 

uploads/175428/TEST_OD_Z.dwg" rel="nofollow - uploads/175428/TEST_OD_Z.dwg

uploads/175428/COORDINATES-X-Y-Z.dwg" rel="nofollow - uploads/175428/COORDINATES-X-Y-Z.dwg