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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
G54
: i0 ^* s7 Q5 y' R) A& aT="D50"
M6
S1200 M3
G00 X0 Y0 D1
' s+ q. a4 U$ V. |' g( ~- yZ0.5
9 Z6 H3 z% O; ]8 J, |) \: T0 NKK:R1=38 R2=0 R3=R1+R2
5 M2 d6 L" u5 R! W' |$ iG0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
  H+ j) B) a: a- \8 p8 H8 R  FR2=R2+0.015
" w- F( L& A* Y7 o  DIF R3<38.03 GOTOB KK
G0 Z300
: _$ @% u. `. F* [3 x$ _M30

laomei

4 G+ a, d) O- Z: a$ k老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
+ c  Q" L& ^9 q5 f' eN30 T="D50"
N40 M6
, Z6 R9 w# Z. AN50 S3000 M3
, z- h9 h8 _& R* E' `+ [N60 G00 X0 Y0 D1
: I$ I  v. u( @1 T- Q5 }  zN70 Z0.5
N80 R1=38
N90 ZCX
N100 R1=38.015
N110 ZCX
N120 R1=38.03
N130 ZCX
0 `" X# F7 J* f- D. _, tN140 G0 Z300
N150 M30
- O' `! T$ w9 W; u) c子程序：G0 G41 X=-R1
4 z3 A0 }# K; c. ^G3 Z-67 I=R1 J0 TURN=3 F2000
6 o  m3 `! ^8 j. P8 ^+ V  r9 b9 qZ2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会