1、. . . . 課程設計說明書課 程 名 稱: 發動機設計課程設計 課 程 代 碼:8205531題 目: 195柴油機連桿設計與連桿螺栓強度校核計算 學院(直屬系) : 交通與汽車工程學院 年級/專業/班:2009/熱能與動力工程（汽車發動機）/1班學 生 姓 名: 學 號: 1535 指 導 教 師: 曾東建、田維、暴秀超 開 題 時 間: 2012 年 6 月 28 日完 成 時 間: 2012 年 7 月 16 日目 錄摘要 2 1引言31.1國外燃機研究現狀31.2任務與分析32柴油機工作過程計算52.1 已知條件52.2 參數選擇62.3 195柴油機額定工況工作過程計算63 連桿

2、設計93.1 連桿結構設計93.2 連桿材料選擇114 連桿螺釘強度校核124.1 連桿螺釘的結構設計 124.2 連桿螺釘的強度校核135 結論15致17參考文獻18附錄：195柴油機額定工況工作過程計算程序19摘要20 世紀 90 年代以來，汽車行業的競爭已從單一的性能競爭轉向性能、環保、節能等多元綜合競爭。僅就柴油機而言，為應對世界能源危機和減少對環境污染，其研究開發工作已側重于降低油耗、減少排放、輕質與減少磨損等方面，在這些研究中優化技術將得到廣泛的應用。汽車已經在普通民眾中得到普與，隨著汽車行業的不斷發展，汽車產業的未來樂觀與否一定意義決定于發動機的技術水平。因此，培養高素質的汽車發

3、動機人才對當今社會的快速發展至關重要。本次課程設計的既是通過對195柴油機結構的分析研究，計算工作過程中的熱力參數繪制其工作過程的P-V圖，繪制195柴油機總成橫剖面圖，對連桿進行設計、強度計算和繪制連桿零部件圖，對并對設計好的連桿大頭、小頭和螺釘進行校核，以根據工況設計連桿小頭、桿身、大頭，合理達到要求。此次，我們就選擇了對連桿螺釘進行校核。連桿螺釘在連桿蓋以與連桿大頭之間的聯接發揮著至關重要的作用，并且由于往復慣性力和氣體壓力的雙重作用下，使螺釘的受力十分嚴酷，所以對其進行強度校核就顯得十分必要。關鍵詞： 柴油機、連桿、設計、校核1引 言1.1國外燃機研究現狀 毫無疑問，節能、環保是當今燃

4、機研究的主題。發動機伴隨著汽車走過了100多年的歷史，無論是在設計、制造、工藝還是在性能、控制方面都有很大的提高，但其基本原理仍然沒有改變。這是一個富于創造的時代，那些發動機的設計者們，不斷地將最新科技與發動機融為一體，把發動機變成一個復雜的機電一體化產品，使發動機性能達到近乎完善的程度，各世界著名汽車廠商也將發動機的性能作為競爭亮點，現在的汽車發動機不僅注重汽車動力的體現，更加注重能源消耗、尾氣排放等與環境保護相關的方面，從而使人們在悠閑的享受汽車文化的同時，也能保護環境、節約資源。發動機未來的發展將著重于改進燃燒過程，提高機械效率，減少散熱損失，降低燃料消耗率；開發和利用非石油制品燃料、擴

5、大燃料資源；減少排氣中有害成分，降低噪聲和振動，減輕對環境的污染；采用高增壓技術，進一步強化燃機，提高單機功率；研制復合式發動機、絕熱式渦輪復合式發動機等；采用微處理機控制燃機，使之在最佳工況下運轉；加強結構強度的研究，以提高工作可靠性和壽命，不斷創制新型燃機變氣門，變升程，變相位，甚至停掉幾個缸的技術，都沒能做到在行進中連續變缸徑，但有等效的。清潔燃料以與代用燃料發動機的研制。迫于環境的要求，汽車巨頭們曾預言，未來數年后汽車將使用液化氫、天然氣或電力作為動力，如果壓縮天然氣CNG技術日趨成熟，另外，燃機的研究領域也深入到了甲醇、酒精、二甲醚等代用燃料的領域。采用計算機來模擬進出燃燒室的燃料和

