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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
G54
T="D50"
M6
S1200 M3
. z& j# }3 `$ R8 I; mG00 X0 Y0 D1
+ z) f+ z+ N, tZ0.5
8 ^6 E; H- c5 S: V  @KK:R1=38 R2=0 R3=R1+R2
7 O* [, S' Z( r, d# O& s& P+ O2 aG0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
IF R3<38.03 GOTOB KK
G0 Z300
4 ~  ^% e/ N4 J$ a% ?M30

laomei

老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
1 p0 b  j/ h- J$ J' t* g9 {N20 G54
, Z! _0 q) s, N* M1 a6 NN30 T="D50"
N40 M6
N50 S3000 M3
N60 G00 X0 Y0 D1
& \! d4 ~1 f) B1 a1 x" b. `N70 Z0.5
N80 R1=38
N90 ZCX
4 S- a5 Z4 X0 gN100 R1=38.015
+ |( ]& f/ c3 @8 s7 s) i3 dN110 ZCX
N120 R1=38.03
N130 ZCX
% u  l. w3 b8 [' z7 aN140 G0 Z300
: t- G8 u6 ]6 ?& Z; m% lN150 M30
子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
9 Z; Z6 @3 T0 o1 b8 i* h! G+ U& @M17

zhang48926

西门子的不会