压缩包中含有以下面程序，且均以源程序方式给出，您可以使用、参考、修改它。解压缩后请先看说明文件。
" S; A; m, u9 A4 W4 Dbg.lsp --- 表格自动生成
) ?$ Y3 W4 d( } K0 dasc.lsp --- 将文本文件内容写入图中，字符是单个的 5 D/ O. ^, \ B: ]
wf.lsp --- 将图中字符写入磁盘 1 O$ A n: Q! Y7 ]0 |9 G7 Q3 @
exstr.lsp --- 将字符串分解成单字
3 @9 _4 K1 u# [3 k: G; Fpgtxt.lsp --- 将字符合成字符串 % J! p. F3 [7 e6 E, d6 {7 |
pb.lsp --- 通过给出长度将字符串分成两个串 6 @- ?. X' z" v+ `! F( k
cht.lsp --- 直接修改文字内容或块属性 ( R ~$ @1 ^# D
ct.lsp --- 对数字串进行加减 ( I2 l- w2 c$ E9 C% h
chh.lsp --- 直接修改文字高度
: D5 q4 w2 e- ~: M3 ?chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角) ( W! b) }9 X. l* ]5 B
chst.lsp --- 直接修改文字字体 # l# O- R+ l% j$ d: J* l
txt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片) - r* _( g! P% Z# y
tiao.lsp --- 配合修改过的标准字体文件，将中文字符调大
# `( H0 i- @1 \7 `% }9 E( k E* ptiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小 $ w& @1 Z. _2 w9 ?$ E' L% C
untiao.lsp --- 上两个程序的复原
! M2 f6 X. u+ m( c3 S! q3 isht.lsp --- 在图中查找字符串
' \+ i$ N4 P7 w; fzhuang.lsp --- 桩点及钎探号绘制（勘测图）
) c2 R$ J, N4 |- Y4 R, S/ s+ _ Pdim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1)
# `) r9 L/ e( S" M( k* Mdimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100)
E- J; A- H8 Z8 H( bdi1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图) ) Z7 n; s! J4 {" o
di100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图)
7 e* W! R. Z8 P8 o7 F% L# Hbrk.lsp --- 将一线条在与其它线条相交处断开 + N5 I$ e5 Y0 F: O) z6 J9 s
peditx.lsp --- 成批修改线条的线宽
1 ]) \% m, c% bex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线
+ M8 `% j6 X' c5 f Q4 Xchcr.lsp --- 修改园和园弧的半径 8 I H4 n" P9 h3 ^! j0 ?# O: B1 B
lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结
0 \" J. W- k" [2 I$ i5 W# a' [bg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用)
- w$ L* B! o8 K& pbg1.lsp～bg4.lsp --- 标注各种标高1 w P4 ?/ s, G( }7 `3 l; f
hu.lsp --- 直接给出园弧长度
4 x' ]$ B6 |4 [5 zjdx.lsp --- 截断线 $ V9 i/ l: Z. E0 s( Q
jdx2.lsp --- 双截断线
$ ?) }% o3 U- c' e# Ebdgj.lsp --- 板底钢筋(土建结构图用)
2 S& g$ B/ b$ O, Jbdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用): }8 G ^$ m; x, C& M2 J1 e
dk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞）
! s2 }$ y8 L- C+ pgl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图）
, z( N# k6 Y/ k) \" Pgzz.lsp --- 构造柱绘制
`* t" e U' ~2 u# q& ^4 E: nACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下:
+ b, b5 D0 A6 Y1 d* t2 k: UXX -- 虚线(用于1:1的图)
' a5 [" X5 r, U2 Q9 `& G9 cDHX -- 点划线(用于1:1的图) ( ?( v! T6 ?+ [' O& s# d# \
XX100 -- 虚线(用于1:100的图)
' i7 n2 o( r3 H, F7 n. Z# pDHX100 -- 点划线(用于1:100的图)
6 S3 D" h6 v |! nACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下:
6 Q1 T. t! M; d3 k+ R" ECHXX -- 将线型改为虚线(用于1:1的图)
( ?3 {! _' ~" {2 Z4 S6 ]& rCHDHX -- 将线型改为点划线(用于1:1的图) / }8 {9 Q9 @+ L; I
CHXX100 -- 将线型改为虚线(用于1:100的图)
! }8 r a0 ?/ D7 L; W! xCHDHX100 -- 将线型改为点划线(用于1:100的图)
) U+ j- j9 a! u9 `! JCHCON -- 将线型改为连续线
, J2 b( Y% C0 m* s# TCHC -- 直接修改实体的颜色
0 x( x9 [# W9 j/ @$ E+ P6 y" J- b( ?9 C f6 v7 Y9 N. y& Y
7 f, r2 K- I: Y U& m8 ~7 H" U
-->请点击下面的链接下载
3 p0 H. [* d* o" Z4 M2 R- }http://down.5xing.cn/soft/42.html |
发表于 2005-6-17 19:01
发表于 2005-6-19 18:51