基于AutoLISP的電動機設(shè)計系統(tǒng)二次開發(fā)

王會霞，鄭德聰，丁 航

(1.山西農(nóng)業(yè)大學(xué)，山西 太谷030801； 2.亳州溫氏畜牧有限公司，安徽 渦陽233600)

0 引言

Y系列(IP44)三相異步電動機中機座帶地腳、端蓋上無凸緣的電動機，是機械設(shè)計中一種常用的動力機。在使用AutoCAD軟件繪制機械產(chǎn)品裝配圖時必須繪出電動機外形圖，繪制電動機時需查閱機械設(shè)計手冊中的電動機型號，根據(jù)手冊中型號的外形與安裝尺寸進行繪制，但每變換一種電動機型號，需重新繪制其外形圖，導(dǎo)致產(chǎn)品設(shè)計效率大大降低。AutoLISP語言是Autodesk公司為簡化CAD設(shè)計中大量的重復(fù)性工作而開發(fā)的一種程序設(shè)計語言，在計算機輔助設(shè)計中，通過利用AutoLISP語言進行制圖，將程序與圖形結(jié)合，進行輔助設(shè)計，可以為設(shè)計者節(jié)省大量時間，減少許多不必要的重復(fù)性工作[1]。目前AutoLISP語言被廣泛應(yīng)用于機械制圖設(shè)計和建筑設(shè)計等領(lǐng)域，在機械制圖設(shè)計方面的應(yīng)用，如利用autoLISP對拖拉機、蝸桿傳動系統(tǒng)、螺釘繪制、葉片鍛模和減速器等進行參數(shù)化設(shè)計，如對AutoCAD制圖的繪圖命令進行擴展等，也有學(xué)者通過AutoLISP對電動機的內(nèi)部結(jié)構(gòu)進行設(shè)計，但對于特定型號電動機外形圖的成圖程序設(shè)計涉及并不多。本文選用電動機進行成圖程序編程設(shè)計，以期快速準確地繪制出電動機外形圖[2-12]。

本文通過實例對電動機進行編程以實現(xiàn)參數(shù)化繪圖，用戶在運行AutoLISP時，只需按照提示輸入某系列電動機型號、極數(shù)，程序?qū)凑諜C械設(shè)計手冊自動篩選數(shù)據(jù)，并得到相應(yīng)系列電動機外形圖。這不僅提高了工作效率，節(jié)省了工作時間，而且參數(shù)化繪圖對實現(xiàn)機械設(shè)計過程中的快速產(chǎn)品設(shè)計具有極其重要的意義。

1 設(shè)計參數(shù)

本文選取的是Y系列(IP44)三相異步電動機中機座帶地腳、端蓋上無凸緣的電動機，電機型號為Y80～Y315，共有27個型號，其外形圖及安裝尺寸如圖1所示。圖1中標注的外形及安裝尺寸具體數(shù)值(簡稱主要尺寸)在機械設(shè)計手冊(新編軟件版)2008中給出。

在進行參數(shù)化繪圖編程設(shè)計時，除需要知道圖1中的主要尺寸外，還要確定次要尺寸(如圖2所示)，故本文進行參數(shù)化設(shè)計時，次要尺寸的大小需與主要尺寸通過建立數(shù)學(xué)關(guān)系來確定。具體的尺寸關(guān)系如表1、表2所示。

次要尺寸∕mm與主要尺寸的參數(shù)關(guān)系d11.2D次要尺寸∕mm與主要尺寸的參數(shù)關(guān)系l6B∕3+H∕4次要尺寸∕mm與主要尺寸的參數(shù)關(guān)系a0.5Hd21.5Dl7 0.8×(HD-H-0.5AC)b2∕3Hd30.9ACl9(AD-0.5AC)∕2 b24∕3Hd40.8ACr11∕20AC b31∕6Hl10.15Dr2 0.4×(HD-H-0.5AC)b42∕3Hl20.2Dr32r2 b5(0.5AC-H)∕2l30.1ACr40.1AC θ160°l42×(C-l1-l2-l3)+Br51∕4×l8 θ245°l51.3Br61∕6H b1、l8取值因電動機型號的不同而不同

