cad怎么把一条线的坐标一下全拉出来

问题描述

精选答案

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

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

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