压缩包中含有以下面程序，且均以源程序方式给出，您可以使用、参考、修改它。解压缩后请先看说明文件。0 D( L: p1 |# ?# \# l1 ?
bg.lsp --- 表格自动生成 & ~* x" m, U. c. b' N
asc.lsp --- 将文本文件内容写入图中，字符是单个的
# X; [1 A+ R# K& {wf.lsp --- 将图中字符写入磁盘
- h7 T7 W" ~; m0 U& iexstr.lsp --- 将字符串分解成单字
/ O7 ^- X8 Q# _2 }7 I, Vpgtxt.lsp --- 将字符合成字符串
$ o+ i8 t g, }; q3 jpb.lsp --- 通过给出长度将字符串分成两个串
9 W3 R7 z$ T- t# H' d5 _, Icht.lsp --- 直接修改文字内容或块属性
3 @7 K5 ~+ a2 y0 j% U, @) s8 Ect.lsp --- 对数字串进行加减
5 G! ] [& _/ P7 N4 t/ @5 C( K' ^( Xchh.lsp --- 直接修改文字高度 1 X4 n& A9 t1 {. R5 E7 Q
chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角) ( w* \' c% Y ?& y2 e
chst.lsp --- 直接修改文字字体 9 e# Q* `( G" ]& y: y# ]. a! F. O
txt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片)
$ Z: @7 d5 R+ } s3 ytiao.lsp --- 配合修改过的标准字体文件，将中文字符调大
3 C8 U. w! e: W( S( ]& w. |tiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小
& @5 G8 y/ H- R# J9 [+ xuntiao.lsp --- 上两个程序的复原
2 d2 P( b: D( K' y! Ysht.lsp --- 在图中查找字符串
, d6 N0 ~) a- [* \# X$ k- }- gzhuang.lsp --- 桩点及钎探号绘制（勘测图）
& h7 Q1 a9 `' G6 Idim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1)
! S B8 O0 t" m I& F- x$ J. rdimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100) 6 n \' h. z/ f/ f2 {# T: @4 `+ F
di1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图)
, N5 Y; X3 p( J5 E7 Kdi100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图)
9 I& A2 X/ y4 Pbrk.lsp --- 将一线条在与其它线条相交处断开
. o( S: c: H7 q; \3 f9 @peditx.lsp --- 成批修改线条的线宽
/ z! t; k* W4 X0 Y+ u7 t+ Rex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线 4 Z, Y% Z4 H4 |8 r
chcr.lsp --- 修改园和园弧的半径 . s7 ?$ w/ L5 F0 O
lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结* p1 D, d: Y E# }7 m: j
bg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用)
$ t3 H5 ?# R' D4 |bg1.lsp～bg4.lsp --- 标注各种标高
`. Y' L- O# L0 T* r7 jhu.lsp --- 直接给出园弧长度
* r7 Z- s h b8 tjdx.lsp --- 截断线
$ H6 S! a& [4 x# Jjdx2.lsp --- 双截断线# I' C" S5 n; U6 O" U( |
bdgj.lsp --- 板底钢筋(土建结构图用)
, w! G5 r' `3 }: d _8 cbdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用): v8 z# D6 ^3 p3 o3 V2 Z1 F" D. ~
dk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞） ^/ I, A2 s. Z! L8 |
gl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图）
5 c" |& M+ [& B; p2 o8 ~& hgzz.lsp --- 构造柱绘制& j+ {; i5 d; A2 C" V
ACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下:
- S1 w. ]1 M$ }7 @0 J% [XX -- 虚线(用于1:1的图) . Q; J) E. r. o
DHX -- 点划线(用于1:1的图) 5 v q0 ~) E2 r5 O% V- a8 l1 f
XX100 -- 虚线(用于1:100的图)
7 P: Q6 z8 S+ P/ ] p GDHX100 -- 点划线(用于1:100的图)
& t0 V6 E2 A& [ACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下: ( P' j. L C% T2 `
CHXX -- 将线型改为虚线(用于1:1的图) . P# T; W% u: z u
CHDHX -- 将线型改为点划线(用于1:1的图)
( M* G+ o% G7 C! z7 K0 ^3 iCHXX100 -- 将线型改为虚线(用于1:100的图)
, a( p8 Q; I, ]+ x. a4 iCHDHX100 -- 将线型改为点划线(用于1:100的图)
1 I$ l- h8 V4 K2 _8 d$ ZCHCON -- 将线型改为连续线 $ e5 E( m$ z/ E/ a; Y: `
CHC -- 直接修改实体的颜色 5 h; D- C, U1 x, p7 m9 ]
, B4 c- {8 o$ |5 ?7 n. Q# \
8 e8 s" c c+ ^-->请点击下面的链接下载' X$ h* S: H0 A! i5 ^1 w
http://down.5xing.cn/soft/42.html |
发表于 2005-6-17 19:01
发表于 2005-6-19 18:51