6、空氣流的情況也是一項突破性的技術。燃燒室和活塞的形狀、噴油脈沖的能量和方向、活塞和發動機熱量的運動情況都會影響油氣混合物霧滴的位置。這項技術采用了 指燃油分層噴射。燃油分層噴射技術是發動機稀燃技術的一種。稀燃，顧名思義就是發動機混合氣中的汽油含量低，汽油與空氣之比可達1：25以上。 VVT（Variable Valve Timing的縮寫)可變氣門正時技術，它是汽油發動機技術發展的一個里程碑。其主要設計思想是發動機氣門升程和配氣相位定時可以根據發動機工況作實時的調節。而我們常見的CVVT，就是在這個原理上增加了連續性的概念，即Continue。CVVT的主要設計原理是通過電子控制系統改變凸輪軸

7、打開進氣門的時間早晚，從而控制所需的氣門重疊角。這項技術著重于第一個字母C(Continue連續)，強調根據發動機的工作狀況連續變化，時時控制氣門重疊角的大小，從而改變氣缸進氣量。當發動機低速小負荷運轉時，如怠速狀態，這時應延遲進氣門打開時間，減小氣門重疊角，以穩定燃燒狀態。當發動機低速大負荷運轉時，如起步、加速、爬坡時，應使進氣門打開時間提前，增大氣門重疊角，以獲得更大的扭矩。當發動機高速大負荷運轉時，如高速行駛時，也應延遲進氣門打開時間，減小氣門重疊角，從而提高發動機工作效率。當發動機處于中等工況時，如中速勻速行駛時，CVVT也會相對延遲進氣門打開時間，減小氣門重疊角，此時的目的是減少燃油

8、消耗，降低污染排放。1.2任務與分析 1.2.1熱計算1） 目的促進學生復習和總結已學知識，提高發動機工作過程中熱力參數與結構之間的關系；熟悉各參數對發動機工作指標的影響，結合對各參考發動機與其工況的分析，培養學生的分析能力，從而達到能正確選擇參數的目的。（1）掌握了不同參數的選取、確定，掌握了過量空氣系數：，最高燃燒壓力：Pz，熱量利用系數：z，殘余廢氣系數：，排氣中點溫度：Tr，示功圖豐滿系數：i，機械效率：m，等參數對計算結果的影響和變化規律。(2)學生對發動機的工作過程的各個過程相互的影響有一個清晰的認識，了解了汽油機與柴油機工作過程計算的差異。通過P-V圖的繪制，使學生掌握了如何利用

9、示功圖進行發動機的工作過程分析。掌握了汽油機、柴油機在同一工作過程的不同的曲線的變化趨勢。(3)由于要求計算過程必須采用VB編程進行，因此，使學生更進一步了解如何使用計算機，進行具體的設計計算工作，更進一步熟悉計算機編程。1.2.2縱、橫剖面圖 1）訓練的目的繪制發動機縱橫剖面圖，在課程設計中占很重要的地位。設計的發動機是否合理？能否達到熱計算中所確定的參數指標？都將在圖上得到不同程度的反映，同時它還能表達所設計發動機的結構特點，零部件的主要形狀，相互關系，附件的布置和各系統、機構的安排。通過繪制發動機縱、橫剖面圖，能培養學生的識圖和繪圖能力，以與對已學知識的綜合運用能力，為畢業設計奠定一定的

10、基礎。要求學生對發動機結構形式，設計指標進行深入全面的了解，作出分析評價，將其優點應用到設計的發動機上，并認真負責地對待自己畫的每一條線，和貫徹有關國家標準。2）訓練效果分析195柴油機從結構上來講，是最簡單的發動機，通過195柴油機縱橫剖面圖繪制的訓練，使學生全都掌握了：（1） 發動機的基本結構，零部件的主要形狀，相互關系，附件的布置和各系統、機構的安排。（2） 通過繪制發動機縱、橫剖面圖，培養了學生的識圖和繪圖能力，以與對已學知識的綜合運用能力，為畢業設計奠定一定的基礎。（3） 學生對發動機結構形式，設計指標進行了深入全面的了解，作出分析評價，將其優點應用到設計的發動機上，并認真負責地對待

