【正文】 l)圖 44 曲軸參數(shù)化對話框示意圖進入AutoCAD的Visual lisp編輯窗口，打開對話框文件后，依次單擊進入工具/界面工具/預(yù)覽編輯器中的對話框后，彈出“輸入對話框的名稱 ”對話框，單擊確定就出現(xiàn)如圖44 曲軸參數(shù)化對話框示意圖?？丶▓D像、加框列、編輯框、并且引用了ok_cancel控件。 對話框的程序：quzhou:dialog{ //對話框的名字為quzhou label= 曲軸參數(shù)化設(shè)計。 //對話框的標簽為曲軸參數(shù)化設(shè)計 alignment=centered。 :row{ //從第一行開始 :image{width=40。 //第一行的第一個控件是圖像 height=8。 //圖像的高度、圖像的寬度 key=image。 //圖像的關(guān)鍵字 color=2。 //圖像的背景色為AutoCAD的背景色 } :column{ //第一行的第二個控件是列 :edit_box{label=氣缸直徑amp。D(mm) ：。// 列的第一個控件是編輯框 key=D_box。 //編輯框1的關(guān)鍵字 width=12。 //編輯框1的寬度 } :edit_box{label=旋轉(zhuǎn)角amp。Angle ：。 //列的第二個控件是編輯框 key=alf。 //編輯對話框的關(guān)鍵字 width=12。 //編輯對話框的寬度 value=0。 //控件初始狀態(tài)值 } :boxed_column { //列的第三個控件是加框列 label=定位點。 //加列框的標簽為定位點 :button{ //加列框的第一個控件是屏幕取點按鈕 label=屏幕取點 。 //加列框的標簽 key=pick。 //加列框的關(guān)鍵詞 } :edit_box{ //加列框的第二個控件是編輯框 label=amp。X(mm)：。 //加列框編輯框 1的標簽 width=12。 //加列框的編輯框1的寬度 key=X_box。 //加列框的編輯框 1的關(guān)鍵字 } :edit_box{ //加列框的第三個控件是編輯框 label=amp。Y(mm)：。 //加列框編輯框 2的標簽 width=12。 //加列框編輯框2的寬度 key=Y_box。 //加列框編輯框 2的關(guān)鍵詞 }} }} ok_cancel。 //OK和Cancel按鈕} 對話框的驅(qū)動程序?qū)υ捒蛭募枋隽藢υ捒虻慕Y(jié)構(gòu)和外觀、所屬控件的樣式、功能及控件的布局。但是將對話框顯示到屏幕上，使對話框及其各控件發(fā)揮作用，必須靠驅(qū)動程序。對話框的驅(qū)動流程圖見圖45圖 45 對話框驅(qū)動程序流程圖1）加載、卸載對話框文件 加載對話框程序 (load_dialog f:\\bishe\\duihuakuang\\dhk) 。裝入對話框文件該程序為加載一個對話框文件，并指定了文件的路徑，該函數(shù)默認AutoCAD的搜索路徑。若加載成功返回一個大于0的整數(shù)。如(setq id (load_dialog f:\\bishe\\duihuakuang\\dhk))若返回值大于0，則表示加載成功；否則加載失敗。卸載對話框程序 (unload_dialog id) 。卸載對話框文件無論卸載是否成功，返回值均為nil2） 初始化、激活、關(guān)閉對話框(new_dialog quzhou id) ，將對話框顯示到屏幕上。參數(shù)id 為load_dialog函數(shù)的返回值。(start_image image) ，激活由new_dialog 函數(shù)顯示的對話框，等待并接受用戶的操作。此后對話框一直保持著激活狀態(tài)。直到某一動作表達式調(diào)用了done_dialog函數(shù)，該函數(shù)才返回done_dialog函數(shù)的狀態(tài)值。在調(diào)用start_image 之前一定要檢測new_dialog 函數(shù)的返回值是否為T，否則會發(fā)生不可預(yù)料的結(jié)構(gòu)。（done_dialog [status] ），隱藏對話框，參數(shù)status 是一個整數(shù)，是提供給start_image函數(shù)的返回值。該函數(shù)的返回值為一個二維點的坐標。該坐標為對話框的左上角相對于屏幕左上角的位置（以像素為單位）。3）定義控件的動作（action_tile key action_expression），制定控件的相對動作。參數(shù)key為控件的關(guān)鍵字，action_expression為控件的動作表達式，另外動作表達式可不止一個。如：(action_tile accept (getdata)(done_dialog 1)) 該函數(shù)實現(xiàn)了確認按鈕式用于肯定用戶操作的控件。它的關(guān)鍵字屬性key固定為accept。包括：將各控件的最終數(shù)據(jù)傳遞給應(yīng)用程序；調(diào)用done_dialog 函數(shù)，并設(shè)置對話框退出時的狀態(tài)值。Getdata 是用戶定義的函數(shù)，其功能是將各控件的最終結(jié)果傳遞給應(yīng)用程序，其中1作為調(diào)用done_dialog函數(shù)的狀態(tài)參數(shù)值。4）處理控件的屬性（get_tile key ） 獲取關(guān)鍵字key的控件的值，即獲得該關(guān)鍵字控件的value屬性的值；（set_tile key value）設(shè)置關(guān)鍵字key的空間的值；(dimx_tile key) 返回關(guān)鍵字為key的控件的寬度，以像素為單位；(dimy_tile key) 返回關(guān)鍵字為key的控件的高度，以像素為單位。5）建立圖像控件（start_image key）打開key指定圖像的控件，開始對其操作。這是圖像錯做必須用到的，而且是首先調(diào)用的函數(shù)。（slide_image x1 y1 x2 y2 sldname）在當前打開的圖像空間上顯示一幅幻燈片。參數(shù)x1 y1 x2 y2是為確定幻燈片位置的對角點坐標。（end_image ）結(jié)束當前圖像控件的處理。這是圖像操作必須用到的，而且是最后調(diào)用的函數(shù)。6）曲軸對話框的驅(qū)動程序本文的對話框程序及驅(qū)動程序詳見附錄C。在程序的屏幕取點、ok和cancel按鈕的活動都含有調(diào)用done_dialog 函數(shù)的表達式，因此單擊任意一個按鈕，對話框都會消失。屏幕取點和ok按鈕的活動都含有調(diào)用函數(shù)getdada函數(shù)，前者以獲取的數(shù)據(jù)進行對話框的初始化，后者用獲取的數(shù)據(jù)進行作圖。屏幕取點、ok和cancel按鈕在調(diào)用done_dialog 函數(shù)時的狀態(tài)值依次是 0，也是start_dialog函數(shù)返回的并賦給 std的值，是while 循環(huán)的條件變量，std=2，仍然滿足循環(huán)的條件，因此屏幕取點之后重新顯示對話框而單擊ok和cancel按鈕之后不再顯示對話框。 生成應(yīng)用程序AutoCAD既可以將直接加載的AutoLISP源代碼解釋執(zhí)行，也可以通過編譯器先將其源代碼便以為可執(zhí)行程序，然后加載執(zhí)行。前者的優(yōu)點是可隨時測試或修改源代碼，可以利用所有的調(diào)試程序的工具；后者的優(yōu)點是提高了執(zhí)行的速度，并可對源代碼進行保密，因此程序調(diào)試結(jié)束后，生成應(yīng)用程序可以對程序進行保護。通過生成應(yīng)用程序可以生成*.vlx可執(zhí)行文件、*.fas文件，以實現(xiàn)對程序的保護。打開AutoCAD后，進入visual lisp編輯器，在菜單欄依次打開文件/ 生產(chǎn)應(yīng)用程序/新建應(yīng)用程序向?qū)?，彈出對話框，如圖46 向?qū)Ｊ?，按照對話框依次操作即可生成?yīng)用程序。圖 46 向?qū)Ｊ綀D 47 啟動組 程序運行的結(jié)果在AutaoCAD中運行l(wèi)isp文件有很多種方法，下面兩種是比較常用的方法：方法一：打開AutoCAD后，進入visual lisp編輯器，打開曲軸程序的主程序，在visuallisp控制臺中輸入（c：quzhou），即可啟動了該程序，然后按照對話框的提示即可出現(xiàn)曲軸的圖形。方法二：打開AutoCAD后，在菜單欄里依次單擊工具/加載應(yīng)用程序，彈出加載/ 卸載應(yīng)用程序?qū)υ捒?，選取需要加載的文件，并且單擊加載，成功后單擊關(guān)閉，然后在AutoCAD命令行中輸入文件名，即可彈出程序的對話框，按照其提示即可繪出曲軸的圖形。如果在啟動組里添加所需要的文件，那么在每次啟動AutoCAD時都會自動加載這些應(yīng)用程序。在彈出的加載/卸載應(yīng)用程序?qū)υ捒蛑?，在啟動組中單擊 “內(nèi)容”，彈出如圖47啟動組，添加文件的路徑即可。設(shè)置結(jié)束后在命令窗口輸入“quzhou”，即可彈出如圖48 曲軸對話框所示，例如在汽缸直徑的編輯框中輸入105，旋轉(zhuǎn)角輸入0，再單擊屏幕取點，最后單擊確定就出現(xiàn)如圖49 4105型曲軸。即實現(xiàn)了曲軸的參數(shù)化設(shè)計。圖 48 曲軸對話框圖 49 4105 型曲軸5 結(jié)論曲軸作為內(nèi)燃機整機系統(tǒng)的一個重要組成部分，在論文期間通過對所研究對象—曲軸進行了特征提煉、參數(shù)化后，完成了整個曲軸框架的建立，已經(jīng)達到前期選題的要求，可以實現(xiàn)作為一個CAD系統(tǒng)的基本功能。但是，由于時間有限以及對于工程設(shè)計理解上的欠缺，要想使程序真正應(yīng)用于生產(chǎn)實踐，還有許多后續(xù)工作要做。本文主要研究成果有：1. 經(jīng)過編寫簡單的曲軸模型程序?qū)崿F(xiàn)了曲軸的二維設(shè)計圖紙，包括了尺寸的標注、對話框的設(shè)計、幻燈片的設(shè)計、對話框驅(qū)動程序的設(shè)計、應(yīng)用程序的設(shè)計等等，為以后的進一步設(shè)計奠定了重要基礎(chǔ)；2. 經(jīng)過二次開發(fā)的參數(shù)化CAD軟件具有效率高、可靠性好的優(yōu)點。同時，利用實體造型技術(shù)不儀能夠?qū)π误w進行剖切生成剖視圖，并且還可以對其體積、重心、慣性矩和慣性積等物性參數(shù)實施計算和分析．為進行強度、動平衡計算、有限元分析等提供了依據(jù)。主要不足之處與展望：1. 由于時間和水平有限只編寫了曲軸的二維結(jié)構(gòu)設(shè)計的圖，在編寫曲軸程序時對于曲軸的倒角及圓角的繪制、粗糙度的標注等問題沒有解決。2. 程序雖然實現(xiàn)了二維圖紙的繪制，但是在實際應(yīng)用中，通過三維圖更能反應(yīng)出零件的形狀，利于對零件的分析，要真正實現(xiàn)曲軸的參數(shù)化設(shè)計應(yīng)該實現(xiàn)曲軸的三維模型的設(shè)計；3. 現(xiàn)代的制造企業(yè)要求產(chǎn)品更新周期短，產(chǎn)品種類多，以滿足消費者對商品的個性化、快速化、實用化的要求。這就要求CAD系統(tǒng)能夠勝任諸如快速原型設(shè)計，快速建立幾何模型，工程分析，為后續(xù)的自動化加工準備數(shù)據(jù)等工作。本程序雖然完成了曲軸的結(jié)構(gòu)設(shè)計，但是曲軸的強度和振動校核以及曲軸三維圖象的建模，但功能還不全面，不支持產(chǎn)品設(shè)計的全過程。這就為后續(xù)工作提出了補充功能模塊、加強CAD系統(tǒng)集成度的要求，以實現(xiàn)不同的功能模塊支持設(shè)計的不同階段，從而完成設(shè)計過程中的各種任務(wù)。謝辭經(jīng)過幾個月的忙碌和學(xué)習(xí)，本次畢業(yè)設(shè)計論文已經(jīng)接近尾聲。這里向老師們表示深深的謝意。本論文是在導(dǎo)師楊洋老師的悉心指導(dǎo)下完成的，從開始的題目選擇到設(shè)計資料篩選，再到論文的撰寫到最后的定稿，都得到了楊老師的耐心指導(dǎo)和悉心關(guān)懷。楊老師嚴謹?shù)闹螌W(xué)態(tài)度和淵博的專業(yè)知識給我留下了深刻的印象，對我以后的工作和學(xué)習(xí)產(chǎn)生了積極的影響。楊老師的每一次點撥，都使我受益匪淺，正是這一次次的指導(dǎo)，使我一直很順利的進步，并最終完成論文，在此向我的導(dǎo)師表示深深的感激。書山有路勤為徑，學(xué)海無涯苦作舟。轉(zhuǎn)眼四年的本科生生活即將結(jié)束，在這緊張而繁忙的學(xué)習(xí)期間，時時感受到老師們無私耕耘的辛勞，深得教誨的同時，也體會到知識給予的快樂。這是大學(xué)的終點也是人生的另一個起點，在以后的人生道路上我將一如既往地努力奮斗，以此報答父母的養(yǎng)育之恩和所有關(guān)心幫助我的人對我的期望。還要感謝學(xué)院的許多老師和同學(xué)，在我平時的學(xué)習(xí)和生活當中，他們都給予了我不少的支持和幫助，在此，謹致以誠摯的謝意。參考文獻【1】 [M].北京：中國農(nóng)業(yè)機械出版社,1980.【2】 LISP程序設(shè)計（AutoCAD 2022）[M]. 北京：清華大學(xué)出版社,2022.【3】 [M].北京：機械工業(yè)出版社，2022.【4】 李長勛主編. AutoCAD Visual LISP程序開發(fā)技