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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
7 g2 ^( J; K/ ^1 {( P7 g8 [7 r% [4 G. uG54
7 M! J% L7 K' `, vT="D50"
M6
4 a% W' T! M0 N( N: M" w: [; AS1200 M3
G00 X0 Y0 D1
/ `+ l* H1 G0 bZ0.5
. v2 C2 G/ I8 T7 SKK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
/ a6 Q! Z& d, f0 Z$ l* S4 p: @& f7 BIF R3<38.03 GOTOB KK
G0 Z300
8 ?- m0 I) Y; k5 A1 EM30

laomei

老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
1 }* K/ J7 `/ q  }5 Q, b% xN20 G54
& z9 M; `* O  B! i  X' a9 M, {5 iN30 T="D50"
) J) G8 ~$ y/ VN40 M6
" B& C6 s' U* s7 _! ~: c0 O4 |N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
N80 R1=38
" e. k( Q* U" ]% T2 t! dN90 ZCX
N100 R1=38.015
" H* _' w$ U4 C; UN110 ZCX
N120 R1=38.03
N130 ZCX
N140 G0 Z300
N150 M30
9 h1 E9 u" ^9 O& K. C子程序：G0 G41 X=-R1
% Z( z! G' A; j1 t4 vG3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
% o& r! ~% r$ `" y; ~! `M17

zhang48926

西门子的不会