安装一个标注坐标插件lisp(defun c:cor ()(setq pt (Getpoint "/n拾取坐标点")pt1 (getpoint "/n 拾取文本位置"

　　)p1 (strcat "X=" (rtos (car pt) 2 3 )

　　)p2 (strcat "Y=" (rtos (cadr pt)2 3 )));(command "line" pt pt1 "@1

未经允许不得转载：五金工具_五金配件_五金建材_机械设备-森宝五金网 > cad怎么把一条线的坐标一下全拉出来？