[求助]：我需要一个坐标标注程序

真正的菜鸟

用“坐标标注”一搜，出来一大串坐标标注程序，但没有一个是我要的，
我要的是：
在图纸空间激活视口状态下，选到模型空间对象上的点，在图纸空间上标注出带指引线的3D坐标(x,y,z)。

如果在模型空间或者在图纸空间，这一点也不难，选择到点pt，求出它的坐标，写成pts=(x,y,z)之形式，然后用这句就成了，
(command "_LEADER" pt pause "" pts "")

可是，把坐标标注在图纸空间，这时的pt不能作为引出位置了，
当然，这里改成 (command "_LEADER" pause pause "" pts "") 倒是达到目的，只是多了一次按键，不爽。

至于为什么一定要标在图纸空间，主要是视口中的模型UCS被旋转了，标在模型空间不好看。