【CHENG風(fēng)管】 Copy right by 李波 2003年
本程序代碼:
1、本人保留本程序的所有權(quán)利;
2、未經(jīng)本人許可,任何個(gè)人、單位、集體不得運(yùn)用于商業(yè)目的;
3、滿足條件1、2的前提下,允許自由拷貝、修改、編輯、散發(fā);
4、對(duì)本程序代碼的編輯、修改,煩請(qǐng)發(fā)一個(gè)編輯后的拷貝到chenghell@tom.com;
5、本人不對(duì)因使用本程序造成的任何損失負(fù)責(zé);
6、任何的編輯、修改、拷貝、散發(fā),必須保留本聲明及此readme.txt文件;
7、不能滿足本聲明的任意一條,請(qǐng)刪除本程序。
************************** 本程序包括 ********************************************************
cheng.lsp 風(fēng)管主程序
cheng_tool.lsp 工具程序
cheng_dcl.lsp 對(duì)話框程序
chengs.lsp 自定義函數(shù)
cheng.mns 菜單
cheng.mnl 加載
readme.txt readme
dwg/* 圖塊文件
sld/* 幻燈片及dcl文件
txt/* 數(shù)據(jù)文件
************************** 安 裝 ************************************************************
方法一: 推薦菜鳥(niǎo)使用 >>>>>>>
1、解壓cheng.zip到CAD安裝目錄的support文件夾中,比如:C:\Program Files\AutoCAD 2000\SUPPORT\;
2、加載程序菜單
打開(kāi)CAD,依次選擇如下菜單:
工具-->>自定義-->>菜單-->>菜單組-->>瀏覽...
-->>在CAD安裝目錄的support文件夾中,選擇cheng.mns-->>裝載
-->>菜單條-->>菜單組-->>cheng-->>插入-->>關(guān)閉
如果看見(jiàn)增加了一個(gè)cheng的菜單就表明加載菜單成功--如果不行,再來(lái)一遍。
3、退出CAD,重新打開(kāi)CAD。
ok!。
方法二: >>>>>>>>
1、解壓cheng.zip到C:\Program Files\cheng
2、加載程序搜索目錄
打開(kāi)CAD,依次選擇如下菜單:
-->>tools (工具)-->>Preferences(系統(tǒng)配置)-->>File (文件)
-->>Support File Search Path(支持文件搜索目錄)-->>Add (添加)-->>C:\Program Files\cheng
3、加載程序菜單
打開(kāi)CAD,依次選擇如下菜單:
CAD-->>tools (工具)-->>Custonmize(自定義菜單)-->>Menu Groups(菜單組)-->>Browse... (瀏覽)
-->>C:\Program Files\cheng\cheng.mns-->>打開(kāi)-->>Load (裝載)
-->>Menu bar(菜單條)-->>菜單組-->>cheng-->>Insert(插入)-->>close
4、ok!。
5、建議在support\Acad.pgp(天正在sys中)中添加幾個(gè)快捷鍵:
;cheng fg-繪風(fēng)管,wt-繪彎頭,ii-插入管件,dq-文字對(duì)齊,bb-從點(diǎn)打斷,hh-修改字高
fg, *cheng_fg
wt, *cheng_fg_wt
ii, *cheng_fg_insert
dq, *cheng_align
bb, *cheng_break
hh, *cheng_hh
6、本程序適合R14以上版本,R14以下版本不能100%保證本程序的正常運(yùn)行(未經(jīng)低版本測(cè)試,不可知)。
本程序包中的圖塊文件均為R14版本,如果需在R14版本以下運(yùn)行,必須將其重新保存為低版本文件。
7、本程序默認(rèn)風(fēng)管圖層為cheng_fg,如果你需修改,請(qǐng)?jiān)诘谝淮问褂脮r(shí),先設(shè)定風(fēng)管圖層(命令cheng_cheng_fglay)。
在打開(kāi)的圖中,如果你繪圖中已經(jīng)定義了圖層,則本程序可自動(dòng)設(shè)置,不需再設(shè)置。
本程序的圖層設(shè)置均以**_mid為參照物,請(qǐng)勿隨意刪除,推薦在出圖時(shí)設(shè)定為隱藏。
假定風(fēng)管圖層為cheng_fg(顏色為青色),則風(fēng)管中心線圖層為cheng_fg_mid,顏色為蘭色;風(fēng)管終線圖層為cheng_fgend,顏色為
黃色;風(fēng)管法蘭圖層同風(fēng)管圖層,顏色為黃色;風(fēng)管文字圖層為cheng_fg_txt。
若自定義風(fēng)管圖層為Ac,則上述圖層中的"cheng_fg"將為"Ac",如Ac_mid,Acend,Ac_txt。
標(biāo)注風(fēng)管時(shí),推薦請(qǐng)先自行設(shè)定當(dāng)前合適字體,不設(shè)也無(wú)妨。
8、自定義風(fēng)管管件,請(qǐng)參考txt\fggj.txt。
************************** 菜 鳥(niǎo) 使 用 說(shuō) 明 *************************************************
推薦在ACAD R14下運(yùn)行,支持2000以上版本。
1、設(shè)置風(fēng)管圖層
如果你喜歡自己設(shè)置圖層或需要設(shè)置圖層以區(qū)別多種風(fēng)管,請(qǐng)?jiān)谛聢D中先行設(shè)置風(fēng)管圖層。
命令:cheng_fglay
菜單:cheng->風(fēng)管->風(fēng)管圖層
a)、自定義圖層
command:cheng_fglay
新風(fēng)(X)/回風(fēng)(H)/通風(fēng)(T)/除塵(C)/排煙(P)/天正管(Z)/自定義(M)/拾取圖層(D)/送風(fēng)
風(fēng)管圖層名稱: 【輸入AC】
C-顯示顏色對(duì)話框/風(fēng)管圖層顏色<4>:【如果輸入“c”則打開(kāi)顏色對(duì)話框選擇,默認(rèn)為4即青色】
b)、拾取已有風(fēng)管圖層
command:cheng_fglay
新風(fēng)(X)/回風(fēng)(H)/通風(fēng)(T)/除塵(C)/排煙(P)/天正管(Z)/自定義(M)/拾取圖層(D)/送風(fēng)
拾取置為當(dāng)前風(fēng)管圖層的風(fēng)管線: CHENG_FGS【選擇一條風(fēng)管管線,“cheng_fgs”為已拾取到的圖層名稱】
C-顯示顏色對(duì)話框/風(fēng)管圖層顏色<4>: 【輸入“C”,打開(kāi)顏色對(duì)話框并選擇一種顏色,默認(rèn)為青色】
注:當(dāng)下次打開(kāi)圖紙,再次編輯時(shí)候,程序?qū)⒆詣?dòng)查找最后一次定義過(guò)或程序自動(dòng)捕捉到的風(fēng)管圖層,并將其設(shè)置為當(dāng)前風(fēng)管圖層。
如果有多種風(fēng)管(多個(gè)圖層),建議先執(zhí)行該命令的b部分。天正管即使用天正暖通II繪制的風(fēng)管,如果設(shè)置為天正管則其圖層定義為
與天正暖通II的相同。
2、繪制風(fēng)管
命令:cheng_fg
菜單:cheng->風(fēng)管->繪制風(fēng)管
a)、
Command: cheng_fg
選擇風(fēng)管起點(diǎn) / 連接上一段風(fēng)管(L):【在圖中選擇開(kāi)始繪制風(fēng)管的地方點(diǎn)擊選擇一個(gè)起點(diǎn)】
選擇風(fēng)管第二點(diǎn): 【在圖中選擇繪制風(fēng)管的第二點(diǎn)】
風(fēng)管管徑<500.0>:【輸入風(fēng)管管件,回車默認(rèn)500mm】
選取風(fēng)管下一點(diǎn): 【在圖中選擇繪制風(fēng)管的第三、四、五、...、點(diǎn),回車停止繪制風(fēng)管】
H-不再出現(xiàn)本選項(xiàng) / 是否加粗風(fēng)管?
而不是ACAD2000里面的設(shè)置線寬,如果選擇N不加粗,下次系統(tǒng)將默認(rèn)選擇N】
加粗寬度<30.0>: 【輸入加粗寬度,默認(rèn)30.0,如果出圖比例為1:100則加粗寬度為30.0/100=0.3mm】
b)、
Command: cheng_fg
選擇風(fēng)管起點(diǎn) / 連接上一段風(fēng)管(L):【輸入“l(fā)”】
選擇風(fēng)管終線:
Select objects: 【請(qǐng)選擇需要連接到上段風(fēng)管的終線--所謂終線,就是風(fēng)管“起始”段的法蘭或堵頭部分,
即在圖中其圖層為“*end”的黃色線段,如果該法蘭不是圖層為“*end”,則可以先設(shè)置其為“*end”】
選擇風(fēng)管第二點(diǎn): 【在圖中選擇繪制風(fēng)管的第二點(diǎn)】
風(fēng)管管徑<500.0>:【輸入風(fēng)管管件,回車默認(rèn)500mm】
風(fēng)管彎頭曲率<1.5>:【輸入彎頭曲率,默認(rèn)1.5。如果風(fēng)管第二點(diǎn)與風(fēng)管第一點(diǎn)不在同一水平方向則回出現(xiàn)該選項(xiàng)】
是否方彎頭(Y/N)?
選取風(fēng)管下一點(diǎn): 【在圖中選擇繪制風(fēng)管的第三、四、五、...、點(diǎn),回車停止繪制風(fēng)管】
是否加粗風(fēng)管?
注:在繪制風(fēng)管的過(guò)程中,程序能自動(dòng)根據(jù)前后兩段風(fēng)管的位置及管徑大小,自動(dòng)繪制彎頭及其大小頭,而不用考慮轉(zhuǎn)彎及變徑的問(wèn)題。
在”連接上一段風(fēng)管“中,程序是以風(fēng)管終線(黃色并其圖層為"cheng_fgend")為選擇坐標(biāo)的,如果該終線曾被修改所在圖層或已
被刪除掉,請(qǐng)重新修改其正確所在圖層或補(bǔ)繪一條終線。
3、三通
1)、插入三通
命令:cheng_fg_st04
菜單:cheng->風(fēng)管->三通->插入三通
Command: cheng_fg_st04
選擇風(fēng)管終線:
Select objects:【請(qǐng)選擇風(fēng)管終線--所謂終線,就是風(fēng)管起始段的法蘭或堵頭部分,即在圖中其圖層為“*end”的黃色線段】
合流三通(H)/分流三通
左支管管徑<320.0>:【輸入管徑,默認(rèn)320mm--支管管徑必須不大于主管管徑】
右支管管徑<320.0>:【輸入管徑,默認(rèn)320mm】
2)、三通
命令:cheng_fg_st2
菜單:cheng->風(fēng)管->三通->繪制三通
【不建議使用--本人都經(jīng)常不會(huì)用^_^】
4、四通
1)、插入圓弧四通
命令:cheng_fg_st02
菜單:cheng->風(fēng)管->四通->插入圓弧四通
Command: cheng_fg_st02
選擇風(fēng)管中心線 【即選擇圖中其圖層為“*_zxx”的蘭色虛線段】
上支管管徑<500.0>: 【輸入管徑,默認(rèn)500mm】
下支管管徑<500>: 【輸入管徑,默認(rèn)500mm】
是否對(duì)調(diào)(Y/N):
2)、插入直角四通
命令:cheng_fg_st01
菜單:cheng->風(fēng)管->四通->插入直角四通
Command: cheng_fg_st01
選擇風(fēng)管中心線 【即選擇圖中其圖層為“*_zxx”的蘭色虛線段】
上支管管徑: 【輸入管徑320】
下支管管徑<320>: 【輸入管徑,默認(rèn)320mm】
是否對(duì)調(diào)(Y/N):
......
5、側(cè)連風(fēng)管
1)、側(cè)連方風(fēng)管
命令:cheng_clfg3
菜單:cheng->風(fēng)管->側(cè)連風(fēng)管->側(cè)連方風(fēng)管
Command: cheng_clfg3
選擇風(fēng)管管線:【選擇一條風(fēng)管管線,一般為青色且其圖層為“AC”(自己定義的,默認(rèn)則為“cheng_fgs”)的線段。該選擇點(diǎn)即為側(cè)連風(fēng)管的起點(diǎn)】
選擇側(cè)聯(lián)風(fēng)管第二點(diǎn):【在圖中選擇一點(diǎn),即側(cè)聯(lián)風(fēng)管的終點(diǎn)】
風(fēng)管管徑<320.0>: 【側(cè)連風(fēng)管管徑,默認(rèn)320mm】
直接(Z)雙邊圓彎(C)/雙邊方彎(F)/左邊圓彎(L)/右邊圓彎(R)/左邊方彎(E)/右邊方彎(I):
注意:側(cè)連風(fēng)管一般與主風(fēng)管垂直,如不垂直可能出錯(cuò)!
2)、側(cè)連圓風(fēng)管
命令:cheng_clfg
菜單:cheng->風(fēng)管->側(cè)連風(fēng)管->側(cè)連圓風(fēng)管
Command: cheng_clfg
選擇風(fēng)管管線:【選擇一條風(fēng)管管線,一般為青色且其圖層為“AC”(自己定義的,默認(rèn)則為“cheng_fgs”)的線段。該選擇點(diǎn)即為側(cè)連風(fēng)管的起點(diǎn)】
側(cè)聯(lián)風(fēng)管第二點(diǎn): 【在圖中選擇一點(diǎn),即側(cè)聯(lián)風(fēng)管的終點(diǎn)】
風(fēng)管管徑<320.0>:【側(cè)連風(fēng)管管徑,默認(rèn)320mm】
注意:該程序有bug,如果風(fēng)管不為水平或垂直可能出錯(cuò)。推薦使用3)、側(cè)連圓風(fēng)管2
3)、側(cè)連圓風(fēng)管2
命令:cheng_clfg2
菜單:cheng->風(fēng)管->側(cè)連風(fēng)管->側(cè)連圓風(fēng)管2
Command: cheng_clfg2
選擇風(fēng)管管線:【選擇一條風(fēng)管管線,一般為青色且其圖層為“AC”(自己定義的,默認(rèn)則為“cheng_fgs”)的線段。該選擇點(diǎn)即為側(cè)連風(fēng)管的起點(diǎn)】
側(cè)聯(lián)風(fēng)管第二點(diǎn): 【在圖中選擇一點(diǎn),即側(cè)聯(lián)風(fēng)管的終點(diǎn)】
風(fēng)管管徑<320.0>:【側(cè)連風(fēng)管管徑,默認(rèn)320mm】
6、連接風(fēng)口
命令:cheng_clfg4
菜單:cheng->風(fēng)管->連接風(fēng)口
Command: cheng_clfg4
F-選擇風(fēng)管終點(diǎn)/連接風(fēng)口:<選擇風(fēng)口> 【必須選擇已有的風(fēng)口圖塊,其所在圖層同風(fēng)管圖層】
選擇風(fēng)管管線:【選擇一條風(fēng)管管線,一般為青色且其圖層為“AC”(自己定義的,默認(rèn)則為“cheng_fgs”)的線段。該選擇點(diǎn)即為支風(fēng)管的起點(diǎn)】
風(fēng)管管徑<320.0>:【輸入風(fēng)管管徑,默認(rèn)320mm】
直接(Z)雙邊圓彎(C)/雙邊方彎(F)/左邊圓彎(L)/右邊圓彎(R)/左邊方彎(E)/右邊方彎(I):
7、風(fēng)管彎頭
命令:cheng_fg_wt
菜單:cheng->風(fēng)管->風(fēng)管彎頭
Command: cheng_fg_wt
選擇主風(fēng)管中心線:【即選擇圖中其圖層為“*_zxx”的蘭色虛線段】
選擇次風(fēng)管中心線:【即選擇圖中其圖層為“*_zxx”的蘭色虛線段】
選擇風(fēng)管內(nèi)圓方向:【靠近內(nèi)圓弧附近選擇一點(diǎn),以確定方向。風(fēng)管彎頭是由兩段圓弧組成的,外圓即圓弧較長(zhǎng)的那個(gè),反之則為內(nèi)圓】
彎頭曲率<1.5>: 【默認(rèn)彎頭中心線圓弧半徑為較小風(fēng)管管徑的1.5倍】
8、插入風(fēng)管管件
命令:CHENG_FG_INSERT
菜單:cheng->風(fēng)管->插入風(fēng)管管件
a)、
Command: CHENG_FG_INSERT
自由插入(Z)/選擇風(fēng)管中心線
【在對(duì)話框中選擇一管件,“確定”,將插入管件】
自由插入(Z)/選擇風(fēng)管中心線
b)、
Command: CHENG_FG_INSERT
自由插入(Z)/選擇風(fēng)管中心線
請(qǐng)選擇管件插入點(diǎn): 【任意選擇一插入點(diǎn)】
【在對(duì)話框中選擇一管件,“確定”,將插入管件】
R-選擇對(duì)齊線/管件旋轉(zhuǎn)角度<0>: 【輸入管件與水平方向夾角,默認(rèn)水平。如果輸入“R”可以選取一線段作為管件對(duì)齊的基線】
選擇管件插入點(diǎn): 【循環(huán)插入(回車或右鍵退出)】
注明:所謂充滿風(fēng)管,即該管件的寬度與風(fēng)管管徑大小相同,如風(fēng)管閥門(mén)。
某些編輯框(edit_box)支持運(yùn)算法則。