作者：齐重数控 杜宏祺 王英瑞 迟毅
23/;W| a LJ
d1Q 在2002年我厂为某公司改造一台立式车床，该机床为双刀架控制，应用户要求将该机床右刀架改造为磨削刀架。由于802D系统主要应用在车削控制，因此在改造中主要难点是如何利用R参数实现磨削循环的加工程序编制。
&{g y{npQ F"0=r 机床改造后可以通过电磨头对工件进行回转支承任意表面、内、外圆锥面、圆柱面等进行加工。由于砂轮在磨削过程中不断磨损，因此需要在磨削过程中对砂轮进行砂轮修整。砂轮修整基本上是通过金钢笔、砂轮修整器对砂轮进行手动修整，在砂轮修整完毕后，可直接进行工件的磨削加工而不需要进行再次对刀。
\ {;3 '< @k)[p+)E 工件的磨削加工流程
$^`@ ly r a V#phP 工件的磨削加工流程图如图1：
0A' )zKik 
96i # 图1 工件的磨削加工流程图
.1 jeD .l iC~ll!FA! 用户参数说明
_2w8S\ G rI<w .9X R1:砂轮最小直径
czT]XF R2:砂轮最大直径
-l ?\hmDl R3:砂轮直径
#Ve@D@d [ R4:砂轮宽度
] E^)d|_ R5:速度下限
qO[_8's8 R6:线速度上限
u,./,:O%= R7:线速度
OJD! Ar8Q R8:砂轮转速
RaOLy \ R9:砂轮圆弧半径
gjk ;An R10:金刚笔半径
/6:qmh2 R11:金刚笔与花盘圆心距离
8w MwS6s: R12:金刚笔高度
A=r8 _.@2@ R13:垫块高度
#]r'?GN R14:磨架角度
\k5
sdHmI[ R15:停顿时间
2YK2t<EO Rd[^)q4d$w R18:X轴精磨尺寸
GOD{?#c$ R19:Z轴精磨尺寸
y7x*:xR [ R20:X轴起始尺寸
r9n:[A&HE R21:Z轴起始尺寸
*gOUpbtXa R22:精磨每次进刀量
ydMSL25<+ R23:精磨进给率
W0< 2*7s R24:精磨砂轮修整计数器
{RI)I R25:精磨余量
i5SDy(?r $E}N`B7 R28:粗磨每次进刀量
v^B2etiX_ R29:粗磨进给率
p#
|}
o9 R30:粗磨砂轮修整计数器
f dJ<(i]7W Y T6dI"48 R32:光磨次数
B`:l;<&jX R33:光磨进给率
_gw paAJ m .R**g R36:砂轮修整量
v1p^=" IHI R37:砂轮修整每次进给量
(*9-Fa R38:砂轮修整进给率
51xf.iB R39:砂轮修整用安全让刀
tGF3Hw^mS 1Cw
HGO R42:安全让刀量
"[0.a\ d< R43:安全让刀每次进给量
9 dK` R44:安全让刀进给率
E] rBq_S A Wd,qldv R46:中间点X轴坐标
vsJDVJ += R47:中间点Z轴坐标
?}#Iu-IA &Tg~A 9y\ R50:单次磨削量
D 4sp+ R51:进给率
Z1.v%"/( R52:起始点
}b]eiPWN R53:终点
tV h"C%Vkr R54:当前位置
& Bqu2^^ $laUkD#vz R56:砂轮修磨量
J?Oeuk~[D R57:砂轮每次修磨量
XSGBC:U)l R58:返回位置
^I) +u>fJ ^bq,+1;@Q R60:当前砂轮位置
V[n,fEPBr R61:修砂轮用计数器
$W%-Mm R62:错误标志
6 [?5hmc"w 3,n" d- 磨削加工程序
MG~bDM4 ';v1AX}5q 磨削加工程序如下:
BN~ndWRK 4W}mPeEeV N10 G90 G94 G18
.y lvJ$ N20 R62=0 ;错误标志
qae|?z N30 L1 ;线速度计算
mtdy@=?1Y N40 IF R62<>0 GOTOF BB4
s+(@ UUl N50 R58=R20 ;修砂轮准备
hzT)5'_ N70 R51=R38 ;进给率
Vcnc=ct N80 L30 ;砂轮修整
Q>71uM%e` N90 R50=R43 ;安全让刀每次进给量
EWr7 eH N100 R51=R44 ;进给率
>P]gjYN N110 R53=R20
sPXjU5uq# N120 L20 ;安全让刀子程
R:j
mn N130 R60=R20 ;起始点
E^$8nqCL: N140 R61=R30 ;砂轮修整计数器初值
* eX/Z Cn N150 R50=R28 ;粗磨每次进刀量
7O :g; UI# N160 R51=R29 ;进给率
wJ7^)tTRF N170 IF R60>=R18+R25 GOTOF AA1 ;
u:mndTpB6x N180 R62=10
4c[/%e:\- N190 MSG(“错误10:错磨参数错误”)
K)5j N200 GOTOF BB4
Sp*4Z`^je N210 AA1:IF R60N220 L10 ;磨削子程序
CD% Cb53 N230 R60=R60-R28 ;修改档前位置
tzv4uD ] N240 R61=R61-1
{ {:Fs N250 IF R61>0 GOTOB AA1
6P:fM Y N260 R58=R60
DEbMb6 )U N270 L30 ;砂轮修整
i,S1|R N280 R50=R43
~Z!YB,)bp N290 R51=R44
WA0D#yuJ/ N300 R53=R60
k/sfak{Q N310 L20 ;安全让刀
PG}Roj
I N320 R61=R30
b`@C #qB N330 GOTOB AA1
T] nAz<l), N340 AA2:R50=R60-R18+R25
k>7bPR5Mw N350 L10 ;最后一次粗磨
}2iR=$2 N360 R60=R18+R25 ;粗磨结束位置
Js vdC]+ N370 AA3:R58=R18+R25
!Q*w] N380 L30 ;砂轮修整
?5/7
@V N390 R50=R43
b*H*(}A6"' N400 R51=R44
Q J-|zS.W N410 R53=R60
'5LdiSk N420 L20 ;安全让刀
<i]0EE}% N430 R61=R24
j--byk6PB N440 R60=R18+R25
+cSc0: N450 R50=R22
3u& ,3: N460 R51=R23
e([> sAx!1 N470 IF R60>=R18 GOTOF BB1
9 M%Gnz N480 MSG(“错误11:精磨参数错误”)
Pq8oK'z - N490 R62=11
9t6c*|60#n N500 GOTOF BB4
H%gAgXHn N510 BB1:IF R60=R18 GOTOF BB3
n:2._s T N520 IF R60 N530 L10 ;磨削子程序
{u2Zl7]z^ N540 R60=R60-R22
g(;OUkj$Zp N550 R61=R61-1
~LZrhwVj$ N560 IF R61>0 GOTOB BB1
gPT_}#_GxM N570 R58=R60
=&,T@5&-= N580 L30 ;砂轮修整
N kO+ )= N590 R50=R43
6@t& N600 R51=R44
I:G8B5{J N610 R53=R60
'4<o&b^yQ N620 L20 ;安全让刀
k sXQ}B E N630 R61=R24 ;精磨砂抡修整计数器
euVDrJ^ N640 GOTOB BB1
c)B 3g.C4m N650 R50=R60-R18
BgQ/$, N660 L10 ;最后一次精磨
o B o*<6 N670 BB3:R60=R18 ;
8V 4e\q N680 R50=0 ;步进刀
/e |Lw4$@S N690 R51=R33
d}':7N p N700 L10 P=R32;光磨
W/hzo*o'g N710 G0 X=R20 Z=R21
u}|v;:|j N720 M5 ;停止主轴
[DH4iG5 N730 BB4:M2
;?tH8jf> }7(+#ISK6 L1 ;砂轮速度计算子程序
@uCi0P t N10 R8=R7/R3
A|S)cr8z N20 R8=R8/3.14
-0#"<!N N30 IF R8N40 MSG(“ 错误01:转速过高” )
,]7ouH$H} N50 R62=1
`W g"m~l$N N60 GOTOF LSA2
'jfE?ngt N70 LSA1:IF R8>R5 GOTOF LSA2
$q z{L~ < N80 MSG(“ 错误01:转速过低”)
] xHiy+ N90 R62=2
6j XDLI N100 LSA2:RET
n:OXv}pv |1(x2x%}D^ L20 ;安全余量磨削子程序
'ia-h7QWS N10 R52=R53+R50
GEF's#YWK N20 R54=R52
Eu'E;*- f N30 IF R54>=R53 GOTOF SLA1
3*~`z9-z N40 R62=3 ;错误码
#e-K It N50 GOTOF SLA3
O-
QT+] N60 SLA1:IF R54=R53 GOTOF SLA3
?'+]d;U O& N70 IF R54N80 L10
R/Bjc}J' N90 R54=R54-R50
4KtD
k N100 GOROB SLA1
n =V|NrU N110 SLA2:R50=R54-R53
F: T(-, N120 L10
&)tiO>B^6 N130 R54=R53
pxgf%P<7 N140 SLA3:RET
r9WR1&T) G\dPGPPM
L30 ;砂轮修整子程序
'g)f5n a[ N10 G0 X=R46 Z=R47;中间点(安
tjwf;g}$ 全位置 )
# o/;du N20 R56=R39+R36
RU7+$Z0K N30 R57=R37
gfj_] N40 R80=R11-R3-R56
hS8M|_ N50 G0 X=R80 Z=R12
A;Y~Hu4KPZ N60 IF R56>=0 GOTOF LB1
,HTwEq>-G N70 MSG(“ 错误04:砂轮参数错误”)
E> GmFw N80 R62=4
<Y7j ' n N90 GOTOF LB3
U1y!R<qlp N100 LB1:IF R56=0 GOTOF LB3
mc%.
8i N110 IF R56N120 L3
klnNBo! N130 R56=R56-R57
@2h hB W N140 GOTOB LB1
9!n95 N150 LB2:R57=R56
jn|NrvrX N160 L3
>^Wpc N170 R56=0
' X wv, N180 R3= $AA_IW[X]
0.x+ H9z N190 R3=R11-R3
= K} P fh N200 R60=R58+R42
y/Y}C.IWp) N210 G0 X=R46 Z=R47 ;中间点(安全位置 )
U<0Wa>3zj N220 G0 X=R60+R3 Z=R21
I F6$ @Q N230 LB3:RET
_i kKOU^8 /B?wn=][ 技术改造中的现场调试
^6kl4:{idE xjbI1qCfe 在加工过程中遇到了如下问题:
%<nGm\ j%
7Gje[ 问题1:在加工圆锥面时，往复磨削过程中总有一个方向磨不到工件
c=\ _[G( }Y.YJXum 经检测查找原因，发现刀架在移动到丝杠不同位置处，丝杠各点反向间隙不一样，从而导致砂轮在往复磨削时有一个方向磨不到工件。
w/o^OjwQ xbhHP2F | 解决方法:重新调整机械的结构，调整丝杠、丝母、斜铁、压板等处后，提高了机床的精度，再次进行磨削加工一切正常。
sx=1pnP9` `oikSx$vB. 问题2:R参数不能按顺序显示实际值
VVch% #BP0MY& 经查找原因为选用的802D系统版本为02。01。06。具有预处理程序30段功能，所以R参数只显示预处理后的最后结果，但是程序运行还是按程序当前的实际值运行，不影响工件实际加工，
vw!7f|Pg ~ e8 ]CB 解决方法:若要显示加工过程中R参数当前实际值，则必需在含有R参数的程序段之间加上STOPRE指令。
I\6C0 x ^2$b8]q 问题3:实际坐标值运算正确，但余量坐标显示有误差
A"M;kzAfHM U.SC,;N^ 经查找原因为由于系统直线位置的计算精度默认值为0.001,此值是指在机床坐标系下实际移动值，而在工件坐标系的直径值的计算精度为0.002，所以实际程序设计为0.005时，只显示偶数值0.004,但实际运行值正确。
zqdkt ` ASoBa& vX 解决方法是将通用数据10200的值改为10000。
faRQj:R8 G `%r nu 结语
<}~
/. Cx 4h!yh2c.. 该机床已经投入使用近两年，我们利用R参数编程实现了802D系统在磨削机床控制中的应用。通过不断完善，该磨削加工程序运行十分可靠，稳定，完全实现了对802D系统的磨削加工要求。
