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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
# ], Z6 ^; |- S4 c+ a# TG40 G17 G710 G90
G54
- ^, `5 [9 l! ZT="D50"
. x6 o* s8 N; i) T8 I5 s6 TM6
S1200 M3
G00 X0 Y0 D1
5 t4 G+ |7 ~( A8 h  @& PZ0.5
: x( k) L/ Q  G" L6 Y* cKK:R1=38 R2=0 R3=R1+R2
G0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
% z, f& a. H7 C! C2 p( j: N3 W4 WG2 Z0.5 I=R3 J0 TURN=3
: X2 D% I5 P4 j* z$ kR2=R2+0.015
IF R3<38.03 GOTOB KK
; x9 h; N, m/ }* [G0 Z300
1 C0 }4 @- Q' _& z9 k* s9 aM30

laomei

; `+ ~  r7 j5 i" H8 [
, t. ]8 |0 |; @) J2 C  E/ r' H1 ^老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
3 R3 K# U: I) n' l' i* s4 D$ L" JN20 G54
' ]2 _. n: J- n3 P1 \4 dN30 T="D50"
N40 M6
N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
N80 R1=38
# k: v  E1 b9 a! O- I8 mN90 ZCX
N100 R1=38.015
# ^; d2 Y9 O$ |" CN110 ZCX
# j5 F0 \; \0 e: f" wN120 R1=38.03
/ {8 C4 A4 z2 |% _5 ^9 bN130 ZCX
N140 G0 Z300
N150 M30
子程序：G0 G41 X=-R1
6 T' n; _6 b& T% z# yG3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
7 T# s: t# m: X% ZM17

zhang48926

西门子的不会