注：為使繪制出的電動機外形圖美觀，b1、l8的取值因電動機型號的不同而不同，b1的取值如表2所示。l8的取值：型號為80M90S90L的電機，l8=AD15；型號為315系列的電機，l8=AD5；其余型號電機，l8=AD8。

2 零件圖的程序?qū)崿F(xiàn)

本文通過AutoLISP語言進行程序編寫時，程序的實現(xiàn)思路如下。①選取電動機的某一型號，根據(jù)機械設(shè)計手冊中該電動機型號的尺寸參數(shù)編寫電動機主視圖、左視圖和斷面圖的程序，測試程序，檢查各個視圖輸出的正確性。②編寫篩選程序，并測試電動機型號與數(shù)據(jù)的對應(yīng)關(guān)系，確保篩選的準確性。③將主視圖、左視圖以及斷面圖程序鑲嵌到篩選程序中，測試整個程序的完整性。④添加菜單程序，并測試系統(tǒng)變量是否合理，能否保證程序的準確輸出。電動機外形圖程序?qū)崿F(xiàn)流程如圖3所示。

根據(jù)程序的實現(xiàn)思路，最終編寫了兩個程序文件，電動機外形圖lisp程序文件(主程序)和菜單menu程序文件。其中電動機外形圖lisp程序文件框圖如圖4所示，通過初始程序模塊、數(shù)據(jù)處理子程序模塊及繪圖子程序模塊實現(xiàn)。其中數(shù)據(jù)處理子程序模塊可通過輸入主要尺寸數(shù)據(jù)及與次要尺寸的關(guān)系，獲取坐標點；繪圖子程序模塊是利用command函數(shù)調(diào)用AutoCAD繪圖命令完成制圖。

表2 b1與主要尺寸之間的參數(shù)關(guān)系

注：315系列包括132S132M160M160L180M180L200L225S225M315S315M315L

3 程序?qū)嵗?/h2>

本實例程序包含兩個程序文件(lisp程序文件zong.lsp和菜單文件menu.mnu)，lisp程序部分代碼如下：

(setq x(getreal“輸入電機號x=”)

y(getreal“輸入電機類型S為1，M為2，L為3 y=”)

z(getreal“輸入電機極數(shù)z=”)

a 0 a2 0 b 0 c 0 d 0 e 0 f 0 g 0 h 0 k 0 ab 0 ac 0 ad 0 hd 0 l 0)

(setq osm(getvar“osmode”))

(setvar“osmode” 0)

(setvar“cmdecho” 0)

(command“ucs”“w”)

(setvar“LWDISPLAY” 1)

(setq p10(getpoint“請輸入基點”))

(cond((=x 80)(cond((=y 2)(setq a 125.0 a2 62.5 b 100.0 c 50.0 d 19.0 e 40.0 f 6.0 g 15.5 h 80.0 k 10.0 ab 165.0 ac 175.0 ad 150.0 hd 175.0 l 290.0))))……))

菜單程序“menu”代碼如下：***menugroup=menu1

***pop1

[電機型號]

[電機型號參數(shù)]*^C(load“dj”)；dj

[保存]^c^csave

[打印]^c^cplot

[取消]^c

將菜單程序和總程序文件復(fù)制、粘貼到AutoCAD目錄下的support文件夾中，在autocad命令行中輸入menuload，加載菜單欄文件即可在菜單欄中出現(xiàn)相應(yīng)的菜單，如圖5所示，此時只需點擊“電機型號參數(shù)”，用戶按照提示輸入?yún)?shù)即可繪制出相應(yīng)型號的3個視圖。

繪制的電動機外形圖參數(shù)提示如下：電機號x；電機類型y；電機極數(shù)z；基點。

圖6是在提示下輸入的外形圖參數(shù)值，得到的型號為Y132M-2型的外形圖如圖7所示。

4 結(jié)論

(1)利用AutoLISP編寫Y系列(IP44)三相異步電動機中機座帶地腳、端蓋上無凸緣的電動機設(shè)計成圖程序，能夠快速將電動機的外形圖繪出，加快了設(shè)計過程，節(jié)省制圖時間，有效提高制圖效率。

(2)添加了菜單程序，不需用戶直接重復(fù)加載AutoLISP程序，只需點擊菜單即可運行程序，方便用戶操作。