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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
G40 G17 G710 G90
G54
T="D50"
7 K- r. g( o" oM6
8 R) ?, ^( Q6 y- m. RS1200 M3
; h( B; J( N6 {G00 X0 Y0 D1
! |9 n" u- \( r' e& }7 DZ0.5
3 R5 P  t/ F: M  x: |  G) XKK:R1=38 R2=0 R3=R1+R2
' c9 |4 U+ _; T% _; }& {G0 G41 X=-R3
) b2 ?; @7 ~: ^/ h- |G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
1 Z9 Y9 y6 f# d  p4 D- Q) t0 K$ M$ XR2=R2+0.015
2 H( W6 I( h/ p; P4 j) n6 tIF R3<38.03 GOTOB KK
G0 Z300
3 B9 w8 B; D  t! H8 f4 ]  I9 ]M30

laomei

5 a5 ~/ T8 d+ R/ |) s
" B+ I- T2 W" P$ a0 x0 G老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
- _) v# V+ @! \6 q* p5 {N40 M6
N50 S3000 M3
5 N7 ~. B3 V9 B& V" A( KN60 G00 X0 Y0 D1
3 T- t7 P4 V# p! l+ V0 N- Y7 X  MN70 Z0.5
, Q  Q! D( l# @- g2 w  y. d8 tN80 R1=38
N90 ZCX
% e$ {- D" c* w7 K& c  _N100 R1=38.015
) |! l% S1 W9 @1 H7 Z$ zN110 ZCX
. C. J1 J5 Q0 q* g" [1 ^+ IN120 R1=38.03
N130 ZCX
  l2 \1 b6 f4 |% B/ R* [N140 G0 Z300
9 b0 p/ a7 f( O  L* oN150 M30
5 B# S8 j, u  o4 z+ P子程序：G0 G41 X=-R1
9 R# Z. }1 e) l) i5 s1 |G3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会