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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
" w9 k( C: N+ c) p* \. r% MG40 G17 G710 G90
3 x% o7 W0 @1 v6 j6 B  }5 CG54
4 F4 Y  X1 |6 y/ e6 O6 F+ D3 D, yT="D50"
; m1 u& G& S- K2 b& ]7 i6 \M6
S1200 M3
+ k7 E+ p0 B3 V4 @" S/ _$ CG00 X0 Y0 D1
! k0 A0 l: m0 F% }9 L8 r: BZ0.5
! f- W% w1 H* `5 \# S4 W) m) Q8 fKK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
# j# W9 g! h+ o: MG3 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
5 t1 }3 Z' j  `5 p3 X" |0 hG0 Z300
M30

laomei

2 v( U5 q; ~3 G) v% Q! z
* v/ L! P3 B% ?" r8 ?8 }老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
2 |2 k2 I+ `- M4 o: @N40 M6
4 C1 q6 U5 a$ s" H$ F" pN50 S3000 M3
- p4 o% M# ~: F  O8 W9 V/ G0 @N60 G00 X0 Y0 D1
& R# D4 |7 z+ L4 }0 T5 y4 ~N70 Z0.5
+ s9 z7 |( }, |8 L8 o: Z" SN80 R1=38
2 U& v) J  m7 l7 @' KN90 ZCX
3 x4 b( N. l0 X7 ON100 R1=38.015
N110 ZCX
- C1 e, q! h! H3 J; x2 uN120 R1=38.03
' r/ r+ B. d3 hN130 ZCX
4 U% c9 c+ d! F6 }N140 G0 Z300
  V4 @" p9 }$ Z) T/ `- m! |) NN150 M30
' R- p1 t5 U/ T子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
$ ]5 E! B, X5 M& mZ2.5 I=R1 J0 TURN=3
+ a4 h1 L% @( T& @M17

zhang48926

西门子的不会