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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
' S( r  }% h0 z. ^6 R8 CG54
7 ?* R8 g- a7 [/ L3 ^' jT="D50"
M6
9 ^( v+ Z2 d2 WS1200 M3
% E' O) t4 }5 d7 x$ JG00 X0 Y0 D1
Z0.5
* Y+ g3 Y6 f. c! X( Q% LKK:R1=38 R2=0 R3=R1+R2
0 V- N5 W% j- f3 RG0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
( R, c6 j) b4 F  `7 R1 E- b  MR2=R2+0.015
IF R3<38.03 GOTOB KK
% ~/ w  ~3 M# q' e" C; CG0 Z300
# Z6 M- R, F8 z  CM30

laomei

! I8 _0 ]2 N. @* O6 i
老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
; G  N! v8 p5 W2 X- K2 MN20 G54
N30 T="D50"
$ l  r( d8 F/ C+ f! @N40 M6
N50 S3000 M3
  m) M! n6 x$ g9 |, A' G: v6 oN60 G00 X0 Y0 D1
N70 Z0.5
N80 R1=38
) H1 Z& H1 M& B2 W' }3 U. d1 IN90 ZCX
, d$ y* T0 i; p4 d, n: `& RN100 R1=38.015
8 V# ~. c9 @% Y% J4 W. r: wN110 ZCX
  I/ @; }: y6 k$ cN120 R1=38.03
! C  S& R0 i$ Z1 i7 {9 |N130 ZCX
( L+ q0 }% K3 D& b3 T2 ]* eN140 G0 Z300
3 F1 Y( o  ?9 y3 v# {N150 M30
3 M  I. T* Y) r) R9 X. i9 h子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
! V6 ~; p$ v6 g; n( D% p/ U  PZ2.5 I=R1 J0 TURN=3
$ b/ o% Y) \: b: ]* f0 }M17

zhang48926

西门子的不会