freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

數(shù)控課程設(shè)計(jì)--數(shù)控中非圓曲線逼近的算法實(shí)現(xiàn)-文庫(kù)吧資料

2025-01-24 16:00本頁面
  

【正文】 k * X(0)) / (Sqr(k ^ 2 + 1))End IfIf w = v Then (X(1), Y(1)), vbRedElses = s / 2GoTo line1End IfIf zuobiao = 1 Thenp = Format(X(1), )q = Format(Y(1), )If o = 4 Then = amp。 N3 Z amp。 q amp。 p amp。 vbCrLf = amp。 Z30 M03 S amp。 e amp。 d amp。 vbCrLf = amp。 Y amp。 N2 X amp。 n amp。 D01 amp。參 考 文 獻(xiàn)[1] [M].武漢:華中理工大學(xué)出版社,.[2] [M].武漢:湖北科學(xué)技術(shù)出版社,.[3] [M].北京:機(jī)械工業(yè)出版社.[4] [M].重慶:重慶大學(xué)出版社.[5] [M].北京:中國(guó)科學(xué)技術(shù)出版社,1990.[6] 楊林, Basic編程高手[M].北京:北京大學(xué)出版社,2000.[7] 一組專用凸輪的計(jì)算機(jī)輔助設(shè)計(jì)[J].機(jī)械工程師,1998,(4): 5859.[8] 凸輪曲線的快速畫法[J].機(jī)械工程師,1998,(6): 2223.[9] 平面凸輪機(jī)構(gòu)CAD系統(tǒng)的研究與開發(fā)[J].機(jī)械設(shè)計(jì)與制造,2000,(5):1213.[10] 圓柱非圓曲線槽凸輪的數(shù)控加工[J].制造技術(shù)與機(jī)床,2000,(8):34.[11] 圓柱凸輪的參數(shù)化設(shè)計(jì)及數(shù)控加工[J].精密制造及自動(dòng)化,2001,11: 28.[12] 參數(shù)化凸輪輪廓轉(zhuǎn)換及NC代碼自動(dòng)生成[J].機(jī)床與液壓,2001,6, 2931.附錄 VB主要源程序Dim daolu As Integer, daobu As IntegerDim X(5) As Double, Y(5) As DoubleDim qidaox As Single, qidaoy As Single, qidaoz As SingleDim quxian As Integer, pi As Double, zuobiao As Integer ‘定義變量Private Sub Command1_Click() = = End Sub ‘清屏繪圖區(qū)域Private Sub Command2_Click() ‘繪制坐標(biāo)系 = vbSolid = 1 (50, 50)(50, 50) (50, 0)(50, 0) (48, 2) (50, 0)(48, 2) X (0, 50)(0, 50) (2, 48) (0, 50)(2, 48) Y = 2 = 2 Opi = = a = 0If quxian = 1 Thena = Val()b = Val()For i = 0 To 2 * pi Step ‘點(diǎn)命令繪制非圓曲線原圖 (a * Cos(i), b * Sin(i))NextEnd IfIf quxian = 2 Thena = Val()For i = 0 To 2 * pi Step (a * Cos(i) ^ 3, a * Sin(i) ^ 3)NextEnd IfEnd SubPrivate Sub Command3_Click() ‘等間距直線逼近s = pi = o = 4a = Val() ‘輸入加工參數(shù)b = Val()v = Val()n = Val()F = Val()r = Val()qidaox = Val()qidaoy = Val()qidaoz = Val()d = Val() = vbDash = 1If quxian = 1 Then ‘畫橢圓If daolu = 1 Then ‘順時(shí)針走刀方向If daobu = 1 Then e = 1a = a + rb = b + rEnd IfIf daobu = 2 Thene = 2a = a rb = b rEnd IfX(0) = aY(0) = 0 (qidaox, qidaoy), vbRed (X(0), Y(0)), vbRed = vbSolid (X(0), Y(0)), vbRedp = Format(X(0), )q = Format(Y(0), )If zuobiao = 1 Then = N1 G90 G17 G00 G4 amp。有了等間距直線逼近的成功基礎(chǔ),在做等誤差算法直線逼近的時(shí)候,只需理解好等誤差數(shù)學(xué)計(jì)算的方法即可完成逼近,也通過比較,等誤差法確實(shí)比等間距法所走的步數(shù)少一倍以上,符合了我們之前的設(shè)想。一開始我們使用橢圓和星形線的參數(shù)方程進(jìn)行數(shù)學(xué)處理,實(shí)現(xiàn)過程很容易,而且不用分每一個(gè)象限去討論,但是又遇到了另一個(gè)問題,使用參數(shù)方程計(jì)算出來的逼近誤差太大了,遠(yuǎn)大于日常所要求的加工誤差,所以還是以失敗告終。課堂上老師講直線逼近非圓曲線的數(shù)學(xué)處理時(shí)大概講了三種的方法:等間距、等弦長(zhǎng)和等誤差,在我們理解了三種方法之后,確定使用等間距為初步算法,等誤差為優(yōu)化算法,因?yàn)榈乳g距計(jì)算簡(jiǎn)單,但程序過多,而等誤差計(jì)算復(fù)雜,但程序和節(jié)點(diǎn)數(shù)都相對(duì)少。5 總結(jié)這次的課程設(shè)計(jì),在剛開始做之前,我們組的每個(gè)人都感到了壓力,因?yàn)楫吘惯@次是要利用VB或VC編程語言結(jié)合數(shù)控技術(shù)課程內(nèi)容來完成課程設(shè)計(jì),而且時(shí)間也并不充足。 圖10 等誤差逼近的刀具軌跡 圖11 等誤差逼近的NC代碼 運(yùn)行分析從以上運(yùn)行結(jié)果可以看出,非圓曲線的等間距直線逼近算法雖然簡(jiǎn)單,但逼近處理后的直線段較多,從經(jīng)濟(jì)效益上講,此方法較差。 圖7 加工參數(shù)的選擇與輸入單擊“繪原圖” 、“等間距逼近”按鈕,運(yùn)行結(jié)果的刀具軌跡如圖8所示,等間距逼近所用的線段數(shù)為5920,生成的NC代碼如圖9所示。通過
點(diǎn)擊復(fù)制文檔內(nèi)容
教學(xué)教案相關(guān)推薦
文庫(kù)吧 www.dybbs8.com
備案圖鄂ICP備17016276號(hào)-1