久久久国产一区二区_国产精品av电影_日韩精品中文字幕一区二区三区_精品一区二区三区免费毛片爱

機械社區(qū)

標(biāo)題: 高速鋼粗皮銑刀磨齒專機程序(未驗證,僅供參考)編程語法如有錯誤,實屬抱歉 [打印本頁]

作者: wf2017    時間: 2018-1-8 14:22
標(biāo)題: 高速鋼粗皮銑刀磨齒專機程序(未驗證,僅供參考)編程語法如有錯誤,實屬抱歉
高速鋼粗皮銑刀磨齒專機程序(未驗證,較簡易,僅提供工藝步驟,及原理供各位大俠參考)
6 Y$ O5 B0 F" B5 q9 F: Z說明:這套磨齒程序為高速鋼粗皮銑刀加工使用,原機器是20年前的老機器,& z% t( M. {( N) n. i
使用法蘭克系統(tǒng),具備雷尼紹探頭,4 k! [+ d0 a8 G: p2 o& S1 L
可測量刀具起始長度位置X向,刀齒位置A軸角度方向(已開槽的高速鋼銑刀半成品毛坯料)
7 I! \4 W2 B5 q6 F因此機床系統(tǒng)老舊,經(jīng)常故障,且維修備件難以尋找,工廠僅此一臺機器可用,所以決定業(yè)余時間摸清楚加工工藝,再設(shè)計一臺機器替換它,1 a% X% C6 M6 Z" D  q: n8 P
使用新代或者西門子4軸數(shù)控系統(tǒng)(X,Y,Z,A),增加左旋刀具的磨齒功能,所以就編寫了如下程序。
6 V$ B3 y; y$ D1 r0 f1 i7 j
L011(測量子程序,左右旋刀具)
L012(一齒磨削子程序,左右旋刀具)
MAIN01(磨削主程序,左右旋刀具)
L013(修整砂輪程序)(R圓弧砂輪修整,兩軸插補,較簡單,未編寫,注意必須機內(nèi)修整)
后來因老板縮減開支,舊機器用用修修可勉強支撐,就不愿投資此項目,沒有機會驗證程序的使用效果。
工程圖截屏舉例以4刃銑刀為例,齒距4mm(實際很少有這種,純粹為方便畫圖)
/ j( Y3 T" p9 c! Q本來想G代碼發(fā)文檔貼上了,為避免各位下載要積分,直接貼在帖子里了。各位復(fù)制保存就好。
L011(測量子程序,左右旋刀具)
N0010  MSG(“刀齒長度及A軸角度測量”)
N0020  G90 G94 G00 Y(R110)Z(R111);測頭中心對準(zhǔn)棒料中心
N0030  MWAS=1 G91 G01 X-(R118) F500;測頭在X方向搜索距離內(nèi)探測棒料
N0040  IF $AC_MEA[0]==0 GOTOF MEASERR;測量失敗,減少探測搜索距離
N0050  R150=$AA_MW[X];記錄碰撞當(dāng)前X絕對坐標(biāo)值,賦值到R150中
N0051 IF R155=1 GOTOF N0170;測量X,對準(zhǔn)X和Y坐標(biāo)位置
N0060  G91 G01 X2 F500;測頭脫離棒料
N0070  Z(R119/2-0.5);測頭抬高溝槽內(nèi)部0.5mm處,準(zhǔn)備測齒位置
N0080  X-(2+R154);測頭進入溝槽內(nèi)部1mm處,準(zhǔn)備測齒位置
N0081  IF R159=0 GOTOB N0090;跳轉(zhuǎn)右旋測齒
N0082  IF R159=1 GOTOB N0142;跳轉(zhuǎn)左旋測齒
N0090  MWAS=1 G91 G01 A-(360/R103)F500;測頭在A方向搜索距離內(nèi)找齒
N0100  IF $AC_MEA[0]==0 GOTOF MEASERR;測量失敗,檢查測頭是否進入溝槽
N0110  R151=$AA_MW[A];記錄碰撞當(dāng)前A絕對坐標(biāo)值,賦值到R151中
N0120 G91 GO1 A5 F500;測頭脫離溝槽A向5°(右旋刀具)
N0130 Z5;測頭脫離溝槽Z向抬高5mm
N0140 A(R153-5);刀齒回測頭接觸角度,偏移R153到磨削所需角度,A對準(zhǔn)
N0141 GOTOB N0150;跳過左旋測齒程序
N0142 MWAS=1 G91 G01 A(360/R103)F500;測頭在A方向搜索距離內(nèi)找齒
N0143  R151=$AA_MW[A];記錄碰撞當(dāng)前A絕對坐標(biāo)值,賦值到R151中
N0144 G91 GO1 A-5 F500;測頭脫離溝槽A向-5°(左旋刀具)
N0145 Z5;測頭脫離溝槽Z向抬高5mm
N0145 A(R153+5);刀齒回測頭接觸角度,偏移R153到磨削所需角度,A對準(zhǔn)
N0150 G90 G00 Y(R112);刀具中心線運行到砂輪正下方,Y對準(zhǔn)
N0160 G91 G01 X(2+R154+R152);棒料前端運行到砂輪下方,X對準(zhǔn)
N0170 G90 G00 X(R150+R152)Y(R112);棒料運行到砂輪下方,X,Y對準(zhǔn)
N0171 G90 G00 Z(R108);Z軸起始位置,方便上下料,測量及對刀結(jié)束
N0180 M02測量程序結(jié)束
N0190 MEASERR:MSG("測量失敗!探針未在有效距離內(nèi)觸發(fā)!")
1 V8 ~2 r6 m% c
L012(一齒磨削子程序,左右旋刀具)
N001  MSG(“單個磨齒程序”)
N002  R156=(360×R104×TanR099)/(3.14×R119×R103);A螺旋角補償角
N010  G91 G01 Z(-R100)F300;Z軸運行到磨削起始位置
N011 IF R159=0 GOTOB N0020;跳轉(zhuǎn)右旋磨齒
N012 IF R159=1 GOTOB N0052;跳轉(zhuǎn)左旋磨齒
N020  Z(-R101)  A-(R102) F200;右旋刀具磨齒
N030  Z(R101+R100+R158)F500;磨完1齒,抬起Z軸,R158補償下一齒高低
N040  A-(360/R103-R102+R156)F500;A軸負向分度運行到下一齒起始位置
N050  X-(R104/R103)F300;X軸負向進刀距離,錯開磨削下一個齒
N051 GOTOB N060;跳過左旋磨齒程序,直接結(jié)束
N052  Z(-R101)  A(R102) F200;左旋刀具磨齒
N053  Z(R101+R100+R158)F500;磨完1齒,抬起Z軸,R158補償下一齒高低
N054  A(360/R103-R102+R156)F500;A軸正向分度運行到下一齒起始位置
N055  X-(R104/R103)F300;X軸負向進刀距離,錯開磨削下一個齒
N060  M02;一齒磨削完成,下一齒磨削位置對準(zhǔn)
9 x% v9 C& N: x  m  _2 f5 W
MAIN01(磨削主程序,左右旋刀具)
N010  G90 G94 G01 X(R106)Y(R107)Z(R108)F600;快進到換料位置
N011  IF R114=0 GOTOF N014;不需要重新測量,直接磨削
N012  IF R114=1 GOTOF N013;需要重新測量,才能磨削,重新賦值
N013  L011;調(diào)用測量程序,找到刀齒X,A位置,擺正對齊
N014  G90 G00 X(R150+R152)Y(R112);根據(jù)上次賦值棒料X,Y對準(zhǔn)
N015  A(R151+R153);根據(jù)上次探測賦值,擺正A軸對準(zhǔn)
N021  M7 M13;磨頭啟動,冷卻啟動
N022  R109=1;磨齒開始計數(shù)
N030  L012;調(diào)用一齒磨削子程序
N040  R109=R109+1;磨齒計數(shù)加一,
N041  MSG(“已磨削齒數(shù)R109”)
N050  IF R109<R105/(R104/R103) GOTOB N030;齒數(shù)不到,繼續(xù)
N051  M15 M9;磨頭停止,冷卻停止
N060  G90 G01 G00 Z(R108)F600;磨削完成,先退Z軸
N070  Y(R107)F600;磨削完成,退Y軸
N080  X(R106)F600;磨削完成,退X軸
N090  M2;程序結(jié)束
L012(測量子程序,左旋刀具)
N0010  MSG(“刀齒長度及A軸角度測量”)
N0020  G90 G94 G00 Y(R110)Z(R111);測頭中心對準(zhǔn)棒料中心,
N0030  MWAS=1 G91 G01 X-(R118) F500;測頭在X方向搜索距離內(nèi)探測棒料
N0040  IF $AC_MEA[0]==0 GOTOF MEASERR;測量失敗,減少探測搜索距離
N0050  R150=$AA_MW[X];記錄碰撞當(dāng)前X絕對坐標(biāo)值,賦值到R150中
N0051 IF R155=1 GOTOF N0170;測量X,對準(zhǔn)X和Y坐標(biāo)位置
N0060  G91 G01 X2 F500;測頭脫離棒料
N0070  Z(R119/2-0.5);測頭抬高溝槽內(nèi)部0.5mm處,準(zhǔn)備測齒位置
N0080  X-(2+R154);測頭進入溝槽內(nèi)部1mm處,準(zhǔn)備測齒位置
N0090  MWAS=1 G91 G01 A-(360/R103)F500;測頭在A方向搜索距離內(nèi)找齒
N0100  IF $AC_MEA[0]==0 GOTOF MEASERR;測量失敗,檢查測頭是否進入溝槽
N0110  R151=$AA_MW[A];記錄碰撞當(dāng)前A絕對坐標(biāo)值,賦值到R151中
N0120 G91 GO1 A5 F500;測頭脫離溝槽A向5°
N0130 Z5;測頭脫離溝槽Z向抬高5mm
N0140 A(R153-5);刀齒回測頭接觸角度,偏移R153到磨削所需角度,A對準(zhǔn)
N0150 G90 G00 Y(R112);刀具中心線運行到砂輪正下方,Y對準(zhǔn)
N0160 G91 G01 X(2+R154+R152);棒料前端運行到砂輪下方,X對準(zhǔn)
N0170 G90 G00 X(R150+R152)Y(R112);棒料運行到砂輪下方,X,Y對準(zhǔn)
N0171 G90 G00 Z(R108);Z軸起始位置,方便上下料,測量及對刀結(jié)束
N0180 M02測量程序結(jié)束
N0190 MEASERR:MSG("測量失敗!探針未在有效距離內(nèi)觸發(fā)!")

3 x8 v' ]8 o  E0 D8 B( R
# w! S- A, a* ^9 k9 C
1 C/ c0 A) H" D1 R  f
  ]" L& E% i$ ~9 F$ v
