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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
8 P6 e( m4 L/ E) t& _# xG40 G17 G710 G90
- u$ J" q2 c+ q: {+ T; U7 x: KG54
T="D50"
9 o9 O' l4 B5 J5 eM6
2 s; B+ H: ?) DS1200 M3
G00 X0 Y0 D1
Z0.5
) j! Y$ l* z3 [$ fKK:R1=38 R2=0 R3=R1+R2
/ x" O! G  C$ Z  zG0 G41 X=-R3
G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
6 a# ^/ _6 v8 F- o9 LR2=R2+0.015
IF R3<38.03 GOTOB KK
G0 Z300
M30

laomei

) A; @5 f( G2 o+ n' P
老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
, @' d$ Z; e- s- n5 EN30 T="D50"
N40 M6
; H1 n% N5 Y# Q2 @& p/ x$ F: wN50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
$ M3 ^9 Y, `' Q. C+ c( |  Z4 mN80 R1=38
. g. s2 Q- C* ?' X; \N90 ZCX
3 H: Y, e' D; d" Y1 Z& u& wN100 R1=38.015
' P$ h5 U2 Q: Y/ z; i! wN110 ZCX
8 j) B& _, @- u% c1 d) ]6 ]N120 R1=38.03
N130 ZCX
N140 G0 Z300
8 l4 I2 O% E) C, WN150 M30
5 |, I6 U# T5 T1 j2 n0 t子程序：G0 G41 X=-R1
+ W( A& t  G% w) E: DG3 Z-67 I=R1 J0 TURN=3 F2000
0 J/ C$ w5 e  V9 g/ Q6 W- eZ2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会