一个不复杂的西门子参数程序

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
G54
T="D50"
M6
S1200 M3
G00 X0 Y0 D1
5 W2 [. ?' B6 S6 V" wZ0.5
; o) ~6 M* S" T0 m3 ~* qKK:R1=38 R2=0 R3=R1+R2
; Q( T+ s* D% [7 ~G0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
' s* z; f4 ?% N/ a9 J/ R7 }* OR2=R2+0.015
IF R3<38.03 GOTOB KK
G0 Z300
M30

laomei

: z2 ?* Z8 I: W3 D
0 T; s& Y; C" J5 ]. M老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
4 S2 t" }5 O3 [) P9 o6 A# A5 xN40 M6
2 b5 n6 _2 i& U6 l3 q. iN50 S3000 M3
8 d0 d- A# O# }% T( S2 ?1 |N60 G00 X0 Y0 D1
% K7 z+ U8 F/ ?  uN70 Z0.5
0 D# T; k1 Q$ A, f! ^" \N80 R1=38
; l! m/ J3 W/ D( MN90 ZCX
% H% E: C# \  B/ rN100 R1=38.015
N110 ZCX
N120 R1=38.03
) K- ^7 t% s  s, bN130 ZCX
N140 G0 Z300
0 Z( p6 D8 m7 G! Q: y: jN150 M30
子程序：G0 G41 X=-R1
% Q0 M) I5 M: MG3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会