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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
4 _" X7 @( q- a# F+ [; k, B% J+ yG40 G17 G710 G90
3 W- M( n+ B% }% QG54
' L3 K6 G* B* K7 r" H% q: {T="D50"
* r6 m9 [5 n7 u' ]+ i/ n# m; uM6
- ?6 z3 A: j% D# }' d% Z) V3 U6 h! L8 m6 }S1200 M3
7 g/ z* Z0 h. t$ [8 BG00 X0 Y0 D1
Z0.5
KK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
+ I; q6 [1 {" r: g2 D/ Q* FG2 Z0.5 I=R3 J0 TURN=3
7 p4 l( H' B2 C: XR2=R2+0.015
) F, _& t! Y4 _9 g% |' M& KIF R3<38.03 GOTOB KK
G0 Z300
M30

laomei

: Z7 u  D7 z& c: R5 z) Q老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
N40 M6
* K- I! K1 f& q1 ]N50 S3000 M3
, [* a2 F) ~$ G- u! I* Q& iN60 G00 X0 Y0 D1
N70 Z0.5
: I7 |# \8 w% R* z  ?N80 R1=38
; ?  y' ]) \% s- v+ J2 h" ]5 ~N90 ZCX
, r: `* X7 u$ B9 c! {9 [2 {0 z, kN100 R1=38.015
: I% u$ ?! D! r3 ?% mN110 ZCX
N120 R1=38.03
N130 ZCX
3 C& x5 Y+ ?) I) I& c; n  yN140 G0 Z300
- P% E- w! B! Y1 R# r6 ~N150 M30
2 b' z+ k9 g( K# I子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
, O$ B, Z8 A9 Z+ e' F  C; c" PZ2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会