11、自己畫的每一條線。（4） 熟悉了有關國家標準。1.2.3連桿設計、強度計算和繪制連桿零部件圖1）目的（1）校核零件的結構強度，繪制零件圖，促使學生復習和掌握所學知識，進行工程師必備的基本功訓練。（2）分析發動機連桿的運動規律與受力情況，作為強度，設計連桿。培養和鍛煉學生設計、繪圖、分析和計算能力。2）訓練效果分析通過對連桿設計，使學生掌握了：（1）如何分析零件的運動規律和受力，如何進行計算和校核。（2）如何確定設計要求，建立完整的零件的設計步驟、思維。1.2.4發動機課程設計說明書編制按西華大學本科課程設計說明書規化要求的格式要求進行撰寫，通過訓練，使學生們掌握了： 1)設計說明書的編制格式，

12、為畢業設計打下基礎。2)對整個發動機設計課程設計的工作容進行總結，訓練學生收集資料，分析資料，利用資料，組織資料的能力。3)訓練文字編輯能力。2柴油機工作過程計算 2.1 已知條件 195柴油機已知條件 表2-1缸 徑：D=95 mm氣缸數：i=1標定功率：Ne=8.8kw有效油耗ge =235g/Kw.h標定轉速：N=2000r/m壓縮比：1921每缸工作容積：V=0.815(L)曲柄半徑和連桿長度比：R/L=1/4大氣狀態：PO=1bar、TO=288K燃燒室形式，分隔式燃燒室冷卻方式等。開式蒸發冷卻2.2參數選擇過量空氣系數：=1.6；最高燃燒壓力：Pz=75bar；殘余廢棄系數：=0.

13、04；排氣終點溫度：Tr=850K；示功圖豐滿系數：i=0.90；機械效率：m=0.85；進氣加熱溫升：T=20；平均多變壓縮指數：n1=1.36；平均多變膨脹指數：n2=1.25。P0 = 1bar；T0 =288k2.3 195柴油機額定工況工作過程計算2.3.1 排氣沖程 （1）高速四沖程非增壓柴油機終點壓力： =1.08 bar （2）高速四沖程非增壓柴油機排氣溫度可以利用經驗公式計算終點溫度： =778 k 2.3.2 進氣沖程 選擇殘余廢棄收縮系數 =0.5 終點壓力：= 1 bar 終點溫度： =328.454 K充氣效率： = 0.89 2.3.3 壓縮沖程 （1）壓縮終點壓力

14、： = 54.841 bar （2）壓縮終點溫度： = 948.038 K （3）壓縮過程中任意點的汽缸容積： (4) 壓縮過程中任意點的氣缸壓力：其中代表壓縮過程中任意點的汽缸容積。 2.3.4 燃燒過程 （1）理論所需空氣量： = 0.49 Kmol/Kg燃料 （2）新鮮充量： = 0.783 Kmol （3）燃燒產物總量： = 0.816 Kmol （4）理論分子變更系數： = 1.132 （5）實際分子變更系數： = 1.128(6) 最高燃燒壓力 Pz = 75 bar (選定)(7) 壓力升高比 = 1.999 (8) 燃燒重點溫度Tz的計算 燃料的低熱值:Hu = 42500 (

15、KJ/Kg) 熱量利用系數 又因為 將的值帶入下面所示的方程組,即可解出Tz的值: 從而解得 Tz = 2165 K (9) 初期膨脹比：= 1 2.3.5膨脹過程 (1) 后期膨脹比：(2) 膨脹終點壓力： = 2 bar (3) 膨脹終點溫度： = 873 K (4) 膨脹過程任意點壓力 2.3.6 指示性指標的計算 （1）平均指示壓力：=7.163 bar=6.447 bar（2）指示熱效率：=0.32（3） 指示燃油消耗率：（4）有效熱效率：=0.31（5）有效燃油消耗率：=242.52 g/KW.h （6） 平均有效壓力：=6.327 bar （7）有效功率： =8.5912.3.7

