一個不復雜的西門子參數程序

laomei

老師好。最近一批活，在德瑪吉機床上用直徑50的磨頭磨一直徑76的孔，磨頭螺旋進螺旋出，編了一個西門子宏，本來是三刀就程序結束，現在這個程序上機卻是無限循環了，而且X尺寸38一直都毫無變化，能幫我看看這個程序是什么毛病嗎？謝謝！
G40 G17 G710 G90
# Y/ V' }, N9 M4 S4 c, X7 GG54
  x; D' c1 x; ST="D50"
M6
; M& c! S) H: b; g5 q2 W7 oS1200 M3
& b* i6 D4 ]5 Z& QG00 X0 Y0 D1
6 Q9 o, C5 Y! T; oZ0.5
KK:R1=38 R2=0 R3=R1+R2
# Q/ P, s  S" {) d4 i, rG0 G41 X=-R3
0 j5 `9 {) s; t& MG3 Z-25 I=R3 J0 TURN=3 F400 M8
4 W8 ~: x# `0 g& k5 mG2 Z0.5 I=R3 J0 TURN=3
, }/ f, ^! I. r/ n) q* x+ nR2=R2+0.015
IF R3<38.03 GOTOB KK
1 c) |' C- |+ F& uG0 Z300
M30

zhang48926

西門子的不會

laomei

* \, K2 i2 ~* t) w; o5 w; C5 P. L
老師提供的程序還是無限循環，X還是毫無變化，但還是要謝謝老師的指點。我現在寫的程序雖然不精簡，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
, x2 g) W; E6 u9 T1 [0 ?N30 T="D50"
! G& T8 G2 ~4 L/ c& yN40 M6
. P. e' o% l' |  F" @/ HN50 S3000 M3
( n( \/ f. {! {4 g# kN60 G00 X0 Y0 D1
/ g- y( y/ p5 G0 gN70 Z0.5
N80 R1=38
5 V& p+ f/ K0 G9 vN90 ZCX
N100 R1=38.015
N110 ZCX
" Y, J6 x. o$ Z2 VN120 R1=38.03
5 \! t) `- A) K, X) oN130 ZCX
  G6 E; `0 [1 }- W, f! |6 I6 \' ?! AN140 G0 Z300
' z2 W, m  A0 MN150 M30
子程序：G0 G41 X=-R1
+ A8 E- t  t+ h6 HG3 Z-67 I=R1 J0 TURN=3 F2000
: M9 k( y4 {2 x7 M( z5 jZ2.5 I=R1 J0 TURN=3
M17