压缩包中含有以下面程序，且均以源程序方式给出，您可以使用、参考、修改它。解压缩后请先看说明文件。
1 i/ V& N/ Q) [* kbg.lsp --- 表格自动生成 * z8 P6 N- }$ _9 R2 T* `5 r3 J
asc.lsp --- 将文本文件内容写入图中，字符是单个的 0 d% z- B, i0 O1 j
wf.lsp --- 将图中字符写入磁盘 ; N+ F* L6 ?# ~
exstr.lsp --- 将字符串分解成单字 0 K0 v# g6 g! r: s* |8 W
pgtxt.lsp --- 将字符合成字符串
0 L" @. m/ b# d/ _+ g& }1 w' i8 Kpb.lsp --- 通过给出长度将字符串分成两个串
1 z8 ?' e$ |6 E3 W2 v& _cht.lsp --- 直接修改文字内容或块属性 ' ?6 B9 `5 h5 G4 n) n5 q
ct.lsp --- 对数字串进行加减 ) Z) ~. H; \+ Z T! _
chh.lsp --- 直接修改文字高度 5 S- a0 f; |- {' t
chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角) 4 d3 J5 u0 y" {, Z
chst.lsp --- 直接修改文字字体 - p5 c. }: S s. M8 t: f
txt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片)
; C' L, J# \) T& P5 {+ E* e* Htiao.lsp --- 配合修改过的标准字体文件，将中文字符调大
* M( ^1 X I6 E# `/ N! Btiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小
# B Q1 |# `1 buntiao.lsp --- 上两个程序的复原 & ]- P, B; ~. Z! o
sht.lsp --- 在图中查找字符串 ( x f; u! H& N! ^8 \
zhuang.lsp --- 桩点及钎探号绘制（勘测图）2 n# u$ U0 v( y, H6 J$ B
dim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1) ; h& J* B9 E0 [6 o8 x) g
dimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100)
3 `+ p2 H$ \) N8 |# W1 idi1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图)
" S2 ~' n' y) d4 T7 jdi100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图)
/ V* O- e3 L, [8 |. a ~brk.lsp --- 将一线条在与其它线条相交处断开 8 S0 M6 H$ ]) J5 r' \& u! [+ }% z
peditx.lsp --- 成批修改线条的线宽
9 t7 O2 C0 U7 \ex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线 ' L- z8 [/ F) }$ ]) W, f, y
chcr.lsp --- 修改园和园弧的半径 " O$ X. ]* K$ V; m5 q; ?
lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结
) L3 ~. Q% a$ qbg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用) + h8 F; Q" X# C# e/ {9 S
bg1.lsp～bg4.lsp --- 标注各种标高
" |3 X1 x) ]; Jhu.lsp --- 直接给出园弧长度
' F; u5 \ E. [* Pjdx.lsp --- 截断线 ' L+ l0 I! c4 a/ Q( l
jdx2.lsp --- 双截断线
6 ?0 L1 g- ]: k" Fbdgj.lsp --- 板底钢筋(土建结构图用) 6 E- x4 O m! u
bdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用)
$ r- ` T8 V1 Z v l$ Odk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞） 0 w6 Z/ ?* D' D8 p( e: F( ?. t
gl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图）, a8 @0 H C5 R4 {2 Q- K- Z' e
gzz.lsp --- 构造柱绘制
7 P6 [9 d+ @; l9 C: nACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下:
1 d4 |4 Q/ ?+ b: J5 @) fXX -- 虚线(用于1:1的图) 0 T! Q$ O2 J& p% N1 K
DHX -- 点划线(用于1:1的图)
4 T% [8 `) l( e8 X9 B# I3 oXX100 -- 虚线(用于1:100的图)
" e' `; w+ J+ G. vDHX100 -- 点划线(用于1:100的图)
9 ~& X# U. p8 c3 B5 Y# |# jACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下: ! T) \% Z8 L; d0 U
CHXX -- 将线型改为虚线(用于1:1的图)
+ J6 V8 ?! C0 C N2 n& K. m/ G' \CHDHX -- 将线型改为点划线(用于1:1的图)
9 J6 v( }+ Y: \& e) ^# BCHXX100 -- 将线型改为虚线(用于1:100的图)
1 i2 G0 l+ [+ \4 c' s8 C3 QCHDHX100 -- 将线型改为点划线(用于1:100的图) & w9 u! R' w, b4 z" y
CHCON -- 将线型改为连续线
. i( k& I0 [& [8 ^7 w; C8 _/ p$ j, BCHC -- 直接修改实体的颜色 5 e. G2 ]% W% o" Z1 W
- B8 h. N3 U3 s9 W% @( ^' ?
. ? r; Q! z, K h* ^
-->请点击下面的链接下载
' ~# U6 K. X! J2 Vhttp://down.5xing.cn/soft/42.html |
发表于 2005-6-17 19:01
发表于 2005-6-19 18:51