16、 P-V示功圖 3 連桿設計3.1 連桿結構設計3.1.1 連桿小頭的結構設計 連桿小頭與活塞銷相連，工作時，連桿小頭與活塞銷之間有相對轉動，因此連桿小頭孔中一般壓入減摩的青銅襯套。同時，為了潤滑活塞銷和襯套，在小頭和襯套上鉆出集油孔或銑出集油槽，用來收集發動機運轉過程時被激濺上來的機油，以便潤滑活塞銷和襯套。有的發動機連桿小頭采用壓力潤滑，在連桿桿身鉆有縱向的壓力油通道。 連桿小頭位于活塞銷腔，特點是：尺寸小、軸承比壓高、溫度較高；軸承表面相對運動速度較低，擺動運動，不利于形成油鍥或者承載油膜。連桿徑向尺寸和外表面是否加工有關，外表面不加工的連桿小頭，其，全部經過機械加工的連桿小頭，在之間。

17、 為了耐磨，在小頭孔還壓有耐磨襯套。設計連桿小頭的任務是確定其結構尺寸（小頭軸承孔直徑d1和寬度B1、外形尺寸D1、襯套外徑d）和潤滑方式。其中d1、B1已在活塞組設計中確定，一般柴油機B1d1。據統計，小頭的外徑一般比孔徑大20%-35%，即D1=（1.21.35）d，小頭的最小徑向厚度大于4毫米。該尺寸可按強度、剛度條件確定。有的連桿小頭，外徑中心向上下各偏差e，以加強結構，并相對減輕了重量，一般e=（0.020.04）D。 綜上所述，得出本次設計的連桿小頭的尺寸為：D1=50 mm, d=40（0±0.025）mm。3.1.2連桿桿身的結構設計 工字型斷面的平均相對高度H/D=

18、0.30.4(柴油機)，高度比H/B=1.41.8。工字行桿件的寬度B初步值可按以下經驗公式求出：，其中D、S分別為氣缸直徑和行程。 桿身也承受交變載荷，可能產生疲勞破壞和變形，連桿高速擺動時的橫向慣性也會使連桿彎曲變形，因此桿身必須有足夠的斷面積，并消除產生應力集中的因素。 為使連桿從小頭到大頭傳力比較均勻，一般把桿身斷面H從小頭到大頭逐漸加大，值最大到1.3左右，桿身到小頭到大頭的過度必須用足夠大的圓角半徑。 對工作可靠的發動機的統計表明，現代汽油機連桿桿身平均斷面積fm與活塞面積Fp之比fm/Fp=0.020.035，柴油機為0.030.05。為了在較小重量下得到較大的剛度，高速燃機的連

19、桿桿身斷面都是“工”字型的，而且其長軸應在連桿擺動平面。計算選取，R=60mm，取L=210mm；取=33mm。3.1.3連桿大頭的結構尺寸設計連桿大頭聯接連桿和曲軸，要求有足夠的強度和剛度，否則將影響薄壁軸瓦、連桿螺栓，甚至整機工作可靠性。為了便于維修，高速燃機的連桿必須能從氣缸中取出，連桿大頭的結構與尺寸的基本上決定于曲柄銷直徑D2、長度B2，連桿軸瓦厚度和連桿螺釘的直徑dm。其中D2、B2是根據曲軸強度、剛度和軸承的承壓能力，在曲軸設計中確定。為了結構緊湊，軸瓦厚度趨于減薄，汽車拖拉機用軸瓦=1.53毫米。連桿螺釘尺寸則根據強度設計。因此，本處所謂大頭設計，實際上是確定連桿大頭在擺動平面