" c% g9 D* A8 Y3 I- X補充內(nèi)容 (2018-1-9 08:00):
& z  O# H- P9 o& K* P5 n加工分布步驟:! z! z3 U* i1 k5 C# i1 C' `' M
1判斷左旋刀右旋刀4 u- }0 O. }  U$ x( G# V
2測量刀具長度位置,測量刀具刀齒位置7 E% X- }3 @2 L# y. L, n
3磨削加工波浪齒型
作者: 只有快樂    時間: 2018-1-8 16:47
佩服的五體投地
作者: wf2017    時間: 2018-1-8 18:04
只有快樂 發(fā)表于 2018-1-8 16:47% y, s% O1 v  D6 y! f, ^, B7 i
佩服的五體投地

3 s/ w1 A8 Z1 p: J' v大俠不要太夸張~~~
* e) s3 i# }( n$ _2 d
作者: xiaobing86203    時間: 2018-1-8 18:34
樓主如能親自搞定這樣程序也算是厲害了
作者: 狙擊手    時間: 2018-1-8 18:43
好像不是完整的磨削程序,是程序過程表。" J# H9 \& z& x4 T
確實是有心人。贊一個!
作者: 韓寒11    時間: 2018-1-8 20:45
樓主這宏程序編得有一套,費了不少心思吧
作者: wf2017    時間: 2018-1-9 07:53
xiaobing86203 發(fā)表于 2018-1-8 18:34
7 I* t# V& p% r  ~樓主如能親自搞定這樣程序也算是厲害了

