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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
: u! {% L- a2 W/ Q6 Z5 u% ~G40 G17 G710 G90
G54
' n! X! S: S$ s: _( \0 tT="D50"
5 T+ [; `9 d& lM6
S1200 M3
/ u) A1 h. _. y& p/ HG00 X0 Y0 D1
; y' C; \' c$ [& |0 v- ?Z0.5
3 [" G3 a/ B  W: X- s/ bKK:R1=38 R2=0 R3=R1+R2
5 s! t! D# v5 p$ O0 wG0 G41 X=-R3
% v3 y5 O9 R* ^- ?G3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
( v! t) p, {3 m# ZR2=R2+0.015
  e: ~2 N; v9 h- f. V) }5 z! `' dIF R3<38.03 GOTOB KK
& x/ F$ n# w1 d% W9 o' hG0 Z300
: n! J  T& u6 F1 b) N; zM30

laomei

老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
" M- v7 I3 R+ Z, R% J2 FN40 M6
N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
' O. L6 r# u- Y+ CN80 R1=38
N90 ZCX
  f& g7 M1 I% M9 {. |+ IN100 R1=38.015
) K7 o# c( ]: n4 G) Y  F! oN110 ZCX
7 G& ?. x' X( I3 j0 G0 n7 |N120 R1=38.03
N130 ZCX
# H8 X! y. I) CN140 G0 Z300
( y/ }/ y, b& h& f& C' b* {( q0 qN150 M30
' J9 V9 z7 T8 L子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
0 i# M' ~' f- K; q. gZ2.5 I=R1 J0 TURN=3
7 R6 b5 Z* B; i3 ?M17

zhang48926

西门子的不会