|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
压缩包中含有以下面程序，且均以源程序方式给出，您可以使用、参考、修改它。解压缩后请先看说明文件。* B- H5 [3 }* a1 k1 |0 T3 S
bg.lsp --- 表格自动生成 / r0 h/ u! V _- ]2 A8 e
asc.lsp --- 将文本文件内容写入图中，字符是单个的
+ P+ r+ o3 G% |; twf.lsp --- 将图中字符写入磁盘 g8 W1 t8 l+ j! H
exstr.lsp --- 将字符串分解成单字
) ^& [: n3 @( y% P Gpgtxt.lsp --- 将字符合成字符串 1 f2 `$ B& ]' x& |& u) J
pb.lsp --- 通过给出长度将字符串分成两个串 9 Y: @! b0 G$ C- A
cht.lsp --- 直接修改文字内容或块属性
1 F7 W b1 D: V* t$ ~ct.lsp --- 对数字串进行加减
" c! x' t$ P- uchh.lsp --- 直接修改文字高度
6 l. g/ r2 e: A9 J- wchhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角) " N- B( I: U. X' a
chst.lsp --- 直接修改文字字体
% A6 d( z: \+ K7 Mtxt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片) 3 b* ]5 S6 z& B% v% i. r
tiao.lsp --- 配合修改过的标准字体文件，将中文字符调大
8 U6 J! d& j/ K) Wtiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小
+ }9 n. h0 \$ E% j% Iuntiao.lsp --- 上两个程序的复原
# [/ F6 f9 E1 s5 Tsht.lsp --- 在图中查找字符串
" R3 V3 z \( u' K$ Y ^" rzhuang.lsp --- 桩点及钎探号绘制（勘测图）" Y/ a* p5 B- G4 f; U+ o
dim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1) : K+ ~& |4 g! L I$ ?
dimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100)
2 H5 @7 s' O& |& |' @+ l8 V' Sdi1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图)
3 p! G" v" @( p( ]) r* `, o3 Kdi100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图)
1 @; }9 }% v' S3 _6 L& obrk.lsp --- 将一线条在与其它线条相交处断开
# W |8 |( l. ?0 T, p2 C/ t& ?peditx.lsp --- 成批修改线条的线宽
1 R- D. Z) Y$ l" eex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线
& e4 y! w! b) L! Kchcr.lsp --- 修改园和园弧的半径 / W, b1 K4 ~5 q2 ?3 ~# Q. k
lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结8 f0 L I: o7 F a/ l' z1 R
bg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用) : p1 `8 ] t7 o& I/ D8 J; s
bg1.lsp～bg4.lsp --- 标注各种标高% y4 f1 J1 p6 R
hu.lsp --- 直接给出园弧长度
. {0 B8 c x3 m4 djdx.lsp --- 截断线
0 d+ f0 t C0 N: F Q0 M* \jdx2.lsp --- 双截断线
4 \7 p/ J7 }6 A) lbdgj.lsp --- 板底钢筋(土建结构图用) 7 w+ L! ^- y @* ]4 @$ o, }! H7 ^ U
bdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用)
7 B% M. F1 J3 d; Udk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞）
' M, W' S& I7 b! d2 l1 hgl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图）
0 L6 [, T, l) Y. N4 Kgzz.lsp --- 构造柱绘制
: l% H3 f1 G! |7 Y+ i/ |ACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下: # {6 g# G0 [' w/ Y1 k8 Z( }
XX -- 虚线(用于1:1的图) . {# j# z7 N& z
DHX -- 点划线(用于1:1的图) $ U1 U& k9 b6 Q5 e& R
XX100 -- 虚线(用于1:100的图) " f# R: C. }8 {& S2 w
DHX100 -- 点划线(用于1:100的图), ]7 w* z! B) b5 @7 W$ C
ACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下: : T! Y$ \+ s2 a( B( F
CHXX -- 将线型改为虚线(用于1:1的图)
7 L6 R7 b4 {) Z, G% }$ E* @CHDHX -- 将线型改为点划线(用于1:1的图)
0 |! J* X$ D7 h/ \1 j$ `* {+ fCHXX100 -- 将线型改为虚线(用于1:100的图)
6 z8 s4 q( p% I1 I( bCHDHX100 -- 将线型改为点划线(用于1:100的图)
. x% d# S7 O( e) {6 } b' c+ ECHCON -- 将线型改为连续线 8 c# Y! F9 z8 q7 `. K5 P8 X$ M
CHC -- 直接修改实体的颜色 |
评分
-
查看全部评分
|
发表于 2008-6-14 11:13:10
发表于 2008-6-18 23:00:13
:)
