作者：齐重数控 杜宏祺 王英瑞 迟毅
gfQ1p ? :|\)=4 在2002年我厂为某公司改造一台立式车床，该机床为双刀架控制，应用户要求将该机床右刀架改造为磨削刀架。由于802D系统主要应用在车削控制，因此在改造中主要难点是如何利用R参数实现磨削循环的加工程序编制。
A 1B_E X. nHl{'|~ 机床改造后可以通过电磨头对工件进行回转支承任意表面、内、外圆锥面、圆柱面等进行加工。由于砂轮在磨削过程中不断磨损，因此需要在磨削过程中对砂轮进行砂轮修整。砂轮修整基本上是通过金钢笔、砂轮修整器对砂轮进行手动修整，在砂轮修整完毕后，可直接进行工件的磨削加工而不需要进行再次对刀。
zszx~LSvIT mOntc6&] 工件的磨削加工流程
!'*1;OQ d' [] 工件的磨削加工流程图如图1：
q+W* ?a) 
TnJJ& "~3b 图1 工件的磨削加工流程图
4 %5 + /7igPNhx 用户参数说明
{ZKXT 8' Xd5uF/w R1:砂轮最小直径
C=&;4In R2:砂轮最大直径
PGhYkj2 R3:砂轮直径
3 uJ?; R4:砂轮宽度
l09 DH+ R5:速度下限
S@c Ko&^ R6:线速度上限
); d"gv(]D R7:线速度
0,j!* R8:砂轮转速
s^HI%mdf R9:砂轮圆弧半径
Y7<(_p7 R10:金刚笔半径
G<Y }QhFU R11:金刚笔与花盘圆心距离
xM**n3SZ` R12:金刚笔高度
y\ax?(z R13:垫块高度
C=`MzZ bJ R14:磨架角度
<ToRPx&E R15:停顿时间
9](RZ6A+o -ju}I R18:X轴精磨尺寸
B :#9 R19:Z轴精磨尺寸
}X~"RQf9 R20:X轴起始尺寸
^CW{`eBwk R21:Z轴起始尺寸
23/;W| R22:精磨每次进刀量
M=Y['w x R23:精磨进给率
F< J`1 : R24:精磨砂轮修整计数器
@0-vf>e3- R25:精磨余量
|"YE_aYu 9*2^2GR^; R28:粗磨每次进刀量
.qs5xGg#9 R29:粗磨进给率
z
m+3a F R30:粗磨砂轮修整计数器
]|_ +lik# sPvjJ r"s R32:光磨次数
^y[- e9O| R33:光磨进给率
w#{S=^`} I-m Bj8^; R36:砂轮修整量
"x
O+ R37:砂轮修整每次进给量
Fhga^.5U& R38:砂轮修整进给率
;lf $)3%[ R39:砂轮修整用安全让刀
yaYJmhG 3<_=Vyf R42:安全让刀量
KO[, C[;|j R43:安全让刀每次进给量
J= b 'b% R44:安全让刀进给率
&/(JIWc1su =b#:j:r R46:中间点X轴坐标
vGwpDu\RgX R47:中间点Z轴坐标
v\D.j4%ij BH0s ` K" R50:单次磨削量
8=OpX,t( R51:进给率
/xCX. C R52:起始点
j+("4b' R53:终点
BbhC 0q"J R54:当前位置
]A:8x`z#F .JV y }^Q\ R56:砂轮修磨量
cVl i^*se R57:砂轮每次修磨量
Q096M 0m R58:返回位置
f<M!L> +M6 ^.c<b_(=h R60:当前砂轮位置
h)Ol1[y` R61:修砂轮用计数器
eIQ@){lJ-] R62:错误标志
Wpc8T="q 1NkJs& 磨削加工程序
1} ~`g ED ijgm-1ECk3 磨削加工程序如下:
1vdG \$ 6[-[6%o#z N10 G90 G94 G18
onl,R{,`0 N20 R62=0 ;错误标志
CW
-[c N30 L1 ;线速度计算
B7PdavO# N40 IF R62<>0 GOTOF BB4
3 Scc"9] N50 R58=R20 ;修砂轮准备
XrI$ @e* N70 R51=R38 ;进给率
a3L-q>h N80 L30 ;砂轮修整
(wf3HEb_ N90 R50=R43 ;安全让刀每次进给量
._q<~_~R N100 R51=R44 ;进给率
?hYWxWW N110 R53=R20
8`_tnA RIX N120 L20 ;安全让刀子程
-t: U4r( N130 R60=R20 ;起始点
F
|aLF{ N140 R61=R30 ;砂轮修整计数器初值
kW=!RX[& N150 R50=R28 ;粗磨每次进刀量
.-)kIFMi N160 R51=R29 ;进给率
/7x1Z*Hg N170 IF R60>=R18+R25 GOTOF AA1 ;
Hyi'z 1 N180 R62=10
+'wO:E1( w N190 MSG(“错误10:错磨参数错误”)
sgRWjrc/ N200 GOTOF BB4
0~ o,^A W N210 AA1:IF R60N220 L10 ;磨削子程序
)KOIf{ N230 R60=R60-R28 ;修改档前位置
$g),|[ x+( N240 R61=R61-1
[_:
GQ N250 IF R61>0 GOTOB AA1
Nh\o39= N260 R58=R60
;9LOeH? N270 L30 ;砂轮修整
XSGBC:U)l N280 R50=R43
^I) +u>fJ N290 R51=R44
^bq,+1;@Q N300 R53=R60
y9.?5#aL N310 L20 ;安全让刀
k U0.:Gcc N320 R61=R30
+!ZfJZls N330 GOTOB AA1
sG\K$GP! N340 AA2:R50=R60-R18+R25
d.HcO^ N350 L10 ;最后一次粗磨
T3I{D@+0 N360 R60=R18+R25 ;粗磨结束位置
!j}L-1*{ l N370 AA3:R58=R18+R25
E6z&pM8<8 N380 L30 ;砂轮修整
= .w~qL N390 R50=R43
>`p?
CE N400 R51=R44
d{"@<0i? N410 R53=R60
hVAatn[ N420 L20 ;安全让刀
u60RuP& N430 R61=R24
>dgz/n?:v N440 R60=R18+R25
H g$7[um N450 R50=R22
v0?SN>fZ N460 R51=R23
#\_ 8y`{x N470 IF R60>=R18 GOTOF BB1
EWr7 eH N480 MSG(“错误11:精磨参数错误”)
>P]gjYN N490 R62=11
sPXjU5uq# N500 GOTOF BB4
a$Hq<~46 N510 BB1:IF R60=R18 GOTOF BB3
".2d{B N520 IF R60 N530 L10 ;磨削子程序
7D1$cmtH N540 R60=R60-R22
SlwQ_F"4L N550 R61=R61-1
Dt{WRe\# N560 IF R61>0 GOTOB BB1
g@T}h [ N570 R58=R60
uP(t+}dQ+3 N580 L30 ;砂轮修整
$HtGB] N590 R50=R43
gA%
A}) N600 R51=R44
fI1
9p Q N610 R53=R60
ZCV i ZWo N620 L20 ;安全让刀
p_X{'=SQ1 N630 R61=R24 ;精磨砂抡修整计数器
Y B,c =Wx N640 GOTOB BB1
dFA1nn6{ N650 R50=R60-R18
r? !:%L N660 L10 ;最后一次精磨
WA0D#yuJ/ N670 BB3:R60=R18 ;
k/sfak{Q N680 R50=0 ;步进刀
PG}Roj
I N690 R51=R33
b`@C #qB N700 L10 P=R32;光磨
T] nAz<l), N710 G0 X=R20 Z=R21
k>7bPR5Mw N720 M5 ;停止主轴
}2iR=$2 N730 BB4:M2
Js vdC]+ !Q*w] L1 ;砂轮速度计算子程序
?5/7
@V N10 R8=R7/R3
'#h ORQ B N20 R8=R8/3.14
g7a446QR\K N30 IF R8N40 MSG(“ 错误01:转速过高” )
Q J-|zS.W N50 R62=1
/ |<S D.: N60 GOTOF LSA2
&GkD5b N70 LSA1:IF R8>R5 GOTOF LSA2
R PoBF~> N80 MSG(“ 错误01:转速过低”)
841 y"@*BY N90 R62=2
XH@(V4J(. N100 LSA2:RET
|xg _z&dX 9 [;da L20 ;安全余量磨削子程序
&1R#!| h1W N10 R52=R53+R50
O" Nr$bS(Y N20 R54=R52
C#^y{q N30 IF R54>=R53 GOTOF SLA1
tfZ@4%' N40 R62=3 ;错误码
I
"O^.VC N50 GOTOF SLA3
ZWo~!Z [Y N60 SLA1:IF R54=R53 GOTOF SLA3
&$
"J\v m N70 IF R54N80 L10
_U-`/r o N90 R54=R54-R50
vSC1n8 / N100 GOROB SLA1
} Z FoCMM N110 SLA2:R50=R54-R53
3T0~ k-- N120 L10
yNow hh N130 R54=R53
{\CWoFht> N140 SLA3:RET
/I!62?)-* $#p5BQQ| L30 ;砂轮修整子程序
BAY e:0 N10 G0 X=R46 Z=R47;中间点(安
WZY+c 全位置 )
ENIg_s4 N20 R56=R39+R36
BV:Ca 34& N30 R57=R37
`[g$EXX N40 R80=R11-R3-R56
kfZ `|w@q N50 G0 X=R80 Z=R12
Qrg- xu= N60 IF R56>=0 GOTOF LB1
"YY<T&n N70 MSG(“ 错误04:砂轮参数错误”)
Pd\4hy N80 R62=4
}7(+#ISK6 N90 GOTOF LB3
!'p<Kh[i N100 LB1:IF R56=0 GOTOF LB3
*DC/O(
0 N110 IF R56N120 L3
.P aDR |! N130 R56=R56-R57
6p*X8j3p W N140 GOTOB LB1
_:=\h5}8 N150 LB2:R57=R56
,;Wm>V)o N160 L3
wjwCs` N170 R56=0
D
5n \h5 N180 R3= $AA_IW[X]
W"\}## N190 R3=R11-R3
|-b \N6
} N200 R60=R58+R42
boGdZ2$h4 N210 G0 X=R46 Z=R47 ;中间点(安全位置 )
a1y<Y`SC9 N220 G0 X=R60+R3 Z=R21
kSzap+ nB? N230 LB3:RET
sTl^j gV7j -^2p @^ 技术改造中的现场调试
vj%"x/TP _ia&|#n 在加工过程中遇到了如下问题:
IDT \hTPIs -d A9x~o 问题1:在加工圆锥面时，往复磨削过程中总有一个方向磨不到工件
Pz{MYw m+;U,[%[*E 经检测查找原因，发现刀架在移动到丝杠不同位置处，丝杠各点反向间隙不一样，从而导致砂轮在往复磨削时有一个方向磨不到工件。
jVd`J * 3fl}l 解决方法:重新调整机械的结构，调整丝杠、丝母、斜铁、压板等处后，提高了机床的精度，再次进行磨削加工一切正常。
P dqvXc `gx\m=xG 问题2:R参数不能按顺序显示实际值
%W\NYS m \-pwA j? 经查找原因为选用的802D系统版本为02。01。06。具有预处理程序30段功能，所以R参数只显示预处理后的最后结果，但是程序运行还是按程序当前的实际值运行，不影响工件实际加工，
AXHY$f| r=0PW_r: 解决方法:若要显示加工过程中R参数当前实际值，则必需在含有R参数的程序段之间加上STOPRE指令。
wGNE b 1C{0 R. 问题3:实际坐标值运算正确，但余量坐标显示有误差
<<u ]WsW{C
*6` ^8Y\ 经查找原因为由于系统直线位置的计算精度默认值为0.001,此值是指在机床坐标系下实际移动值，而在工件坐标系的直径值的计算精度为0.002，所以实际程序设计为0.005时，只显示偶数值0.004,但实际运行值正确。
%xC L&}bY JCn HEH 解决方法是将通用数据10200的值改为10000。
<q!HY~"V P|@[D=y 结语
+_J@8k N^$ q;% 该机床已经投入使用近两年，我们利用R参数编程实现了802D系统在磨削机床控制中的应用。通过不断完善，该磨削加工程序运行十分可靠，稳定，完全实现了对802D系统的磨削加工要求。
