如果您使用 AutoCAD,下面的內(nèi)容對(duì)您一定有幫助。在某些方面能大大提高您的工作效率。下面的程序均以源程序方式給出，您可以使用、參考、修改它。
bg.lsp 表格自動(dòng)生成
asc.lsp 將文本文件內(nèi)容寫(xiě)入圖中，字符是單個(gè)的
wf.lsp 將圖中字符寫(xiě)入磁盤(pán)
exstr.lsp 將字符串分解成單字
pgtxt.lsp 將字符合成字符串
pb.lsp 通過(guò)給出長(zhǎng)度將字符串分成兩個(gè)串
cht.lsp 直接修改文字內(nèi)容或塊屬性
ct.lsp 對(duì)數(shù)字串進(jìn)行加減
chh.lsp 直接修改文字高度
chhw.lsp 直接修改文字高寬比(針對(duì)PKPM軟件將字符定位點(diǎn)改為左下角)
chst.lsp 直接修改文字字體
txt.shx 修改后的標(biāo)準(zhǔn)txt.shx文件。(kuozhan.sld為增強(qiáng)的內(nèi)容幻燈片)
tiao.lsp 配合修改過(guò)的標(biāo)準(zhǔn)字體文件，將中文字符調(diào)大
tiao1.lsp 配合修改過(guò)的標(biāo)準(zhǔn)字體文件，將英文字符調(diào)小
untiao.lsp 上兩個(gè)程序的復(fù)原
sht.lsp 在圖中查找字符串
zhuang.lsp 樁點(diǎn)及釬探號(hào)繪制（勘測(cè)圖）
dim.lsp 配合JT.DWG將尺寸標(biāo)注調(diào)成適合建筑結(jié)構(gòu)設(shè)計(jì)(1:1)
dimm.lsp 配合JT.DWG將尺寸標(biāo)注調(diào)成適合建筑結(jié)構(gòu)設(shè)計(jì)(1:100)
di1.lsp～di8.lsp 直接連續(xù)標(biāo)注尺寸(用于1:1的圖)
di100.lsp～di800.lsp 直接連續(xù)標(biāo)注尺寸(用于1:100的圖)
brk.lsp 將一線條在與其它線條相交處斷開(kāi)
peditx.lsp 成批修改線條的線寬
ex.lsp 分別或一起或通過(guò)層來(lái)炸開(kāi)塊、尺寸標(biāo)注及PLINE線
chcr.lsp 修改園和園弧的半徑
lay.lsp 通過(guò)點(diǎn)取層上一實(shí)體來(lái)實(shí)現(xiàn)層操作：刪除/解凍/凍結(jié)
bg0.lsp 直接將正負(fù)零標(biāo)注在圖紙中(建筑結(jié)構(gòu)圖用)
bg1.lsp～bg4.lsp 標(biāo)注各種標(biāo)高
hu.lsp 直接給出園弧長(zhǎng)度
jdx.lsp 截?cái)嗑�
jdx2.lsp 雙截?cái)嗑�
bdgj.lsp 板底鋼筋(土建結(jié)構(gòu)圖用)
bdgj1.lsp,bdgj2.lsp 板頂鋼筋(土建結(jié)構(gòu)圖用)
dk1.lsp～dk8.lsp 配合PKPM軟件生成的圖繪洞口(基礎(chǔ)留洞）
gl1.lsp～gl8.lsp 配合PKPM軟件生成的圖繪過(guò)梁(結(jié)構(gòu)平面圖）
gzz.lsp 構(gòu)造柱繪制
ACAD.LIN 增強(qiáng)的線型文件, 擴(kuò)充線型(線型比例為1)如下:
XX 虛線(用于1:1的圖)
DHX 點(diǎn)劃線(用于1:1的圖)
XX100 虛線(用于1:100的圖)
DHX100 點(diǎn)劃線(用于1:100的圖)
ACAD.LSP 增強(qiáng)的ACAD啟動(dòng)文件, 命令擴(kuò)展如下:
CHXX 將線型改為虛線(用于1:1的圖)
CHDHX 將線型改為點(diǎn)劃線(用于1:1的圖)
CHXX100 將線型改為虛線(用于1:100的圖)
CHDHX100 將線型改為點(diǎn)劃線(用于1:100的圖)
CHCON 將線型改為連續(xù)線
CHC 直接修改實(shí)體的顏色
其余詳見(jiàn)ACAD.LSP的內(nèi)容。ACAD的命令縮寫(xiě)根據(jù)其使用的頻率作了調(diào)整。
V 先執(zhí)行ZOOM E, 再將當(dāng)前視圖存儲(chǔ)，并調(diào)用ZOOM W
此命令主要為"超級(jí)視圖"做準(zhǔn)備，"超級(jí)視圖"妙處一用便知 ! 建議使用顯
示卡自帶的AutoCAD顯示驅(qū)動(dòng)
增強(qiáng)后的ACAD.LSP能在狀態(tài)行上顯示當(dāng)前文件名
ACAD.MNU的改進(jìn): 調(diào)整了光標(biāo)菜單（共兩頁(yè)），并將最常用的捕捉方式定義
在組合光標(biāo)鍵上。
將如下內(nèi)容替換原相應(yīng)項(xiàng)
***BUTTONS1
**b11
;
$b1=b12 $p0=p01 $p0=*
**b12
;
$b1=b11 $p0=p02 $p0=*
***BUTTONS2
_end,_int
***BUTTONS3
_nea
***BUTTONS4
'_view r e '_zoom w
***POP0
**p02
[DDedit]^C^CDDEDIT
[CHGtext]^C^C(if (not chgtext) (load "chgtext"));chgtext
[]
[NEArest]_nea
[PERpendicular]_per
[MIDpoint]_mid
[CENter]_center
[ENDpoint]_endp
[INSert]_ins
[INTersection]_int
[NODe]_nod
[QUAdrant]_qua
[TANgent]_tan
[NONe]_non
[]
[Calculator]'cal
**p01
[]
[Line]^C^C_line
[Polyline]^C^C_pline
[Circle]^C^C_circle
[Arc]^C^C_arc
[]
[Erase]^C^C_erase
[Move]^C^C_move
[Copy]^C^C_c
[Stretch]^C^C_str
[Rotate]^C^C_rotate
[Fillet]^C^C_f
[Offset]^C^C_offset
[Extend]^C^C_extend
[Trim]^C^C_trim
[Break]^C^C_break
[Explode]^C^C_explode
[]
說(shuō)明:
1. 按Shift鼠標(biāo)右鍵: end,int 捕捉方式
2. 按Ctrl鼠標(biāo)右鍵: nea 捕捉方式
3. 按ShiftCtrl鼠標(biāo)右鍵: 啟動(dòng)"超級(jí)視圖"
4. 按鼠標(biāo)中鍵: 捕捉方式和常用繪圖命令的切換(共兩頁(yè))
下面是一業(yè)余版的二維建筑設(shè)計(jì)軟件，其最大的特色為所繪的實(shí)體僅有
LINE、POLYLINE、CIRCLE和TEXT四種，修改容易。雖只有二十多個(gè)程序，
但確能幫您解決二維繪圖中的一些問(wèn)題。
ax.lsp 規(guī)則軸網(wǎng)繪制
chax.lsp 軸線線型由點(diǎn)劃線到連續(xù)線的交替變換
wwall.lsp 外墻繪制
nwall.lsp 內(nèi)墻繪制(beta)
gwall.lsp 隔墻繪制(beta)
ss.lsp 室外散水
chww.lsp 墻線加粗
chw0.lsp 墻線加粗恢復(fù)
dimw.lsp 標(biāo)注墻厚
zhu.lsp 交點(diǎn)插柱
win.lsp 墻上插窗
wwin.lsp 無(wú)墻畫(huà)窗
door.lsp 墻上插門(mén)
3dimzs.lsp 標(biāo)注左邊及上邊的第三排尺寸線
3dimyx.lsp 標(biāo)注右邊及下邊的第三排尺寸線
lt1.lsp 雙跑樓梯平面
ltpm.lsp 雙跑樓梯剖面(better)
wsj.lsp 衛(wèi)生間布置
wsj1.lsp 單個(gè)側(cè)開(kāi)門(mén)衛(wèi)生間
tj1.lsp 臺(tái)階繪制
pd.lsp 坡道繪制
sy1.lsp 索引1
sy2.lsp 索引2
lmw.lsp 立面窗
lmm.lsp 立面門(mén)
RAR
