发布网友 发布时间:2022-04-25 16:24
共2个回答
热心网友 时间:2022-06-05 15:04
展开1全部坐标标注小插件
(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<0" "")
(command "leader" pt pt1 "" p1 p2 "")
;(command "text" pt1 "" p1 "")
; (command "text" pt1 "" p2 "")
; (command "move" "l" "" pt1 "@-.4<270" "")
把以上代码复制到记事本,保存为:坐标标注.lsp
在CAD里加载后,输入:cor,即可标注坐标
鼠标第一次点选欲标注的位置,第二次指定坐标放置的位置
热心网友 时间:2022-06-05 15:05
也可以安装天正插件