20、某些主用尺寸，連桿大頭剖分型式、定位方式，與大頭蓋的結構設計。 連桿大頭連接連桿和曲軸，要求有足夠的強度和剛度，否則將影響薄壁軸瓦，連桿螺釘，甚至整機工作可靠性。為了便于維修，燃機的連桿必須能從氣缸中取出，故要求大頭在擺動平面的總寬度必須小于氣缸直徑；大頭重量產生的離心力會使連桿軸承、主軸承負荷增大，磨損加劇，于是還為此不得不增大平衡重，給曲軸設計帶來困難，因此在設計連桿大頭時，應在保證強度、剛度條件下，尺寸盡量小，重量盡量輕。大頭尺寸設計：1）曲柄銷直徑、長度這兩個尺寸是根據曲軸強度、剛度和軸承的承壓力，在曲軸設計中確定的。也可根據,來初步確定。本次設計=68mm，=36mm。2)連桿軸瓦厚

21、度=1.33mm，取=2mm3）螺栓距離C，C取88mm,螺栓孔外側壁厚不得小于2毫米。4)大頭切口形式和定位方式 195柴油機連桿所采用的斜切口，斜角為45°，端面則采用止口定位，其工藝簡單，成本低。但不能防止大頭蓋止口向外變形，連桿體止口向變形，這種蓋與體都是單向定位，定位不可靠；止口易變形；止口因加工誤差或裝拆變形對大頭孔影響較大。 5）連桿大頭各處的形狀應采用圓滑過渡。3.2 連桿材料選擇 為了保證連桿在機構輕巧的條件下有足夠的剛度，一般多用精選含碳量的優質中碳機構鋼，只有在特別強化且產量不大的汽油機中用40Cr等合金鋼。合金鋼有較高的綜合機械性能，但當存在產生應力集中的因素

22、時，它的耐勞能力急劇下降，甚至低到與碳素鋼不相上下。所以合金鋼連桿的形狀設計、過度圓滑性、毛坯表面質量下降等，必須給以更多的注意，才能充分發揮優質材料的潛力。40MnB,40MnVB等硼鋼作為高負荷的大量生產連桿的材料，顯示了良好的使用性能。40MnB鋼化學成分（%）：C（0.370.45），Mn（1.11.4），Cr<0.3，P和S0.04，B（0.0010.005），經850油淬500高溫回火后強度極限b>1000()，屈服強度a>800（），沖擊韌性>70。 連桿縱向端面宏觀金相組織要求金屬纖維方向與連桿外形相符，纖維無環曲與中斷現象。連桿一般用剛鍛造，在機械加工

23、前應進行調質處理（淬火后高溫回火），以得到較好的綜合機械加工性能，既強又韌。為了連桿的疲勞強度，不經機械加工的表面應經過噴丸處理。連桿必須經過磁力探傷檢查，以求工作可靠。我國已研究成功連桿輥段工藝，輥段工藝不僅不需要大型鍛造設備，而且還改善了工人的勞動條件。為了節約優質鋼材，降低產品成本，我國還成功地試用了一稀有鎂球墨鑄鐵制造高速汽油機連桿。試驗證明，鑄造連桿的強度應在HB210-250之間，上限是為了保證有足夠的強度，下線是為了保證良好的韌性。這樣硬度的珠光體鑄鐵具有300-350（）的抗彎曲疲勞強度，與中碳鋼差不多。在大批量生產鑄造連桿時為了保證制造質量穩定，要求對爐料、熱處理等工藝規程嚴

24、加控制，并仔細的在在質量檢查，例如超聲波或X線無損探傷等。據國外經驗，強韌的珠光體可鍛鑄鐵適于制造連桿。本次設計選用材料40Cr。4 連桿螺釘的結構設計與強度校核4.1 連桿螺釘的結構設計發動機連桿組的功能是將活塞的往復運動轉變為曲軸的旋轉運動，并把作用在活塞上氣體的作用力傳遞給曲軸，以輸出功率。連桿組在工作時作平面運動，承受了大小和方向均按周期性變化的氣體作用力和慣性力的作用，并作往復和擺動的復合運動。發動機的連桿大頭與曲軸連桿軸頸的聯接是靠連桿螺釘來實現的，所以連桿螺釘所承受的載荷是交變載荷。為了保證連桿大頭結合面在工作時不分離，連桿螺釘在裝配時應有足夠的預緊力（P0）。此力由兩個部分組成

