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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
2 z/ ~, ^. y, @4 vG40 G17 G710 G90
G54
& v9 ]0 {3 Q3 F/ C# O% m1 ~T="D50"
) f( X  J2 B8 B1 YM6
4 |- v( B0 X! c; C; g% s; M3 H: |S1200 M3
G00 X0 Y0 D1
Z0.5
KK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
/ n/ D, |* ]+ [0 p! KG3 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
M30

laomei

3 @: d3 H% m  |, [
老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
- b2 ?3 I  f. U2 @$ r2 jN30 T="D50"
' a9 p' M' H" s/ qN40 M6
4 u  u4 A1 W2 _) c- M+ W2 w- \N50 S3000 M3
N60 G00 X0 Y0 D1
* `; X7 m* c6 z  r9 `' hN70 Z0.5
+ P8 z, }& F5 }. n7 [N80 R1=38
N90 ZCX
6 B, g' \) n0 qN100 R1=38.015
N110 ZCX
# {1 N( j" n: n5 VN120 R1=38.03
5 |5 M9 Y0 g! J+ DN130 ZCX
0 b& P& j9 E' a: e- t) D2 ZN140 G0 Z300
/ k9 I$ w; Y8 x0 z8 NN150 M30
子程序：G0 G41 X=-R1
8 e+ c/ M; U* @" \3 ?G3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
$ v* ]0 q' j7 |2 \M17

zhang48926

西门子的不会