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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
' v* @+ Z7 t. @: f/ XG54
T="D50"
M6
9 I8 l% o1 r7 uS1200 M3
6 w0 V/ T; x/ C# U0 v$ yG00 X0 Y0 D1
Z0.5
KK:R1=38 R2=0 R3=R1+R2
/ F  j5 t# u1 U( D( q; D+ uG0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
- Q& A" W, K, N" {& KG2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
0 X4 O2 Q7 J+ B7 Y+ k" yIF R3<38.03 GOTOB KK
6 f% }6 K/ k" u! v8 WG0 Z300
M30

laomei

老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
N40 M6
N50 S3000 M3
. z! V9 {" e2 ~! G) V! h: r0 {N60 G00 X0 Y0 D1
N70 Z0.5
& @# p5 I( V! ^N80 R1=38
# e& o8 q0 E! l+ U: ?) ~! LN90 ZCX
, e( ?, C7 a3 j  \! z: vN100 R1=38.015
N110 ZCX
N120 R1=38.03
N130 ZCX
4 S8 ^( }& V3 R* ]/ xN140 G0 Z300
N150 M30
& V5 j, A* Y' a5 M  J子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
6 \% M4 M8 u6 H( L% ?: W7 _M17

zhang48926

西门子的不会