【正文】 插補(bǔ)過程如表2 所示。 （4）終點判別 判別是否到達(dá)終點，若已到達(dá)終點，則停止插補(bǔ)，若未到終點，則重復(fù)上述過程。實現(xiàn)數(shù)字積分插補(bǔ)計算的裝置稱為數(shù)字積分器，或數(shù)字微分器(Digital Differential Analyzer, DDA)，數(shù)字積分器可以用軟件來實現(xiàn)。使用這種插補(bǔ)法的數(shù)控系統(tǒng)，其位置伺服通過計算機(jī)及其測量裝置構(gòu)成閉環(huán)，插補(bǔ)輸出的結(jié)果不是脈沖，而是數(shù)據(jù)。 (2)便于干預(yù)加工過程。日本豐橋科技大學(xué)與北海道大學(xué)等于1987年研制了具有曲面實時加工功能的三坐標(biāo)曲面加工系統(tǒng)。由于插補(bǔ)的速度直接影響到數(shù)控系統(tǒng)的速度，而插補(bǔ)的精度又直接影響整個數(shù)控系統(tǒng)的精度，因此，人們一直在努力探求一種計算速度快并且精度又高的插補(bǔ)方法。本文首先介紹了拋物線的兩種插補(bǔ)算法，然后基于vb語言設(shè)計了一個拋物線的插補(bǔ)軟件，可用于教學(xué)仿真實驗。插補(bǔ)是整個數(shù)控系統(tǒng)控制軟件的核心，它所對應(yīng)的算法即為插補(bǔ)算法，插補(bǔ)技術(shù)的好壞直接影響著數(shù)控加工技術(shù)的優(yōu)劣，是目前數(shù)控急需提高和完善的環(huán)節(jié)之一。4)多軸聯(lián)動系統(tǒng)的插補(bǔ)算法 多軸聯(lián)動數(shù)控系統(tǒng)以成為數(shù)控技術(shù)發(fā)展的潮流，多軸控制可達(dá)到使同一臺系統(tǒng)對成套機(jī)群進(jìn)行控制的目的。 插補(bǔ)運(yùn)算是CNC系統(tǒng)中生成加工軌跡的基本子程序。在CNC系統(tǒng)中，插補(bǔ)工作一般采用軟件來完成。這樣就能得出一個非常接近規(guī)定圖形的軌跡，最大偏差不超過一個脈沖當(dāng)量。若 Pi點在拋物線上則下式成立：圖3 第一象限拋物線進(jìn)給原則選擇偏差函數(shù) Fi為根據(jù)動點所在區(qū)域的不同， 有三種情況： Fi＞0，動點在拋物線的上方；Fi=0，動點在拋物線上；Fi＜0，動點在拋物線的下方。CNC系統(tǒng)更易于實現(xiàn)。參考文獻(xiàn)【1】【2】【3】游有棚，王氓，(10):943一947【4】(3)【5】【6】Bedi5andQUanN，Industry，1992:307一313【7】【8】【9】周凱，【10】周艷紅，.1997【11】周凱，【12】Golden E ～80.【13】KorenYoran， Surface of P379【14】韓權(quán)利，[J].機(jī)械設(shè)計與制造工程，【15】].北京:清華大學(xué)出版社，2002【16】，J，Thedevel0Plllentofafieldbus一asedopen一CNCsystem，The1lltemationalJoumalof【17】龔仲華，【18】周云飛，李國其，周濟(jì)，(SDI)，4(2)【19】汪勁松，【20】王忠華，汪勁松，.(10)【21】鈴木裕，山崎和雄。圖4 拋物線插補(bǔ)軌跡表1 拋物線插補(bǔ)計算過程表序號偏差判別坐標(biāo)進(jìn)給計算終點判別1F0=0+XF1==X1=1,Y1=0Σ=121=112F1=0+YF2=F1+1=+1=X2=1,Y2=1Σ=111=103F2=0+XF3===1X3=2,Y3=1Σ=101=94F3=100+YF4=F3+1=1+1=0X4=2,Y4=2Σ=91=85F4=0+XF5===X5=3,Y5=2Σ=81=76F5=0+YF6=F5+1=+1=X6=3,Y6=3Σ=71=67F6=0+YF7=F6+1=+1=X7=3,Y7=4Σ=61=58F7=0+YF8=F7+1=+1=X7=3,Y7=5Σ=51=49F8=0+XF9===3X9=1,Y9=5Σ=41=310F9=30+YF10=F9+1=3+1=2X10=4,Y10=6Σ=31=211F10=20+YF11=F10+1=2+1=1X11=4,Y11=7Σ=21=112F11=10+YF12=F11+1=1+1=0X12=4,Y12=8Σ=11=04用Visual Basic實現(xiàn)拋物線逐點比較法插補(bǔ)拋物線逐點比較法插補(bǔ)流程圖如下：開始 輸入起點終點及數(shù)據(jù)的初始化NYF=0?向y方向進(jìn)給一步向x方向進(jìn)給一步進(jìn)給仿真處理NSingna=0？Singna=singna1Y拋物線插補(bǔ)逐點比較法仿真結(jié)束 Dim xe As Integer Dim x0 As Integer Dim k As Integer Dim singna As Integer Dim F As Integer Dim xi As Integer Dim yi As Integer Dim a As Integersingna = (xe x0) / k + (ye y0) / kF = 0xi = x0yi = y0DoIf (F = 0) ThenLine (xi, yi)(xi + k, yi)F = F