25、：一部分為使連桿軸瓦緊貼軸承瓦座所需的預緊力；另一部分為防止連桿體和連桿軸承瓦座結合面在工作載荷作用下脫開所需的預緊力。這兩部分力對連桿螺釘都造成扭力。根據螺釘受力情況設計出螺釘的參數：螺紋規格d=M12；公稱長度為L=59mm；性能等級為8級4.2 連桿螺釘的強度校核四沖程發動機工作時，連桿螺釘承受的最大拉伸載荷按公式計算。對斜切口連桿來說，連桿螺釘所承受的拉伸載荷為：式中連桿體與連桿蓋結合面與垂直連桿縱軸的平面間的夾角活塞組的重量 G1連桿組往復部分的重量 G2旋轉部分的重量 G3連桿大頭蓋的重量曲柄連桿比G=1.75kg G1=0.55kg G2=1.164 G3=0.25kg =0.2

26、5則 連桿螺釘的預緊力連桿螺釘螺紋外徑（12mm）S螺距（88mm）摩擦系數螺釘支撐環面平均半徑（7.2mm）其中： S/=0.1 /=0.6 =0.15則 連桿螺釘的預緊力不足不能保證連接的可靠性，但預緊力過大則可能引起材料屈服，最后仍會使連接松弛，因此必須校核屈服的可能性連桿螺釘最小端面積 螺釘最小直徑12×0.85=10.2mm基本動載荷系數 選取為0.22所以 則屈服強度滿足要求連桿螺釘所受的拉力在 和 之間變化。則螺紋桿部名義應力：螺桿部的直徑d=12mm對螺紋根部名義應力：螺紋根部的直徑d=12×0.85=10.2mm對螺桿進行疲勞安全系數計算：式中：為材料在對

27、稱循環下的拉壓疲勞極限，此處取工藝系數 此處取0.5 角系數 此處取0.2所以螺桿的疲勞安全系數計算：對螺紋根部進行疲勞安全系數計算：由于選用具有較高的屈服極限的中碳合金鋼40Cr制造，在調質處理后硬度達到HRC2939，屈服極限在800以上。查表可求得為800。則許用應力：則：連桿螺釘的屈服強度和疲勞強度符合設計標準5 結 論在這次設計過程中，體現出自己單獨設計的能力，以與綜合運用知識的能力，體會了學以致用、突出自己勞動成果的喜悅心情，從中發現自己平時學習的不足和薄弱環節，從而加以彌補。課程設計是我們專業課程知識綜合應用的實踐訓練，著是我們邁向社會，從事職業工作前一個必不少的過程”千里之行始

28、于足下”，通過這次課程設計，我深深體會到這句千古名言的真正含義我今天認真的進行課程設計，學會腳踏實地邁開這一步，就是為明天能穩健地在社會大潮中奔跑打下堅實的基礎。對發動機課程設計過程中的討論進行了總結，得到了以下幾個方面的結論： 1 通過對發動機連桿進行設計以與繪制了發動機總成（橫剖面圖）、連桿工程圖（A0、A1圖紙各一），使發動機的布置合理，結構緊湊，符合發動的機設計要求。2 根據工作過程計算選擇了適當的可變參數，計算出了195柴油機的各個過程狀態參數與其他相關參數，并計算求得了表達燃機性能的各性能指標，以與柴油機在標定轉速下的功率和燃油消耗率，同時繪制出了發動機的P-V圖，直觀的表示出其工

29、作過程。3 對發動機總成進行設計以與對其總成進行了工程圖的繪制，使發動機布置合理，結構緊湊；4 連桿結構設計：桿身采用工字斷面結構，大頭采用斜切口鋸齒形定位結構，結構合理，小頭孔中壓入減摩的青銅襯套，耐磨性好。5 對連桿螺釘進行了強度校核，其校核結果表明，此次設計的連桿，其螺釘部分滿足連桿設計要求。 致 值在本報告完成之際，首先感辛勤傳授我知識的交通與汽車工程學院。在此也感我們的曾老師.，老師嚴謹細致、一絲不茍的作風一直是我工作、學習中的榜樣；老師循循善誘的教導和不拘一格的思路給予我無盡的啟迪；這次發動機設計的每個細節和每個數據，都離不開老師您的細心指導。而您開朗的個性和寬容的態度，幫助我能夠

