coordinated writing y within same attribute block

[FabrizioLT]

Hello everyone, I ask for help with this problem:
transcribe the coordinate y of the insertion point of a block, inside the value of the attribute of the block itself (which then is the classic block of architectural altimetric quotas).
important: the bird is almost always different from the wcs (global chord).
(serves for the construction of road profiles)

At the moment I work like this:
in advance imposed in drawing settings the design unit with a decimal accuracy of 0.00 (because this is the approximation I need)
start the id command, select the insertion point of the block, take mentally note of the value of the coordinate y, do double click on the block, copy with ctrl+v and select ok to finish.

I would need one of these two possible solutions:

sol. 1) the ideal lisp routine should:
let me select the block and automatically insert/paste the only value of the coordinate y into the block attribute. if the coordinate is positive there is no need for the + symbol
finish leaving all the unchanged osnap and sects


sol. 2) other lisp routine I think easier to achieve (which would help me anyway)
should:
ask me to click a point and copy on the clipboard the only value of the coordinate y without the + if positive symbol,
finish leaving all the unchanged osnap and sects


on the forum from these 2 different discussions (which I bring back to the lime) I found these useful lisp that perhaps could be restructured to get to the second solution, but I do not have the competence to be able to change them.http://www.cad3d.it/forum1/threads/...coordinate-id-punto?highlight=lisp+coordinatehttp://www.cad3d.it/forum1/threads/42516-lisp-per-copiare-un-testo-su-un-altro-testoI attach the blockView attachment Q_SEZ_COO.dwg

 

[dieva]

...
sol. 1) the ideal lisp routine should:
let me select the block and automatically insert/paste the only value of the coordinate y into the block attribute. if the coordinate is positive there is no need for the + symbol
finish leaving all the unchanged osnap and sects

problem 1 solve it with data fields.
look at the attached design.
moves the block into a new position, regenerates and observes the new y value in the attribute.

 

[FabrizioLT]

thanks dievia, it is very convenient and this block can have several useful implementations.
But it is not what I need, the share in this way follows the global coordinates, I need you to insert the coordinate y from a different ucs from the wcs.
Moreover, the inconvenience that by moving the design to another point by moving on the y axis, to the first rescue or reopening the coordinates would change (it is a consideration that I do because in the collaborations, during the exchange of files, can happen all)
Thanks again