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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
9 k9 r! O% D  j6 ZG40 G17 G710 G90
G54
  B2 R% L/ O/ a' F3 B0 pT="D50"
" u4 c. j+ t, A5 CM6
S1200 M3
G00 X0 Y0 D1
Z0.5
KK:R1=38 R2=0 R3=R1+R2
. e: H% o9 c8 ~) }0 ^( y; }G0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
" `/ u6 T+ d: F! G7 NG2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
. p: U7 L) [0 i# c4 ]- k. ^/ V& PIF R3<38.03 GOTOB KK
G0 Z300
! E9 r" S- [" \+ }8 \7 P. }M30

laomei

+ |, ^! f! R+ ~2 ^
老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
, Z( d8 [2 e4 }$ k. XN20 G54
3 s( L4 {8 h4 wN30 T="D50"
' a4 g' U0 n7 F, b$ B" H/ oN40 M6
N50 S3000 M3
" [) x4 M3 I  IN60 G00 X0 Y0 D1
N70 Z0.5
N80 R1=38
4 K: t3 M  Y# y" L5 B! k, IN90 ZCX
6 T" @2 }) ^  w' i6 BN100 R1=38.015
N110 ZCX
2 d+ V2 D9 f% V2 y$ RN120 R1=38.03
2 e- S+ t1 O2 iN130 ZCX
N140 G0 Z300
, o: S5 C5 a; t7 l; uN150 M30
3 x  S) y3 d  j  }1 m) w! x子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
3 T7 _) c' ~6 M* PZ2.5 I=R1 J0 TURN=3
' O7 {7 S; _( n: ZM17

zhang48926

西门子的不会