作者:齐重数控 杜宏祺 王英瑞 迟毅
rCsC}2O [P0c,97_
H 在2002年我厂为某公司改造一台立式车床,该机床为双刀架控制,应用户要求将该机床右刀架改造为磨削刀架。由于802D系统主要应用在车削控制,因此在改造中主要难点是如何利用R参数实现磨削循环的加工程序编制。
Y^C(<N$ EQk omjv 机床改造后可以通过电磨头对工件进行回转支承任意表面、内、外圆锥面、圆柱面等进行加工。由于砂轮在磨削过程中不断磨损,因此需要在磨削过程中对砂轮进行砂轮修整。砂轮修整基本上是通过金钢笔、砂轮修整器对砂轮进行手动修整,在砂轮修整完毕后,可直接进行工件的磨削加工而不需要进行再次对刀。
}_-tJ. 6)W8H X~+ 工件的磨削加工流程
>rSCf= ,% 'r:@' 工件的磨削加工流程图如图1:
Z[l+{
{<a)+S.6U 图1 工件的磨削加工流程图
Z15=vsV &y7=tEV 用户参数说明
!I\eIV>0b Pa#Jwo R1:砂轮最小直径
i3KAJ@ R2:砂轮最大直径
_/"e'@z R3:砂轮直径
\So)g)K R4:砂轮宽度
e>6W ^ ) R5:速度下限
E{QjmlXQ< R6:线速度上限
v~W;&{ R7:线速度
d>T8V(Bb R8:砂轮转速
!)CY\c4}d> R9:砂轮圆弧半径
tk:nth R10:金刚笔半径
MxUQ F?@6 R11:金刚笔与花盘圆心距离
M,yxPHlN R12:金刚笔高度
=v!Z8zk=W R13:垫块高度
XD?]+ R14:磨架角度
3 ]@wa!` R15:停顿时间
DZLEx{cm mey -Bn R18:X轴精磨尺寸
I 9?X R19:Z轴精磨尺寸
osmCwM4O R20:X轴起始尺寸
1HqN`])l/j R21:Z轴起始尺寸
~IPATG R22:精磨每次进刀量
@[`]w`9Q7 R23:精磨进给率
^|vP").aQm R24:精磨砂轮修整计数器
2P${5WT R25:精磨余量
pIug$Ke_% lp5'-Jo R28:粗磨每次进刀量
X+HPdrT R29:粗磨进给率
F&^&"(H} R30:粗磨砂轮修整计数器
qF-Fc q U#sv.r/L}3 R32:光磨次数
(Rp5g}b R33:光磨进给率
p2fzbBt {zc*yV\ R36:砂轮修整量
x9t% R37:砂轮修整每次进给量
S$P=;#r R38:砂轮修整进给率
x_/l,4_ R39:砂轮修整用安全让刀
qlg.\H:W~ jeO`45O R42:安全让刀量
O*N:.|dUw R43:安全让刀每次进给量
EM1HwapD R44:安全让刀进给率
w@YPG{"j #,FXc~ V R46:中间点X轴坐标
33a}M;vx R47:中间点Z轴坐标
a*_&[ qI
tbY% R50:单次磨削量
n$h+_xN R51:进给率
m]'+Eye ]r R52:起始点
Lm.N
{NV' R53:终点
`#r/L@QI R54:当前位置
$]W*;MTI} "jq6FT)O R56:砂轮修磨量
>* F#ZZv}p R57:砂轮每次修磨量
^vzXT>t-M R58:返回位置
.<YfnW5/K -]YsiE?r R60:当前砂轮位置
Q84XmXm| R61:修砂轮用计数器
9KT85t1# R62:错误标志
. S;o#Zw*R ^)$T` 磨削加工程序
R!\._m?\h z,@R jaX 磨削加工程序如下:
.lI.I EpCNp FQT< N10 G90 G94 G18
hh.`Yu L N20 R62=0 ;错误标志
bGwj` lue N30 L1 ;线速度计算
X3XTB* N40 IF R62<>0 GOTOF BB4
5-'Z.[ImB? N50 R58=R20 ;修砂轮准备
8{7'w|/;.{ N70 R51=R38 ;进给率
Fa </ N80 L30 ;砂轮修整
5g'aNkF6> N90 R50=R43 ;安全让刀每次进给量
hu}uc&N)iE N100 R51=R44 ;进给率
y.gNjc N110 R53=R20
Ly1t'{"7 N120 L20 ;安全让刀子程
5l(@p7_+ N130 R60=R20 ;起始点
|="Y3}a N140 R61=R30 ;砂轮修整计数器初值
})q8{Qj! N150 R50=R28 ;粗磨每次进刀量
9`@}KnvB? N160 R51=R29 ;进给率
&4M,)Q ( N170 IF R60>=R18+R25 GOTOF AA1 ;
`Cy;/95m N180 R62=10
|h((SreO N190 MSG(“错误10:错磨参数错误”)
EU Oa8Z N200 GOTOF BB4
MQy,[y7I N210 AA1:IF R60N220 L10 ;磨削子程序
wLg@BSC. N230 R60=R60-R28 ;修改档前位置
SpEu>9g& N240 R61=R61-1
THy N250 IF R61>0 GOTOB AA1
[?]p I N260 R58=R60
+<f+kh2L
N270 L30 ;砂轮修整
3XUsw1,[ N280 R50=R43
N~(?g7 N290 R51=R44
/$FpceB!W N300 R53=R60
; H]]H! N310 L20 ;安全让刀
5fp&!HnG N320 R61=R30
<){J|O N330 GOTOB AA1
=trLL+vGw' N340 AA2:R50=R60-R18+R25
#,!/Cnqis N350 L10 ;最后一次粗磨
!;Ctz'wz N360 R60=R18+R25 ;粗磨结束位置
@ "CP@^ N370 AA3:R58=R18+R25
=RlAOgJ N380 L30 ;砂轮修整
lXnv(3j3*s N390 R50=R43
_w%{yF6 N400 R51=R44
"`[4(j N410 R53=R60
Z22#lF\ N N420 L20 ;安全让刀
C3K")BO! N430 R61=R24
"""eU," N440 R60=R18+R25
8Urj;KkD N450 R50=R22
%6:"tuA N460 R51=R23
`mN5s q N470 IF R60>=R18 GOTOF BB1
'puiahA N480 MSG(“错误11:精磨参数错误”)
4X>=UO``L N490 R62=11
d! _8+~ N500 GOTOF BB4
KM-7w66V N510 BB1:IF R60=R18 GOTOF BB3
0j' Xi_uM N520 IF R60 N530 L10 ;磨削子程序
)hfI,9I~ N540 R60=R60-R22
njb{ N550 R61=R61-1
{iTA=\q2O N560 IF R61>0 GOTOB BB1
|W|RX3D N570 R58=R60
[*Vo`WgbD N580 L30 ;砂轮修整
j3/K;U/SGJ N590 R50=R43
Qf}}/k|)k N600 R51=R44
?T'a{~]R N610 R53=R60
R^JtWjJR N620 L20 ;安全让刀
GVM)-Dp] N630 R61=R24 ;精磨砂抡修整计数器
z3yAb"1Hg N640 GOTOB BB1
!L@a;L N650 R50=R60-R18
4ZT0~37( N660 L10 ;最后一次精磨
3lefB
A7 N670 BB3:R60=R18 ;
G"*ch$: N680 R50=0 ;步进刀
-Vjrh/@ N690 R51=R33
;k,#o!> N700 L10 P=R32;光磨
XILreATK@ N710 G0 X=R20 Z=R21
NH8\}nAK N720 M5 ;停止主轴
7KV0g1GQ N730 BB4:M2
7qhX`$ @t3I}mc L1 ;砂轮速度计算子程序
hoZM;wC N10 R8=R7/R3
2P?|'U N20 R8=R8/3.14
<+p{U( N30 IF R8N40 MSG(“ 错误01:转速过高” )
a]?o"{{+ N50 R62=1
qW9~S0sl N60 GOTOF LSA2
KhNOxMZ N70 LSA1:IF R8>R5 GOTOF LSA2
7)l+hZ N80 MSG(“ 错误01:转速过低”)
>s>{+6e N90 R62=2
2U'Vq N100 LSA2:RET
9Cq"Szs PO]c&}/ L20 ;安全余量磨削子程序
HP[M"u N10 R52=R53+R50
zdN(r<m9" N20 R54=R52
tP|ox] N30 IF R54>=R53 GOTOF SLA1
c+G%o8 N40 R62=3 ;错误码
ko`KAU<T_ N50 GOTOF SLA3
h`V#)Q N60 SLA1:IF R54=R53 GOTOF SLA3
`:fh$V5J> N70 IF R54N80 L10
m+pFU?<| N90 R54=R54-R50
42.y.LtZ N100 GOROB SLA1
3t:/Guyom8 N110 SLA2:R50=R54-R53
,h* 'Cs04h N120 L10
)t$o0! N130 R54=R53
b%UbTb, N140 SLA3:RET
dC8, ITBa ^P L30 ;砂轮修整子程序
8'0I$Qa4 N10 G0 X=R46 Z=R47;中间点(安
CdTE~O<) 全位置 )
O|Y~^:ny N20 R56=R39+R36
L~&r.81 N30 R57=R37
+o}mV.&