30、很順利的完成了這次課程設計。其次，我也十分感在整個課程設計實驗中給予我幫助的同學和室友，感他們在學習中給我的幫助。最后感我的父母，他們的鼓勵是我完成這次報告的動力，感他們無私的奉獻。 參考文獻1曾東建.汽車發動機設計 . 西華大學，2009.2遠文.發動機工作過程計算.西華大學，20093周龍保，高宗英.燃機學M.機械工業，20034寶剛.開展企業管理信息化工作的步驟J，企業管理，2002（11）：12155Islamabad. Software tools for forgery detectionJ. Business line.2001. (5）. 2932 6何華，曾馨.發動機結構M.

31、：理工大學，2006.7西華大學交通與汽車工程學院.燃機課程設計指導書8臧杰，閻巖.汽車構造M.：機械工業，2008.附錄：195柴油機額定工況工作過程計算程序 程序核心代碼Option Explicit Dim n, nn, pr, po As Single Dim tr, pa, Va, s, d, vh, kkk As Single Dim pab, e, paa, pad, pac As Single Dim tt, t, yy, fa, ta As Single Dim nv, n1, tc, pc, fx As Single Dim l, Vc, gc, gh, g0 As Sin

32、gle Dim Vcx, r, lo, a, mt, m1, m2, u0, u As Single Dim khu, cv1, cv2, tz, ccc, hu, , aaa, bbb As Single Dim l8, n2, pz, tb, pi1, pi, p As Single Dim fi, pm, nm, ni, gi, ne, pe, ge, nne, i, v, pb As Double Dim ylsgb As Single Dim P0, Pcx, Tcx, Pbx, Tbx, Vbx As Single Dim x, y As Integer Dim x, Vb1Pri

33、vate Sub Command2_Click() Picture1.ClsEnd SubPrivate Sub Command3_Click() EndEnd SubPrivate Sub Command4_Click() Picture1.Cls Picture1.Scale (-0.1, 120)-(1.1, -10) Picture1.ForeColor = vbBlack Picture1.Line (0, 0)-(1.3, 0) '畫X軸 Picture1.Line (0, 0)-(0, 115) '畫Y軸 Picture1.CurrentX = 0.95: Pic

34、ture1.CurrentY = -0.02: Picture1.Print "V (L)" Picture1.CurrentX = 0.02: Picture1.CurrentY = 115: Picture1.Print "P (bar)" For y = 0 To 110 Step 5 '畫刻度 Picture1.Line (0, y)-(0.02, y) Picture1.CurrentX = -0.08: Picture1.CurrentY = y + 1.5: Picture1.Print y Next y Picture1.Line

35、 (0, 115)-(-0.01, 113.5) '畫箭頭 Picture1.Line (0, 115)-(0.01, 113.5) For x = 0.1 To 1 Step 0.1 '畫刻度 Picture1.Line (x, 0)-(x, 0.2) Picture1.CurrentX = x - 0.05: Picture1.CurrentY = -0.02: Picture1.Print x Next x Picture1.Line (1, 0)-(0.99, 2) '畫箭頭 Picture1.Line (1, 0)-(0.99, -2) Vc = vh / (

36、e - 1) Picture1.ForeColor = vbBlue Picture1.CurrentX = Vc + 0.01: Picture1.CurrentY = 10: Picture1.Print "Vc" Picture1.Line (Vc, 120)-(Vc, 0) '畫Vc線 Picture1.ForeColor = vbRed Picture1.Line (0, 1)-(0.95, 1) '畫P0線 Picture1.CurrentX = 0.95: Picture1.CurrentY = 4: Picture1.Print "

