基于ExceI的半球封頭瓜瓣圖樣自動(dòng)生成程序設(shè)計(jì)

0引言

半球封頭,作為一種在工程和工業(yè)領(lǐng)域被廣泛應(yīng)用的壓力容器部件,因其獨(dú)特的形狀和性能優(yōu)勢(shì)而備受關(guān)注。

在半球封頭實(shí)際生產(chǎn)制造中,常用到兩種成型方式:整體模壓和分瓜瓣打鼓。按照采購(gòu)方的實(shí)際需求,多數(shù)分瓜瓣的情況下,是以1頂圓十n瓜瓣(n為瓜瓣數(shù)量)的模式進(jìn)行的^[1]。

設(shè)計(jì)人員通常使用人工手繪或CAD軟件制圖進(jìn)行放樣過(guò)程,但由于此過(guò)程煩瑣,既有可能導(dǎo)致失誤,也會(huì)降低工作效率。

鑒于這種情況,考慮到CAD與Excel的交互性,先以某半球封頭為基準(zhǔn),通過(guò)分析其分瓣放樣過(guò)程中各參數(shù)之間的幾何關(guān)系,使用Excel軟件強(qiáng)大的函數(shù)編程功能進(jìn)行程序編輯,使軟件能自動(dòng)計(jì)算出CAD 軟件繪圖所需的坐標(biāo)數(shù)據(jù)和命令字符串,將該字符串粘貼在CAD軟件命令欄的輸入框中,能迅速生成所需的半球封頭的瓜瓣放樣圖。

當(dāng)需要繪制其他規(guī)格半球封頭的瓜瓣圖樣時(shí),只需修改設(shè)計(jì)參數(shù),程序會(huì)自動(dòng)修改變量參數(shù),實(shí)現(xiàn)新的命令字符串的生成。

1半球封頭的各參數(shù)

在某些應(yīng)用場(chǎng)合,需要對(duì)半球封頭的端面進(jìn)行加工,沿封頭軸線方向切割掉一定深度的材料,使剩下的部分能夠配合壓力容器或管道的整體尺寸。

如此獲得的封頭剩余部分各參數(shù)如圖1所示。

2程序編制

2.1幾何關(guān)系

由于球形曲面為不可展曲面,只能作近似展開(kāi)^[2]。在生產(chǎn)實(shí)際中,球瓣坯料的下料方法主要為放樣法。如圖2所示,以半球封頭的中線層為基礎(chǔ),進(jìn)行分瓣放樣。將半球封頭分為1頂蓋十n瓜瓣,n的值根據(jù)板坯的尺寸規(guī)格以及封頭焊縫條數(shù)的要求來(lái)確認(rèn)。如圖3所示,去除頂圓后,對(duì)封頭剩余部分進(jìn)行放樣。將⌒BA 等分為8段(等分點(diǎn)越多,瓜瓣側(cè)邊曲線越平滑),等分點(diǎn)分別為C₁、C₂、C₃、C₄、C₅、C₆、C₇點(diǎn),其中C₄點(diǎn)為⌒BA的中點(diǎn)。從A點(diǎn)、B點(diǎn)以及各等分點(diǎn)投影在封頭中性線上的對(duì)應(yīng)點(diǎn)分別為A1、B1、C1'、C2'、C3'、C4'、C5'、C6'、C7'點(diǎn)。

另 取一點(diǎn)O1 為圓 心 , 以BB1 、C1C1'、C2C2'、… 、C7C7'、AA1的值為半徑,分別作圓,將這些圓均分為2n等分,取其中的一等分,對(duì)應(yīng)的弧長(zhǎng)分別為⌒D0D0'、⌒D1D1'、···、⌒D8D8'。

過(guò)C₄點(diǎn)作⌒BA的切線交OB1的延長(zhǎng)線于O'點(diǎn)。以O(shè)'點(diǎn)為圓心,O'C₄為半徑畫圓。再以O(shè)'點(diǎn)為圓心,在此圓基礎(chǔ)上,將⌒BA長(zhǎng)度值的1/8作為半徑的差值,分別作半徑逐步增大和減小的各4個(gè)圓。如圖4所示,在O'點(diǎn)建立坐標(biāo)系,最大的圓交Y軸正半軸于G點(diǎn),最小的圓交Y軸正半軸于F點(diǎn)。

在X軸正半軸作9條平行于Y軸的輔助線,其距分別等于⌒D0D0'、⌒D1D1'、···、⌒D8D8'的弧長(zhǎng)值,分別交所作的9個(gè)圓于E₀、E₁、E₂、…、E₈點(diǎn)。

2.2 公式推導(dǎo)

為了在Excel軟件里編制CAD軟件繪圖命令,需要確定E₀、E₁、E₂、…、E₈點(diǎn)的坐標(biāo)值。先確定β和γ的角度值:

式中:α為頂蓋對(duì)應(yīng)的球心角的一半的值;β為AO與封頭端面夾角的值;γ為⌒AB所對(duì)應(yīng)球心角的一半的值;h為封頭削去部分的高度值;r為封頭中線層半徑值。

結(jié)合式(1)和式(2)以及“2.1幾何關(guān)系”中己知條件,依次得到:

式中:n為瓜瓣數(shù)量值。

令:

⌒BA=b    (3)

結(jié)合式(2)和式(3)以及“2.1幾何關(guān)系”中己知條件,先求得:

在式(4)的基礎(chǔ)上再依次求得:

結(jié)合以上式子,分別求得:

