cad中坐标标注

标注坐标非常好用的小工具（收藏多年了）ommand"_.-DIMSTYLE""_Restore"dst)(setqPNT1(getpoint"\nPickcoordinatepoint:"))(setqP1X(carpnt1))(setqP1Y(cadrpnt1))(setqP1Z(caddrpnt1))(setqP(getvar"LUPREC"))(setqSTDX(rtosP1X2P))(setqSTDY(rtosP1Y2P))(set