作者：齐重数控 杜宏祺 王英瑞 迟毅
}LQ\a8]< RY<%'\A`~ 在2002年我厂为某公司改造一台立式车床，该机床为双刀架控制，应用户要求将该机床右刀架改造为磨削刀架。由于802D系统主要应用在车削控制，因此在改造中主要难点是如何利用R参数实现磨削循环的加工程序编制。
URQ@= W7 bRsc-Fz6 机床改造后可以通过电磨头对工件进行回转支承任意表面、内、外圆锥面、圆柱面等进行加工。由于砂轮在磨削过程中不断磨损，因此需要在磨削过程中对砂轮进行砂轮修整。砂轮修整基本上是通过金钢笔、砂轮修整器对砂轮进行手动修整，在砂轮修整完毕后，可直接进行工件的磨削加工而不需要进行再次对刀。
;W6-i2? | *fNH(8&H 工件的磨削加工流程
AK;^9b-}q: CW;m 工件的磨削加工流程图如图1：
y !hi"! 
j%WY ,2P 图1 工件的磨削加工流程图
}DHUTP2;yz Y;g% e3nu 用户参数说明
oLw|uU-| ZRP y~wy> R1:砂轮最小直径
Xb0!( (A R2:砂轮最大直径
Kr]W
o8dWy R3:砂轮直径
&~ y{'zoL R4:砂轮宽度
B j= @&; R5:速度下限
/tzlbI]z R6:线速度上限
uQ^hV%|" R7:线速度
gi1j/j7 R8:砂轮转速
)ji@k(x27q R9:砂轮圆弧半径
B/G3T
u uG R10:金刚笔半径
Bj8<@~bX:L R11:金刚笔与花盘圆心距离
9t0Cj/w} R12:金刚笔高度
~b#OFnyG R13:垫块高度
& +] x;K R14:磨架角度
3(o7co-f R15:停顿时间
1OP" 5f dk8y>uLr_ R18:X轴精磨尺寸
1 w 17L]4 R19:Z轴精磨尺寸
]!J<,f7W R20:X轴起始尺寸
+ ~~ Z0.[ R21:Z轴起始尺寸
]zcV]Qj$~ R22:精磨每次进刀量
cyBW0wV1 R23:精磨进给率
}k| g%H J R24:精磨砂轮修整计数器
p+)C$ 2YK R25:精磨余量
# '8)u)! P#v^"}.Wd R28:粗磨每次进刀量
SM$\;)L R29:粗磨进给率
0Nt%YP R30:粗磨砂轮修整计数器
B>@D,)/bT5 BvQUn@ XE R32:光磨次数
%z2oDAjX R33:光磨进给率
b*`fLrqV. #w;;D7{@m R36:砂轮修整量
0$l&i=L R37:砂轮修整每次进给量
,#
eO& R38:砂轮修整进给率
s&0*'^'O[S R39:砂轮修整用安全让刀
R}hlDJ/m- jceHK l R42:安全让刀量
,O2q+' & R43:安全让刀每次进给量
r_q~'r35 _ R44:安全让刀进给率
;AltNGcM F'Xl J M R46:中间点X轴坐标
61kO1,Uz* R47:中间点Z轴坐标
7BS/T %;
qY '+ R50:单次磨削量
X~%IM1+L; R51:进给率
Cc *|Zw R52:起始点
Bu' :2"7 R53:终点
HwM /}-t R54:当前位置
ZRO.bMgZF [d\#[l_ R56:砂轮修磨量
$6Z[|9W^A R57:砂轮每次修磨量
"(N-h\7Ex9 R58:返回位置
gsi<S6DQ8 cmae&Atotw R60:当前砂轮位置
9c%(]Rn: R61:修砂轮用计数器
/CbkqNV R62:错误标志
.C6gl ]6y@ <9 T
[yg 磨削加工程序
. N&QW
` hl}dgp(( 磨削加工程序如下:
u>1v~3,r# aK-N}T N10 G90 G94 G18
WV j&0 N20 R62=0 ;错误标志
)2/b$i,JKk N30 L1 ;线速度计算
I ;l`VtD N40 IF R62<>0 GOTOF BB4
gl Li N50 R58=R20 ;修砂轮准备
D8W (CE^} N70 R51=R38 ;进给率
7@3M]5:3g N80 L30 ;砂轮修整
xR _DY'z N90 R50=R43 ;安全让刀每次进给量
Qve`k< Cj" N100 R51=R44 ;进给率
3EAX] N110 R53=R20
*SWv *s D N120 L20 ;安全让刀子程
j _hj CQ N130 R60=R20 ;起始点
p<ry$=` N140 R61=R30 ;砂轮修整计数器初值
WtMcI>4w N150 R50=R28 ;粗磨每次进刀量
uLF\K+cz N160 R51=R29 ;进给率
s9=pV4fA~w N170 IF R60>=R18+R25 GOTOF AA1 ;
&MBOAHhze N180 R62=10
9
4 "f N190 MSG(“错误10:错磨参数错误”)
?NQD # N200 GOTOF BB4
N IO; N210 AA1:IF R60N220 L10 ;磨削子程序
UqY J#&MqY N230 R60=R60-R28 ;修改档前位置
x`wZtv \ N240 R61=R61-1
Q^\{Zg)p N250 IF R61>0 GOTOB AA1
dV '6m@C N260 R58=R60
F@oT7NB/n N270 L30 ;砂轮修整
@:I \\S@bN N280 R50=R43
_ak.G= N290 R51=R44
&IxxDvP3k N300 R53=R60
Z8N@e<!*~8 N310 L20 ;安全让刀
}x>}:"P;W N320 R61=R30
9*"[pt+tA N330 GOTOB AA1
H rM)jC<~ N340 AA2:R50=R60-R18+R25
,!xz*o+#@ N350 L10 ;最后一次粗磨
# r2$ZCo3o N360 R60=R18+R25 ;粗磨结束位置
YN$ndqOP N370 AA3:R58=R18+R25
(v9!g# N380 L30 ;砂轮修整
Z1 E` I89< N390 R50=R43
ytuWT ,u N400 R51=R44
94S .9A N410 R53=R60
o%y+Y;|?J N420 L20 ;安全让刀
` <.
7? N430 R61=R24
2y&_Z^kI? N440 R60=R18+R25
nI((ki}v N450 R50=R22
e<&_tx N460 R51=R23
>^2 ZM N470 IF R60>=R18 GOTOF BB1
h'z+8X_t N480 MSG(“错误11:精磨参数错误”)
rcD.P?" N490 R62=11
Te{aB"B N500 GOTOF BB4
1_ p[*h N510 BB1:IF R60=R18 GOTOF BB3
e)fJd*P N520 IF R60 N530 L10 ;磨削子程序
{m1t~ S N540 R60=R60-R22
UtHmM,*I N550 R61=R61-1
$_%2D3-;D N560 IF R61>0 GOTOB BB1
eP-R""uPw N570 R58=R60
|:J*>"sq N580 L30 ;砂轮修整
~)oWSo5ll N590 R50=R43
b7F3]W<`& N600 R51=R44
4DG 9`5. N610 R53=R60
G~ Q*:m N620 L20 ;安全让刀
\{Ox@ N630 R61=R24 ;精磨砂抡修整计数器
3"2<T^H] N640 GOTOB BB1
ru(?a~lF8~ N650 R50=R60-R18
sWqPw}/3> N660 L10 ;最后一次精磨
f D]An< N670 BB3:R60=R18 ;
'Kt4O9=p N680 R50=0 ;步进刀
83p$ !8]u N690 R51=R33
Z`0r]V`Ys N700 L10 P=R32;光磨
+qu@dU0\`| N710 G0 X=R20 Z=R21
Q} k_#w N720 M5 ;停止主轴
Q9Xm b2LN N730 BB4:M2
No SqzJyh J"a2
@S& L1 ;砂轮速度计算子程序
Z IGbwL N10 R8=R7/R3
X7imUy'. N20 R8=R8/3.14
@ B}c4, N30 IF R8N40 MSG(“ 错误01:转速过高” )
9 >} (]T N50 R62=1
q^T&A[hMPx N60 GOTOF LSA2
}(vOaD|k = N70 LSA1:IF R8>R5 GOTOF LSA2
`
i^`Q N80 MSG(“ 错误01:转速过低”)
sbq44L) N90 R62=2
R+@sHsZ@ N100 LSA2:RET
i85+p2i7 Npg5Z%+ y L20 ;安全余量磨削子程序
[h 2p8i 'o N10 R52=R53+R50
HCe-]nMd N20 R54=R52
3qV>TE]6, N30 IF R54>=R53 GOTOF SLA1
l yLK$B?/ N40 R62=3 ;错误码
K_w0+oY a N50 GOTOF SLA3
3ec==. N60 SLA1:IF R54=R53 GOTOF SLA3
OA8b_k~ N70 IF R54N80 L10
^0 ,&R\e+ N90 R54=R54-R50
v=yI#5 N100 GOROB SLA1
!]jNVg N110 SLA2:R50=R54-R53
j_YZ(: = N120 L10
L{o >D" N130 R54=R53
DlQ[} 5STF N140 SLA3:RET
)4o=t.O\K Ow&'sR'CX L30 ;砂轮修整子程序
?-6x]l=] N10 G0 X=R46 Z=R47;中间点(安
0I
ND9h. % 全位置 )
BR0p0% N20 R56=R39+R36
a Gzdur N30 R57=R37
ah&plaVzC N40 R80=R11-R3-R56
L}sm R, N50 G0 X=R80 Z=R12
1PT_1[eAR N60 IF R56>=0 GOTOF LB1
EF7|%N N70 MSG(“ 错误04:砂轮参数错误”)
qT-nD} N80 R62=4
q}76aa0e N90 GOTOF LB3
JwG5#CFu^ N100 LB1:IF R56=0 GOTOF LB3
L^ jC&
dF N110 IF R56N120 L3
{u[K
^G N130 R56=R56-R57
JXa%TpI:
E N140 GOTOB LB1
BX) cV N150 LB2:R57=R56
dQ2i{A"BKz N160 L3
x.4)p6 N170 R56=0
bMK'J N180 R3= $AA_IW[X]
Uc%`? +Q N190 R3=R11-R3
`efH( N200 R60=R58+R42
Zn=Jm Z N210 G0 X=R46 Z=R47 ;中间点(安全位置 )
n*8RYm)? N220 G0 X=R60+R3 Z=R21
#lVl?F+~ N230 LB3:RET
[ QL<&:s& ~4
x Ba:*z 技术改造中的现场调试
Qre&N _ sB1tce 在加工过程中遇到了如下问题:
sCf(h AZ Lt'9UD 问题1:在加工圆锥面时，往复磨削过程中总有一个方向磨不到工件
gt~2Br4 ^} pREe c= 经检测查找原因，发现刀架在移动到丝杠不同位置处，丝杠各点反向间隙不一样，从而导致砂轮在往复磨削时有一个方向磨不到工件。
,9j:h)ks? EA{*%9 A 解决方法:重新调整机械的结构，调整丝杠、丝母、斜铁、压板等处后，提高了机床的精度，再次进行磨削加工一切正常。
z(#hL-{c D@vvy6>~s 问题2:R参数不能按顺序显示实际值
W;@ae,^ j!8+|eA kk 经查找原因为选用的802D系统版本为02。01。06。具有预处理程序30段功能，所以R参数只显示预处理后的最后结果，但是程序运行还是按程序当前的实际值运行，不影响工件实际加工，
|h~/ Zz= Cot\i\]jv 解决方法:若要显示加工过程中R参数当前实际值，则必需在含有R参数的程序段之间加上STOPRE指令。
P HL@1K{) J,M5<s[Xqt 问题3:实际坐标值运算正确，但余量坐标显示有误差
(9q {J(44 +Q#Qu0_
经查找原因为由于系统直线位置的计算精度默认值为0.001,此值是指在机床坐标系下实际移动值，而在工件坐标系的直径值的计算精度为0.002，所以实际程序设计为0.005时，只显示偶数值0.004,但实际运行值正确。
rls#g w )aA9z(x 解决方法是将通用数据10200的值改为10000。
'!L1z45 Ol 5xyj 结语
_CwQ}n* U=#ylQ 该机床已经投入使用近两年，我们利用R参数编程实现了802D系统在磨削机床控制中的应用。通过不断完善，该磨削加工程序运行十分可靠，稳定，完全实现了对802D系统的磨削加工要求。
