作者:齐重数控 杜宏祺 王英瑞 迟毅
S<^*jheO5 51.! S 在2002年我厂为某公司改造一台立式车床,该机床为双刀架控制,应用户要求将该机床右刀架改造为磨削刀架。由于802D系统主要应用在车削控制,因此在改造中主要难点是如何利用R参数实现磨削循环的加工程序编制。
R03V+t= {E!"^^0` 机床改造后可以通过电磨头对工件进行回转支承任意表面、内、外圆锥面、圆柱面等进行加工。由于砂轮在磨削过程中不断磨损,因此需要在磨削过程中对砂轮进行砂轮修整。砂轮修整基本上是通过金钢笔、砂轮修整器对砂轮进行手动修整,在砂轮修整完毕后,可直接进行工件的磨削加工而不需要进行再次对刀。
1g`$[wp| YpQ/ )fSEV 工件的磨削加工流程
_2{i}L zRyZrt,%& 工件的磨削加工流程图如图1:
2YvhzL[um
6hKavzSi 图1 工件的磨削加工流程图
iN%\wkx*N V^Wo%e7#u[ 用户参数说明
1G/bqIMg63 Qxj &IX R1:砂轮最小直径
uiq)?XUKv R2:砂轮最大直径
k,0RpE R3:砂轮直径
xM85^B' R4:砂轮宽度
7NG^X"N{Ul R5:速度下限
^T\JFzV R6:线速度上限
*LJN2; R7:线速度
(n7v $A R8:砂轮转速
GCul6,w R9:砂轮圆弧半径
T1m097 R10:金刚笔半径
eN]0]9JO R11:金刚笔与花盘圆心距离
1fRYXqx R12:金刚笔高度
` +]9+:tS R13:垫块高度
k!E`Xeob R14:磨架角度
TL@_m^SM R15:停顿时间
`WF?87l1 w2y{3O"p= R18:X轴精磨尺寸
jM1|+o*Wr R19:Z轴精磨尺寸
7V?]Qif~ R20:X轴起始尺寸
Ni IX^&N1 R21:Z轴起始尺寸
G`E%uyjG$j R22:精磨每次进刀量
N3E Qq~lX R23:精磨进给率
mJb>)bOl R24:精磨砂轮修整计数器
-Zfzl`r R25:精磨余量
5}gcJjz #9z\Wblr R28:粗磨每次进刀量
UMUr"-l = R29:粗磨进给率
2vWJ|&|p R30:粗磨砂轮修整计数器
}S'+Ytea m<005_Z0Q R32:光磨次数
1vQf=t%lw R33:光磨进给率
pc}Q_~e e$QX?y . R36:砂轮修整量
X
tZ0z? R37:砂轮修整每次进给量
Bn*D<<{T R38:砂轮修整进给率
P7d" E R39:砂轮修整用安全让刀
dUeM+(s1 +g ovnx R42:安全让刀量
LoUi Yf R43:安全让刀每次进给量
esmQ\QQ^1 R44:安全让刀进给率
Y~RPspHW H?ssV^k R46:中间点X轴坐标
MdT'xYomzQ R47:中间点Z轴坐标
uc~PKU?tO N8:?Z#z R50:单次磨削量
mzTF2K
R51:进给率
P:t|'t R52:起始点
f33'2PYl R53:终点
(.7_`T6QG R54:当前位置
u*`acmS>N ],R rk]1 R56:砂轮修磨量
Jis{k$4 R57:砂轮每次修磨量
Rj9ME,u R58:返回位置
=UA-&x@ /ow/)\/} R60:当前砂轮位置
F6Z l#eL R61:修砂轮用计数器
V|
z|H$- R62:错误标志
^sd+s ~xx N8}R<3/ 磨削加工程序
-QCo]:cp g*\u8fpRq 磨削加工程序如下:
vp &jSfQ^ s0v?*GRX N10 G90 G94 G18
Qpiv,n N20 R62=0 ;错误标志
ov zIJbf N30 L1 ;线速度计算
sIdo(`8$ N40 IF R62<>0 GOTOF BB4
r|cl6s!P N50 R58=R20 ;修砂轮准备
j2deb`GD N70 R51=R38 ;进给率
WaF<qhu* N80 L30 ;砂轮修整
MX6*waQ-< N90 R50=R43 ;安全让刀每次进给量
ukv
_bw N100 R51=R44 ;进给率
No<2+E! N110 R53=R20
4JFi|oK0H N120 L20 ;安全让刀子程
|f'U_nE#R/ N130 R60=R20 ;起始点
W&}YMb N140 R61=R30 ;砂轮修整计数器初值
i68'|4o N150 R50=R28 ;粗磨每次进刀量
6G7B&"& N160 R51=R29 ;进给率
A,e/y N170 IF R60>=R18+R25 GOTOF AA1 ;
mN@)b+~(S N180 R62=10
r0l ud&_9 N190 MSG(“错误10:错磨参数错误”)
hE-`N,i} N200 GOTOF BB4
#*,Jqr2f N210 AA1:IF R60N220 L10 ;磨削子程序
l@4hBq N230 R60=R60-R28 ;修改档前位置
S20x N240 R61=R61-1
qqQnL[`)C N250 IF R61>0 GOTOB AA1
Fp+^`;j N260 R58=R60
Bo.x N270 L30 ;砂轮修整
\`jFy[(Pa' N280 R50=R43
lZV]Z3=p'0 N290 R51=R44
6Z
~>d;&9 N300 R53=R60
!V$nU8p| N310 L20 ;安全让刀
jii2gtu'U N320 R61=R30
*ZyIbT N330 GOTOB AA1
{o+aEMhM N340 AA2:R50=R60-R18+R25
_s (0P* N350 L10 ;最后一次粗磨
9c9-1iS N360 R60=R18+R25 ;粗磨结束位置
>},O_qx N370 AA3:R58=R18+R25
T,Cq;|g5E N380 L30 ;砂轮修整
U }MU>kzb N390 R50=R43
+`u]LOAyP= N400 R51=R44
468LVe?0 N410 R53=R60
'IFbD["r N420 L20 ;安全让刀
U# Y?'3 : N430 R61=R24
{z|0Y&>[= N440 R60=R18+R25
39S}/S) N450 R50=R22
%MU<S9k N460 R51=R23
KCq qwGM N470 IF R60>=R18 GOTOF BB1
5*[zIKdt2 N480 MSG(“错误11:精磨参数错误”)
l Vo](#W N490 R62=11
1Ls@| N500 GOTOF BB4
)9##mUt'} N510 BB1:IF R60=R18 GOTOF BB3
Vm_y,;/(-R N520 IF R60 N530 L10 ;磨削子程序
M3K+;-n^ N540 R60=R60-R22
E0\ ' N550 R61=R61-1
ss T o?WL| N560 IF R61>0 GOTOB BB1
[ hm/B`t*e N570 R58=R60
x^8x z5:O N580 L30 ;砂轮修整
Hlp!6\gukp N590 R50=R43
eT[,k[#q N600 R51=R44
s!nFc{ N610 R53=R60
:m_0WT N620 L20 ;安全让刀
,[,+ _A N630 R61=R24 ;精磨砂抡修整计数器
J*U,kyYF N640 GOTOB BB1
3%{XJV N650 R50=R60-R18
YNn,{Xi N660 L10 ;最后一次精磨
SEr\ u# N670 BB3:R60=R18 ;
jkQv cU N680 R50=0 ;步进刀
Au#(guvm N690 R51=R33
jbpnCUzi N700 L10 P=R32;光磨
8II-'%S6q N710 G0 X=R20 Z=R21
DGO_fR5L N720 M5 ;停止主轴
g}{Rk>k N730 BB4:M2
,(N&% 3T# zxu L1 ;砂轮速度计算子程序
Bqv Oi~l N10 R8=R7/R3
Lx8^V7X N20 R8=R8/3.14
uKo)iB6D N30 IF R8N40 MSG(“ 错误01:转速过高” )
r&A#h;EQX2 N50 R62=1
=y,_FFoS N60 GOTOF LSA2
Jh{(xGA N70 LSA1:IF R8>R5 GOTOF LSA2
=\J^_g4-l N80 MSG(“ 错误01:转速过低”)
1{_tV^3@ N90 R62=2
aN).G1 N100 LSA2:RET
9Wb9g/L @NlnZfMu L20 ;安全余量磨削子程序
[Rs5hO N10 R52=R53+R50
yb*SD! N20 R54=R52
hx+a.N N30 IF R54>=R53 GOTOF SLA1
bnWIB+%_ N40 R62=3 ;错误码
.r[DqC N50 GOTOF SLA3
?q7VB N60 SLA1:IF R54=R53 GOTOF SLA3
c;Hf +n N70 IF R54N80 L10
*^=`HE89S N90 R54=R54-R50
*hF5cM[ N100 GOROB SLA1
ORs<<H.d N110 SLA2:R50=R54-R53
/_xwHiA N120 L10
{ogGi/8 N130 R54=R53
>sm<
< gVb N140 SLA3:RET
0+P_z(93? ]Q-ON&/ L30 ;砂轮修整子程序
~4=4Ks0 N10 G0 X=R46 Z=R47;中间点(安
|bi"J;y 全位置 )
w)&] k#r N20 R56=R39+R36
Up`$U~%- N30 R57=R37
"6Nma)8 N40 R80=R11-R3-R56
H_ .@{8I N50 G0 X=R80 Z=R12
zY(w`Hm2 N60 IF R56>=0 GOTOF LB1
_;yp^^S N70 MSG(“ 错误04:砂轮参数错误”)
&~6Z)} N80 R62=4
NlU:e}zGR N90 GOTOF LB3
``1#^ ` N100 LB1:IF R56=0 GOTOF LB3
-/~^S] N110 IF R56N120 L3
qe"5&