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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
' O6 _$ U. j8 ~7 y0 \1 {G40 G17 G710 G90
# c5 d' U& K( N# }1 V2 h/ ~G54
* Q( U! d7 ^$ J# d1 M( vT="D50"
6 x! [& ^# U1 i( jM6
S1200 M3
8 N9 `6 o/ R2 ~G00 X0 Y0 D1
Z0.5
KK:R1=38 R2=0 R3=R1+R2
. X$ c( a- O. X, ^: vG0 G41 X=-R3
- m$ ]+ n$ H2 g% L  E! ~% q( QG3 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
1 x8 h* R" l/ M- n! wM30

laomei

( f1 d" l7 v$ A0 p5 d( |
/ a5 x1 e; j) T( l# q/ Q! V. |老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
9 F) W' \% G/ R' v; HN20 G54
N30 T="D50"
N40 M6
N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
4 E) g/ J  S- N* J2 A* {N80 R1=38
N90 ZCX
N100 R1=38.015
. f1 j+ _% @: Y9 h- Z* _- f- pN110 ZCX
N120 R1=38.03
1 A, |: T: R$ t7 H- }, V6 j3 \N130 ZCX
; J" ^* V5 G2 q3 ?% A  d! VN140 G0 Z300
; k# p. K7 y1 O( dN150 M30
0 m) W4 g4 t2 K. ~子程序：G0 G41 X=-R1
9 S) P% V  c5 w4 `- \G3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
3 j! X$ l( P, ?M17

zhang48926

西门子的不会