37、P0" Va = vh + vh / (e - 1) Vc = vh / (e - 1) Picture1.ForeColor = vbGreen '=畫壓縮曲線= For x = 0 To 3.14 Step 0.0001 Vcx = vh / 2 * (1 - Cos(x) + (1 - Cos(2 * x) * 1 / 4 / 4) + Vc Pcx = pa * (Va / Vcx) n1 Picture1.PSet (Vcx, Pcx) Next x Picture1.Line (Vc, pc)-(Vc, pz) '=畫膨脹曲線= For x = 3.14

38、To 6.28 Step 0.0001 Vbx = vh / 2 * (1 - Cos(x) + (1 - Cos(2 * x) * 1 / 4 / 4) + Vc Pbx = pb * (Va / Vbx) n2 If Pbx <= pz Then Picture1.PSet (Vbx, Pbx) Else: Picture1.Line (Vc, pz)-(Vbx, pz) End If Next x Vb1 = vh / 2 * (1 - Cos(6.4) + (1 - Cos(2 * 6.4) * 1 / 4) + Vc Picture1.Line (Va, pa)-(Va, pb

39、) '畫放熱線 Picture1.Line (Va, pc)-(Va, pz) '畫加熱線End SubPrivate Sub Command1_Click() s = Val(Text2.Text): d = Val(Text4.Text) n = Val(Text1.Text): po = Val(Text15.Text) / 10: e = Val(Text5.Text): tt = Val(Text17.Text): fa = Val(Text18.Text): r = Val(Text2.Text) l = Val(Text31.Text) / 3.14 / (d /

40、 2) 2) gc = Val(Text11.Text): gh = Val(Text12.Text): g0 = Val(Text8.Text) a = Val(Text19.Text): mt = Val(Text20.Text): fi = Val(Text9.Text): i = Val(Text3.Text) n1 = Val(Text14.Text): n2 = Val(Text33.Text) '=排氣過程= pr = Int(1000 * 10.8 * po) / 1000: tr = 350 / (1.2 / Log(n) * Log(10) + 0.005 * (e

41、 - 3) + 0.01 * (fa - 1): hu = 42500 '柴油機 暫時先賦的值 '=進氣過程= 'kkk = 2.4 * nn / n 'pab = (10 / kkk) 2 paa = n 2 / 520000000 pac = (e - 0.5) 2) / (e - 1) 2) '殘余廢氣收縮系數 暫時取的0.5 ' pad = 1 - paa * pab * pac * (1 / (fa 2) 't = 20 * (110 - 0.0125 * n) / (110 - 0.0125 * nn) t = 20 '

42、;t 進氣溫升 取的 20 pa = 0.9 * po * 10 '進氣壓力 yy = (tt + t) * pr / tr / (e * pa - pr) ' 殘余廢氣系數 yy ' ta = (t + tt + yy * fa * tr * (pa / pr) (n - 1) / n) / (1 + yy * fa) '進氣溫度 ta = (tt + t + yy * tr) / (1 + yy) '進氣溫度 nv = tt * pa * e * (e * pa - pr) / (tt + t) / (10 * po) / (e - 1) / e /

43、 pa '充氣系數 '=壓縮過程= 'n1 = 1.46 - 0.05 * nn / n '平均壓縮多變指數 pc = Int(100 * (pa * e (n1) / 100 '壓縮終點壓力 tc = Int(10 * ta * e (n1 - 1) / 10 '壓縮終點溫度 '=燃燒過程= lo = 1 / 0.21 * (gc / 12 + gh / 4 - g0 / 32) m1 = a * lo: m2 = a * lo + gh / 4 + g0 / 32 u0 = m2 / m1 u = (u0 + yy) / (1 + y

44、y) '實際分子變更系數 'khu = 58000 * (1 - a) '化學損失 khu = 0 cv1 = (4.815 + 0.000415 * tc) * 4.1868 ' If n < 2400 Then '- 熱量利用系數選取 ' = 0.08 / 1300 * n + 0.74 ' Else: = 0.88 'End If = Val(Text30.Text) ccc = ( * (hu - khu) / m1 / (1 + yy) + cv1 * tc) / u aaa = (3.3 / a + 3.7) * 4.1868 / 10000 '