Keith,
you can actually do this with a quite simple library object.
copy/paste those three lines into the 2D script window of an library objects and save it as whatever name you'd like to have it. the result after placing it on plans is something like this:
x=[Xcoordinate],y=[Ycoordinate]
plus the hotspot
string="x="+STR(2,0,SYMB_POS_X)+",y="+STR(2,0,SYMB_POS_Y)
HOTSPOT2 0,0
TEXT2 0,0,string
unfortunately I cannot send you a complete object as I do not have access to AC at the moment.
However, I see your point and the x/y coordinates could be an option in the autotext for (e.g.) the level dimension tool
::rk