由此可得E₀、E₁、E₂、…、E₈點(diǎn)的坐標(biāo)值:(X₀,Y₀)、(X₁,Y₁)、(X₂,Y₂)、…、(X₈,Y₈)。

2.3程序編制

2.3.1建立封頭參數(shù)區(qū)窗口

如圖5所示,在A2:E13單元格區(qū)域地址內(nèi)建立“封頭參數(shù)”區(qū)。其中,“回切后封頭口面中徑值”“封頭中線層的半徑值”“封頭頂蓋中徑值”“頂蓋對(duì)應(yīng)球心角的一半”“頂蓋下料圓直徑”均可由封頭設(shè)計(jì)參數(shù)經(jīng)過(guò)計(jì)算所得。

根據(jù)其幾何關(guān)系編制對(duì)應(yīng)的程序如下:

“回切后封頭口面中徑值”在E7單元格,輸入=E3十E6。

“封頭中線層的半徑值”在E8單元格,輸入=E4十E6/2。

“封頭頂蓋中徑值”在E10單元格,輸入=ROUND(E8*SIN(E12*PI()/180)*2,3)。

“頂蓋對(duì)應(yīng)球心角的一半”在E12單元格,輸入= ROUND(ASIN(E9/(2*E4))*180/PI(),3)。

“頂蓋下料圓直徑”在E13單元格,輸入=ROUND (2*PI()*E8*2*E12/360,3)。

2.3.2建立計(jì)算參數(shù)區(qū)窗口

如圖6所示,在A14:E19單元格區(qū)域地址內(nèi)建立“計(jì)算參數(shù)”區(qū),其中β,γ,⌒BA,O'E0,O'E1,… ,O'E8 的值由上述步驟推導(dǎo)得出的結(jié)果轉(zhuǎn)換為Excel的函數(shù)公式。

β的值在B15單元格,輸入=ROUND(ASIN(E5/E8)*180/PI(),3)。

γ的值在C15單元格,輸入=(90—E12—B15)/2。

⌒BA的值在D15單元格,輸入=ROUND(2*PI()*E8*2*C15/360,3)。

O'E0 的值在E15單元格,輸入=ROUND(E17—4*D15/8,3)。

O'E1的值在B17單元格,輸入=ROUND(E17—3*D15/8,3)。

O'E2的值在C17單元格,輸入=ROUND(E17—2*D15/8,3)。

O'E3 的值在D17單元格,輸入=ROUND(E17—D15/8,3)。

O'E4的值在E17單元格,輸入=ROUND(E8*TAN ((E12+C15)*PI()/180),3)。

O'E5 的值在B19單元格,輸入=ROUND(E17+D15/8,3)。

O'E6的值在C19單元格,輸入=ROUND(E17+2*D15/8,3)。

O'E7的值在D19單元格,輸入=ROUND(E17+3*D15/8,3)。

O'E8的值在E19單元格,輸入=ROUND(E17+4*D15/8,3)。

2.3.3建立輸出坐標(biāo)和輸出命令區(qū)

如圖7所示,在A20:E39單元格區(qū)域地址內(nèi)建立“輸出坐標(biāo)”區(qū),將繪制瓜瓣所需節(jié)點(diǎn)的橫縱坐標(biāo)的代數(shù)公式轉(zhuǎn)換為ExceL里的函數(shù)公式。

然后在A40:E40單元格區(qū)域地址內(nèi)建立“輸出命令”區(qū),根據(jù)CAD軟件中繪圖的步驟,將所需進(jìn)行的命令及輸入的坐標(biāo)轉(zhuǎn)化為ExceL的字符串,如下所示:輸出命令="a"&""&"c"&""&E39&""&E21&""&E30&" " &"a"&""&"c"&""&E39&""&E29&""&E38&""&"PLINE"&""&E21&""&E22&""&E23&""&E24&" "&E25&" "&E26&""&E27&""&E28&""&E29&" "&" "&""&E38&""&E37&""&E36&""&E35&" "&E34&" "&E33&""&E32&""&E31&""&E30&" "&""&"P"

2.3.4自動(dòng)繪圖

如圖8所示,復(fù)制輸出命令B40:E40單元格的字符串,打開(kāi)CAD軟件,新建文件,在命令欄的輸入窗口內(nèi)粘貼,即可自動(dòng)生成軟件內(nèi)以“世界坐標(biāo)系”的原點(diǎn)為繪圖坐標(biāo)原點(diǎn)的瓜瓣圖形。

3 結(jié)束語(yǔ)

使用此程序計(jì)算輸出的瓜瓣圖樣不含加工余量。在實(shí)際生產(chǎn)中,還需在瓜瓣周邊加上適當(dāng)?shù)募庸び嗔?。保存以上步驟所建立的ExceL文件,當(dāng)需要計(jì)算其他半球封頭的下料瓜瓣時(shí),只需修改“封頭參數(shù)”區(qū)的數(shù)據(jù),“輸出命令”區(qū)會(huì)輸出新的制圖命令字符 串,再進(jìn)行“2.3.4自動(dòng)繪圖”中的步驟即可。此程序 的使用能夠大大提高工作效率,減少人為制圖失誤的產(chǎn)生,同時(shí)為企業(yè)的降本增效提供技術(shù)支持。

[參考文獻(xiàn)]

[1] 胡元乾.球形封頭新的成型工藝方法[J].機(jī)械工程師,2015(10):268-269.

[2]王妍娜.大直徑球形封頭沖壓展開(kāi)下料尺寸的計(jì)算[J].吉林化工學(xué)院學(xué)報(bào),2011,28(9):46-48.

2024年第16期第9篇