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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
$ Z7 `  n3 K. q9 U+ T) kG40 G17 G710 G90
G54
6 X) X1 L2 ^. n/ a- YT="D50"
M6
S1200 M3
7 c  C  T' q2 X% a4 Q1 ]7 cG00 X0 Y0 D1
Z0.5
KK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
4 O5 F7 j# F) q' w( TG3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
/ j: l' i0 ^$ \. gR2=R2+0.015
' n0 {/ b& I! h3 c! y9 LIF R3<38.03 GOTOB KK
  N' R( t' ^3 ZG0 Z300
! Y+ J4 F8 ?/ e5 Q3 }5 {: tM30

laomei

: F/ T0 y& y) q) i# Z; d* w老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
: C8 p. J5 p% Y- pN30 T="D50"
N40 M6
N50 S3000 M3
5 }. C/ e0 a5 QN60 G00 X0 Y0 D1
& w0 R; I* L, G8 f$ {N70 Z0.5
# b7 \; D- B; D6 B) J9 \' `N80 R1=38
7 M* A) k4 k. k3 o2 M: L# x+ oN90 ZCX
$ V: P% W- _' r& k8 YN100 R1=38.015
N110 ZCX
N120 R1=38.03
0 E: G9 T  O6 ?( J. xN130 ZCX
$ f. V5 y( F0 `* MN140 G0 Z300
N150 M30
+ ~! p1 e7 I0 f$ ?子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
' k% K) c* l* v$ e7 k1 pZ2.5 I=R1 J0 TURN=3
( p: l4 ^) K# h1 w7 z8 yM17

zhang48926

西门子的不会