压缩包中含有以下面程序，且均以源程序方式给出，您可以使用、参考、修改它。解压缩后请先看说明文件。' y2 D7 o0 ]% |0 t0 _
bg.lsp --- 表格自动生成 6 m/ P* G9 b8 Y
asc.lsp --- 将文本文件内容写入图中，字符是单个的
2 U& ]- E, W" u$ M+ ]0 qwf.lsp --- 将图中字符写入磁盘
* E7 x: m$ }' m* j* k- p" zexstr.lsp --- 将字符串分解成单字 . ] H6 m* Y/ j9 T
pgtxt.lsp --- 将字符合成字符串
1 [2 y% x$ ~5 D9 M* d; l0 opb.lsp --- 通过给出长度将字符串分成两个串
6 l8 d0 r! k' x; f6 G) Jcht.lsp --- 直接修改文字内容或块属性 $ `, j6 t$ K( S8 ]1 }- O2 `
ct.lsp --- 对数字串进行加减
0 A# P+ G% ~9 |chh.lsp --- 直接修改文字高度 ) m2 u3 K* h( l+ d9 {
chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角)
" } a; h: r& S$ l0 t# _1 u, Vchst.lsp --- 直接修改文字字体 ) f4 N+ P- g- m8 l
txt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片) ( w& G1 m$ X+ ^& Z/ h
tiao.lsp --- 配合修改过的标准字体文件，将中文字符调大
" _2 B2 t/ L5 T" I3 gtiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小
+ ?' \* `6 A2 O' Luntiao.lsp --- 上两个程序的复原
3 f/ J- p4 F ?: [' J/ H) qsht.lsp --- 在图中查找字符串 4 g) h$ X* K, ~7 y& ^) j
zhuang.lsp --- 桩点及钎探号绘制（勘测图）
) Z* n4 u! I! S; I \% ~- Ldim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1) - B- X8 Z4 M3 N, O" t) P2 h
dimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100)
7 S, |; Y3 C* r; udi1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图) 4 {8 o) }" M* d0 ?% @6 R7 Y
di100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图) 7 y1 B8 \. W" e! h8 [" G8 Y. J6 O
brk.lsp --- 将一线条在与其它线条相交处断开 " `! S. b: V, g6 y3 h6 G3 b
peditx.lsp --- 成批修改线条的线宽 ( i2 l: x) c2 Z5 N: N ?
ex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线
3 ~* Z5 R$ o% @+ i8 ichcr.lsp --- 修改园和园弧的半径 3 |" E4 _- e0 H- i, i* D
lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结
! E! L& L# K# w; _' p- v) Bbg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用)
$ [. h. N1 E5 Y9 u" {$ I* Bbg1.lsp～bg4.lsp --- 标注各种标高, U" Z8 z9 w# G' r
hu.lsp --- 直接给出园弧长度
$ x$ s. Z7 I1 _2 vjdx.lsp --- 截断线
/ P/ g1 _7 H/ @jdx2.lsp --- 双截断线. o7 \$ A8 L- a& i+ m
bdgj.lsp --- 板底钢筋(土建结构图用) ! N: L" M; ^9 N
bdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用)
: o& D$ d t" j& Wdk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞）
. R, |/ L6 K$ J3 t; e) ?* Bgl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图）
! z" L, G3 W( m' B, Sgzz.lsp --- 构造柱绘制& o1 }' R8 F8 q
ACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下:
) N) F R( ^& X5 n# o" L3 iXX -- 虚线(用于1:1的图) ( A5 _; Q2 H/ J5 {
DHX -- 点划线(用于1:1的图)
/ c* p. y# z R9 ?9 y1 J: M/ gXX100 -- 虚线(用于1:100的图) 2 {! h! p5 p; t! K* X8 T
DHX100 -- 点划线(用于1:100的图)
) \$ F/ U ?$ b3 M C: x( D4 sACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下: 5 D! Z: m9 V+ c8 b `, I
CHXX -- 将线型改为虚线(用于1:1的图) * y; _$ g$ v% o' V
CHDHX -- 将线型改为点划线(用于1:1的图) % a( n4 { S! {4 @
CHXX100 -- 将线型改为虚线(用于1:100的图) ; T ~) O4 T. ~$ y
CHDHX100 -- 将线型改为点划线(用于1:100的图) ! |" z) n7 k. r+ B
CHCON -- 将线型改为连续线
8 P2 `5 s# O8 Y/ d1 A; oCHC -- 直接修改实体的颜色
5 e Y! i% k: i- B/ n2 H" n* D& S
6 Z* k- K& {5 Q: c
* y6 d! y! O8 j& l9 q+ G* m/ S-->请点击下面的链接下载
' k8 x2 h* ?6 P0 `1 shttp://down.5xing.cn/soft/42.html |
发表于 2005-6-17 19:01
发表于 2005-6-19 18:51