下面是一业余版的二维建筑设计软件，其最大的特色为所绘的实体仅有
2 Q1 C$ E+ u, I5 P( W4 LLINE、POLYLINE、CIRCLE和TEXT四种，修改容易。虽只有二十多个程序，
- _) O/ z( v# g9 A9 S但确能帮您解决二维绘图中的一些问题。
9 q+ \# y' J Z3 j( b8 _, P, \ax.lsp --- 规则轴网绘制 3 ^5 c( ?+ R- `7 R3 L0 g/ i1 N
chax.lsp --- 轴线线型由点划线到连续线的交替变换
# w4 G. Q, V( i4 X8 O- M, xwwall.lsp --- 外墙绘制 ; i1 Z$ P7 l! n9 X2 o
nwall.lsp --- 内墙绘制(beta)
! b# m. o5 s! a v# [7 Zgwall.lsp --- 隔墙绘制(beta) & L4 y8 \1 u* N5 _2 Z
ss.lsp --- 室外散水
' F' \1 ?) V9 P$ M' fchww.lsp --- 墙线加粗 4 u0 r8 ?6 u0 g* Y' z% I+ S
chw0.lsp --- 墙线加粗恢复
- t' A' b% F% _) `. i# cdimw.lsp --- 标注墙厚 ) M9 t+ s6 y' G" ?
zhu.lsp --- 交点插柱 0 q( ~* d- e) x) K9 ?
win.lsp --- 墙上插窗
$ ]& ^# ]9 V1 r3 Y2 uwwin.lsp --- 无墙画窗 ( |% y* V/ [0 m U, |; E
door.lsp --- 墙上插门
7 n; K" H- P5 y1 {( P# m' U
]4 W1 Q5 X4 a/ f3dimzs.lsp --- 标注左边及上边的第三排尺寸线
w3 a9 c$ ]) U; r3dimyx.lsp --- 标注右边及下边的第三排尺寸线
+ |8 T2 O4 }8 k# N6 O/ X# H a+ z$ i9 _0 o0 s# U
lt1.lsp --- 双跑楼梯平面 $ ^7 C( y7 d H8 q, j- c
ltpm.lsp --- 双跑楼梯剖面(better) : s# D& i4 Z( {# Q$ c9 ]& _9 K2 u
wsj.lsp --- 卫生间布置
5 V# q |+ p/ {) w4 a+ Hwsj1.lsp --- 单个侧开门卫生间
1 d% s. a! W3 K% P9 ^9 H, c% Utj1.lsp --- 台阶绘制
v) s1 ]0 ^* {' ppd.lsp --- 坡道绘制
8 ?' z$ U( L0 n3 k$ {9 T, Psy1.lsp --- 索引1 ) z$ U- Z6 v% D
sy2.lsp --- 索引2 " s, C& ?) }! A0 i2 l8 t. q; {
lmw.lsp --- 立面窗
2 j. x$ L) l Z9 J: `lmm.lsp --- 立面门 ! l- e4 h7 ^( j' V4 d% |
4 e" T' I% f* s# O% G
- s% `" E, W9 j, P& Y- r------------------------------------------------------------4 T( C; d. N* o
; w$ C( q S( ]' B q: S, I2 d2 K: }
bg.lsp --- 表格自动生成 " U4 H# R# O; o" Q# d; c
asc.lsp --- 将文本文件内容写入图中，字符是单个的
% l$ s( y8 ]/ rwf.lsp --- 将图中字符写入磁盘
9 ^" r! X1 {' u" y& }- h% Z" g& Eexstr.lsp --- 将字符串分解成单字
! k5 V# k2 }& c- f2 z+ `: g* opgtxt.lsp --- 将字符合成字符串 $ G9 F4 u- k8 Y: ]
pb.lsp --- 通过给出长度将字符串分成两个串
0 H: ~/ r1 z- i) L7 Jcht.lsp --- 直接修改文字内容或块属性 # i2 D m+ i3 e! `
ct.lsp --- 对数字串进行加减 4 C1 \$ F: I. j0 I5 b5 H. {$ T9 R6 d& o
chh.lsp --- 直接修改文字高度 . c9 G2 s# f8 b* t! l: X
chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角)
' t8 y7 e3 @' U7 s0 v/ L& B' Uchst.lsp --- 直接修改文字字体 ; _2 }( l8 }4 r
+ `9 Y% S, y3 ^, q# s9 Ytxt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片)
1 M( |8 E( v0 c% W. ^3 @
, M1 T4 M, T! `tiao.lsp --- 配合修改过的标准字体文件，将中文字符调大
2 C* Z' Q4 L( X. k# Y, o, s7 l& \tiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小 $ x. g( c3 @% t3 S# f& U) P
untiao.lsp --- 上两个程序的复原 . \* T) y& i) M
0 R) ?9 t e6 |; h+ d# j# q
sht.lsp --- 在图中查找字符串 7 ?$ k$ b7 Y; H8 C3 Q
zhuang.lsp --- 桩点及钎探号绘制（勘测图）
+ l& g2 \- F/ {! S, i: Z' _2 ^3 J0 I6 ]. _
dim.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1) 8 Q1 O% K6 d6 R9 ^/ g0 T7 C
dimm.lsp --- 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100) 9 `; C/ ], b+ h" U9 K3 q2 @* f- T
}& S) `( ?2 ?3 x' }: f n1 U1 s rdi1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图)
+ r5 I* u+ q3 U# Y/ @. S6 Qdi100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图) 4 O" `4 X) i f" n! B
' a3 K- p; x& Z0 \$ q( Obrk.lsp --- 将一线条在与其它线条相交处断开
; Z' w+ R& b8 X! [9 U! ppeditx.lsp --- 成批修改线条的线宽
) Z; t3 U0 M- z+ zex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及PLINE线
0 D6 [; Y8 X9 Gchcr.lsp --- 修改园和园弧的半径 : I( \( E6 L) n6 t; V7 ]& x
lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结
% n9 x# b0 h1 O& ?0 \
* C9 b" g% f1 W, \" b3 c) m9 Nbg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用) 9 n5 ^3 W/ d B) a0 S8 M' K
bg1.lsp～bg4.lsp --- 标注各种标高
2 `$ R. W l2 u& [
5 q) Y4 w! f1 z" F" g {hu.lsp --- 直接给出园弧长度
K4 V6 E) I y+ }" b
& X. O, [0 Q5 J% d" Sjdx.lsp --- 截断线 $ H: {5 }0 L/ ]' u& i( y
jdx2.lsp --- 双截断线
- P. c$ L* m2 }& T! Z! E6 w0 X6 N) v" E" H( ]. R! D
bdgj.lsp --- 板底钢筋(土建结构图用)
$ o; [# h$ q# f0 \bdgj1.lsp,bdgj2.lsp --- 板钢筋(土建结构图用)
6 u5 f( \$ f9 h. w* E9 \! \- S' h9 V. [; {0 e
dk1.lsp～dk8.lsp --- 配合PKPM软件生成的图绘洞口(基础留洞）
3 ~ Z3 R1 u1 ]gl1.lsp～gl8.lsp --- 配合PKPM软件生成的图绘过梁(结构平面图） 4 c. o$ S: A) D
, z5 O2 V; ]8 H4 |, b
gzz.lsp --- 构造柱绘制 8 E$ v* Z8 H+ p) n" S4 @
$ Y( j8 U9 U6 W) B, G! E+ c$ D, }8 f4 ZACAD.LIN --- 增强的线型文件, 扩充线型(线型比例为1)如下: _* J* b& `3 [/ \
Q, @% F, V& X- A# OXX -- 虚线(用于1:1的图)
9 T& ^4 Z) F! T9 C$ d1 KDHX -- 点划线(用于1:1的图)
( c! D0 H; \, F+ d3 `, gXX100 -- 虚线(用于1:100的图) - U1 Q; h; W' o* I
DHX100 -- 点划线(用于1:100的图)
3 a; |& Y( |/ \2 Q* o5 S* q# x* g; j. \' @1 _2 V6 Z6 h0 l
ACAD.LSP --- 增强的ACAD启动文件, 命令扩展如下: 0 t6 U6 D1 d# E8 X
' c0 Q5 h b; p4 O7 D
CHXX -- 将线型改为虚线(用于1:1的图) $ G2 i4 m( t4 u& {- [0 c
CHDHX -- 将线型改为点划线(用于1:1的图) ( i) j7 Y3 X& ]% e1 r1 i
CHXX100 -- 将线型改为虚线(用于1:100的图)
( H3 }: t# y( U) @% T. qCHDHX100 -- 将线型改为点划线(用于1:100的图) 6 d& i3 d0 {& V2 F6 M n. U& J
CHCON -- 将线型改为连续线
( F* i, h6 E5 _CHC -- 直接修改实体的颜色 |
[复制链接]
发表于 2008-4-1 21:23
发表于 2008-4-2 09:33
谢谢分享啦
