Sync attributes in titleblock with lisp

I have an issue with my titleblocks whenever CAD crashes. (Not always happens, but more times than not)...some of the attributes lose their alignment (change coordinates). What I'd like to do, is have a lisp that automatically resets the attributes back to those original coords when the drawing loads.The base point is the block's insertion pt.(which is 0,0,0). This way, if I have a crash I can fix the alignment automatically.

I use a csv file to update my attributes when the drawing loads (http://lee-mac.com/updatetitleblock.html), so is there a way to add the tags' coorid values to the csv and have that data read back into CAD to also reset the attribute locations? The column headings are the attribute tag names, so all I'd need do is add the corresponding X,Y,Z coord points) So you'll always have your titleblocks sync'd and updated each time you open or Publish. Thx.

Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.

Image may be NSFW.
Clik here to view.