, g  a5 h$ `: o呵呵,以后有機會再驗證效果
2 _, g6 \- z( }( B) M
作者: wf2017    時間: 2018-1-9 07:55
狙擊手 發(fā)表于 2018-1-8 18:43. \/ a0 u7 C, e* s7 Y
好像不是完整的磨削程序,是程序過程表。3 K$ }4 k" g2 [; [% l
確實是有心人。贊一個!

) l6 t6 a1 s1 P! [0 H  ?  o是的,主要是加工的動作過程,機器沒有做出來,所以一些進給速度,轉(zhuǎn)速等信息沒有完善。
' }2 _4 N, A5 E- K8 f% n
* Y3 L/ ^% ?8 A: s9 t
- a2 k/ {3 [" H; Y8 N6 q
作者: wf2017    時間: 2018-1-9 07:56
韓寒11 發(fā)表于 2018-1-8 20:45
! R$ ]6 K6 B% s& `% o$ _樓主這宏程序編得有一套,費了不少心思吧

; o( @, a% a$ \2 R+ h7 [: y) h+ ?花了一兩天時間,對著西門子編程手冊邊想邊改~~~2 c- F7 Q" C) T/ T0 l7 c4 `





歡迎光臨 機械社區(qū) (http://www.ytsybjq.com/) Powered by Discuz! X3.5