压缩包中含有以下面程序，且均以源程序方式给出，您可以使用、参考、修改它。解压缩后请先看说明文件。
0 i- R( Q2 d/ {2 B9 Nbg.lsp --- 表格自动生成 / f" P: c) c( I \. l8 I
asc.lsp --- 将文本文件内容写入图中，字符是单个的 ! d. S7 ^* y$ v+ v
wf.lsp --- 将图中字符写入磁盘
2 H& k. n- x6 C) R3 ^! ~exstr.lsp --- 将字符串分解成单字
: P4 k( a; j" w8 \5 w& w" s; npgtxt.lsp --- 将字符合成字符串 : u4 S* z5 X2 e$ j# `! l0 X$ n
pb.lsp --- 通过给出长度将字符串分成两个串
9 C4 A" j/ w% J8 qcht.lsp --- 直接修改文字内容或块属性
f. B3 R; J! t' l; Uct.lsp --- 对数字串进行加减 ( ~/ s' l* a4 z, z) q
chh.lsp --- 直接修改文字高度 # e" D, V- q) D& x! k* z1 D7 p
chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角) : K+ {2 H+ d% C. N; p# I& N6 ~3 o/ V
chst.lsp --- 直接修改文字字体 / s2 k8 I5 u( u/ Y, B* R
txt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片)
" x; d: a2 B& Y. I* X" W8 h( }tiao.lsp --- 配合修改过的标准字体文件，将中文字符调大 / D R$ w- D8 I& `% E% q
tiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小 % d0 d9 d) x1 i
untiao.lsp --- 上两个程序的复原
* G8 d! @' @* \7 Z1 ~sht.lsp --- 在图中查找字符串
4 x, z1 P# X/ g- \9 A2 `; Rzhuang.lsp --- 桩点及钎探号绘制（勘测图）4 R# c) p8 Q# u U
dim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1) & l; G) _/ K$ l0 |# p9 A; z) @. q' d
dimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100)
$ S; i: x! @& w; V; e5 odi1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图) 2 k6 k( o6 Y* k3 O4 ^- _- C7 s3 V
di100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图) 1 }- `' l8 f1 M, f+ `
brk.lsp --- 将一线条在与其它线条相交处断开
' N& Y' ^ h2 q8 |! _7 ]& ^peditx.lsp --- 成批修改线条的线宽
& _4 M) m- b7 T: S- j. Yex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线
' R5 I( C. A. j( r0 schcr.lsp --- 修改园和园弧的半径
: B3 Z4 Y2 r* ylay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结
( y' m" ?8 @# c# s Ebg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用)
% L) g0 c V2 X2 L' r9 Z$ Hbg1.lsp～bg4.lsp --- 标注各种标高
9 Y) w g6 e j6 shu.lsp --- 直接给出园弧长度 D- N s, p& w. ^9 S
jdx.lsp --- 截断线
- d& ]" ]) J, u" }8 |1 Hjdx2.lsp --- 双截断线
/ ^: i- [, C+ l. V6 ]- z( Wbdgj.lsp --- 板底钢筋(土建结构图用)
( f4 e3 H: s) c1 t3 w- [0 Zbdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用)
" f4 Q; u" Q q. l9 N) u% _' vdk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞） 7 S8 o. } X1 o2 q6 i* U1 @+ f
gl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图）8 Q8 h7 j; v7 @# o( @8 }% W8 B
gzz.lsp --- 构造柱绘制
" F }3 E6 [' Z/ I, `" U9 I/ \ACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下:
) Z" G& C! H4 J. f p( O! X6 q3 ~XX -- 虚线(用于1:1的图) . ~1 v3 V7 R( G2 C u3 W
DHX -- 点划线(用于1:1的图) & t- V1 v: j, Y" `7 W5 i$ t
XX100 -- 虚线(用于1:100的图) , f4 N9 M, y, L' B( V
DHX100 -- 点划线(用于1:100的图)
7 @. Z% c) y5 a0 ]# w# w8 jACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下: : \) S( V/ D" c1 t# r
CHXX -- 将线型改为虚线(用于1:1的图) 0 k' n, o4 u: A- p
CHDHX -- 将线型改为点划线(用于1:1的图)
: i$ @ h4 u/ p4 y- Q* s/ m. a1 `CHXX100 -- 将线型改为虚线(用于1:100的图) 3 W9 q* C* ^! w9 e6 E
CHDHX100 -- 将线型改为点划线(用于1:100的图)
) ?/ B$ P* e$ z& J0 Z% Q( C0 xCHCON -- 将线型改为连续线
, S/ |8 x" O# p# LCHC -- 直接修改实体的颜色 ! b& ]1 c y& L1 }/ Y
; {0 u" f6 F2 N c4 C" D
2 S/ [: G$ z5 h9 m8 @-->请点击下面的链接下载
9 f$ v5 Y, ?% f9 N8 M$ @http://down.5xing.cn/soft/42.html |
发表于 2005-6-17 19:01
发表于 2005-6-19 18:51