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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
3 y3 l3 m: i# j" S* zG40 G17 G710 G90
  @+ a( |2 L/ IG54
T="D50"
M6
S1200 M3
% I/ K# {; m8 Y5 s& g$ i! t& ^G00 X0 Y0 D1
" Z; Q7 w1 S: f$ Z. bZ0.5
, E) R* {6 J, z* N1 d0 yKK:R1=38 R2=0 R3=R1+R2
- a; J' d8 T  n- M( MG0 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
$ u$ S5 f% T0 K9 D( U1 K5 yM30

laomei

1 t$ ?7 n8 B0 y
2 V0 @. |# d# m( H老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
2 x0 `8 Y/ f9 H7 e$ e0 e( NN30 T="D50"
) x$ q$ s# P- s3 r0 f2 }9 gN40 M6
  f% K% h4 ]. m- }) YN50 S3000 M3
N60 G00 X0 Y0 D1
9 ^% x8 c# h7 S8 X) Z( Q- ^N70 Z0.5
6 {2 |" H' E  {N80 R1=38
* e- f( I% i" H* ]0 d6 MN90 ZCX
6 I! @4 e* I1 _N100 R1=38.015
N110 ZCX
N120 R1=38.03
N130 ZCX
N140 G0 Z300
% s( H: {$ s; k4 aN150 M30
- ]9 A! \5 c9 v3 _9 r  Q. ^子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
( W8 g& k& M  K1 V. V" F% D$ M* Q+ UZ2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会