求cad连续标注数字插件 谢谢 找个能连续标注数字的cad插件就是标个数字1,然后再点出现2...
\u6c42cad\u80fd\u8fde\u7eed\u6807\u6ce8\u6570\u5b57\u7684\u63d2\u4ef6\u5b89\u88c5\u5929\u6b63\u5efa\u7b51\u5c31\u884c\uff0c2007\u7684cad\u53ef\u4ee5\u5b89\u88c5\u5929\u6b63\u5efa\u7b518.2\uff0c\u6216\u8005\u5929\u6b63\u5efa\u7b518.5\uff0c\u5b89\u88c5\u5b8c\u540e\u518d\u6253\u5f00\u5c31\u53ef\u4ee5\u5728\u5de6\u4fa7\u5de5\u5177\u680f\uff0c\u5c3a\u5bf8\u6807\u6ce8\u91cc\u770b\u5230\u8fde\u7eed\u6807\u6ce8
\u5982\u679c\u662f\u6807\u6ce8\u5c3a\u5bf8\u7684\u8bdd\uff0cCAD\u91cc\u76f4\u63a5\u5c31\u6709
autolisp插件,加载后,使用方法如图:
autolisp代码如下,复制到记事本,以【.lsp】为后缀命名,打开cad,输入【appload】加载,命令【TES】(可以自己修改命令)。
(defun c:tes ( / #n5 &p1 tr1)
(if (null #n1) (setq #n1 1) )
(if (setq tr1 (getint (strcat "\请输入整数值:<" (rtos #n1 2 0) ">")))
(setq #n1 tr1)
(setq tr1 #n1)
)
(if (null #n2) (setq #n2 100) )
(initget 6)
(if (setq #n5 (getdist (strcat "
请输入文字高度:<" (rtos #n2) ">")))
(setq #n2 #n5)
(setq #n5 #n2)
)
(while (setq &p1 (getpoint "
请选择插入点"))
(entmake (list '(0 . "text") (cons 10 &p1) (cons 1 (rtos tr1 2 0)) (cons 40 #n5) '(41 . 0.5) '(72 . 4) (cons 11 &p1)))
(entmake (list '(0 . "circle") (cons 10 &p1) (cons 40 (* #n5 0.85))))
(setq tr1 (1+ tr1))
(setq #n1 tr1)
)
(princ)
)
我有cad连续标注数字的插件,很不错的
百度搜索 工程桩自动编号并提取坐标程序,专门解决cad连续编号问题。
工程桩自动编号并提取坐标程序,专门解决cad对象连续编号问题。
扩展阅读:cad快速标注和连续标注 ... 标注数字太小怎么设置 ... cad快速看图 ... cad十大逆天插件 ... cad标注数字太小怎么调 ... cad标注数字被隐藏了 ... 小懒人cad插件自动排版 ... cad连续标注的快捷命令 ... cad插件大全免费下载 ...