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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
" |  U! _  P4 L2 d/ zG40 G17 G710 G90
! u) Q2 R7 [' x  `" i  E) bG54
1 y6 P) L& G4 W3 n$ y8 jT="D50"
M6
S1200 M3
: i! t! t9 B! X: c/ d- h5 K- s+ \G00 X0 Y0 D1
8 l$ I9 }! J' p9 j- i- |6 oZ0.5
KK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
0 V! O* i3 C: S6 zG2 Z0.5 I=R3 J0 TURN=3
, [" f, C4 H; q- G- w+ U. gR2=R2+0.015
IF R3<38.03 GOTOB KK
. i, v9 P/ R+ b/ TG0 Z300
* z8 t* r. x8 b6 g0 M' ?; R, P* gM30

laomei

. J. M( q# O+ J& t! ?) m' [老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
/ z! q( R7 B" X& O+ v2 ^N30 T="D50"
N40 M6
N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
N80 R1=38
N90 ZCX
N100 R1=38.015
, X$ \2 @- s8 P( ~+ a, I4 k6 gN110 ZCX
N120 R1=38.03
N130 ZCX
N140 G0 Z300
N150 M30
$ P$ I5 V- b) N子程序：G0 G41 X=-R1
0 B. j  v# I1 r/ M( nG3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
# E" {" E$ Y' s# I& |1 ~M17

zhang48926

西门子的不会