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

laomei

老師好。最近一批活，在德瑪吉機床上用直徑50的磨頭磨一直徑76的孔，磨頭螺旋進螺旋出，編了一個西門子宏，本來是三刀就程序結束，現在這個程序上機卻是無限循環了，而且X尺寸38一直都毫無變化，能幫我看看這個程序是什么毛病嗎？謝謝！
* \0 p' x" f- s& _$ b. ^G40 G17 G710 G90
& ]1 E3 Y& }% Y2 ^( F8 }2 hG54
T="D50"
M6
S1200 M3
: m  }7 _$ J7 ~G00 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
G2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
IF R3<38.03 GOTOB KK
* j) I7 l- h* @1 o  e& M6 |' u0 UG0 Z300
; U; H4 V% X& F+ k( HM30

laomei

, D- Q, k3 b! U+ F9 A* ]7 d, N老師提供的程序還是無限循環，X還是毫無變化，但還是要謝謝老師的指點。我現在寫的程序雖然不精簡，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
N40 M6
& d& I$ B6 e. k. U; I" x* }N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
N80 R1=38
; a1 w* p* r# d0 X: B) GN90 ZCX
/ y; b$ m5 D& `' B) y0 PN100 R1=38.015
8 }& q9 a8 k* K( R& u( rN110 ZCX
N120 R1=38.03
/ d) A' i2 n+ _  aN130 ZCX
' |: p$ H. [. \5 x! r0 oN140 G0 Z300
! ^  {/ a) N& D' v. d9 P* qN150 M30
子程序：G0 G41 X=-R1
. k6 T( P% p" Y5 H) aG3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
, M0 Z2 r& l0 W# G2 w7 Z8 E$ eM17

zhang48926

西門子的不會