cad高程标注插件lisp_CADLISP程序，标高修改，管网标注，等一堆

CADLISP程序，标高修改，管网标注，等一堆：

: u" a* j8 y, n# U0 l$ X/ U( G/ n8 t4 V

用APPLOAD命令加载程序，然后使用命令。。。。% B2 m2 `) }3 t8 s7 b

) w. e6 b( H, @( y2 y2 i! l如果您使用 AutoCAD,下面的内容对您一定有帮助。在某些方面能大大提高

2 K" S" m: h% |  d; H/ D* _1 h) O% O+ S: r您的工作效率。下面的程序均以源程序方式给出，您可以使用、参考、修改它。

6 J! V( i5 l" G9 x

* C) c6 ]# Y9 d* mbg.lsp --- 表格自动生成

+ j  f4 V% A7 ^, p5 }, Gasc.lsp --- 将文本文件内容写入图中，字符是单个的 2 z1 |( \' @. t, |: e4 K- O

wf.lsp --- 将图中字符写入磁盘

* V' o# V& _* S# H- e0 Sexstr.lsp --- 将字符串分解成单字 2 K* N0 v/ i, V' h; L  u

pgtxt.lsp --- 将字符合成字符串 * i. a" c, _( F7 {  U

pb.lsp --- 通过给出长度将字符串分成两个串

. I$ T! X. d& G6 N) }( A; ]cht.lsp --- 直接修改文字内容或块属性 ; A4 i$ x- d5 s* q+ V; A

ct.lsp --- 对数字串进行加减

. c$ I+ o0 {* |2 ]0 M; [chh.lsp --- 直接修改文字高度

( r' Z%