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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
9 N2 O* `2 x3 {$ V- t+ t3 oG40 G17 G710 G90
G54
5 [9 Q1 f+ J) I! @' aT="D50"
. ~  {- ]9 S; H) l; EM6
S1200 M3
G00 X0 Y0 D1
' F2 M0 |  L7 j* O; w! H% HZ0.5
KK:R1=38 R2=0 R3=R1+R2
, W0 g8 C4 Q) }3 \* ?: r8 ?- iG0 G41 X=-R3
( Q# t3 t: c+ |4 X. CG3 Z-25 I=R3 J0 TURN=3 F400 M8
  |' a( f3 I/ U- K: xG2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
IF R3<38.03 GOTOB KK
+ b/ w: Y/ R& N2 H0 f* `G0 Z300
3 I  J( b' o" e* @6 M# DM30

laomei

9 j! o$ W* `0 C- O9 [6 k1 x老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
N20 G54
N30 T="D50"
N40 M6
" l9 ~( I0 K* Y8 g& R0 f+ L- M# ~6 [N50 S3000 M3
N60 G00 X0 Y0 D1
N70 Z0.5
  s1 ^7 S/ Z1 \- N+ J* [( c1 ^N80 R1=38
N90 ZCX
9 V* h. t+ u) _- l% M7 E# |8 B/ gN100 R1=38.015
N110 ZCX
N120 R1=38.03
N130 ZCX
, G& E9 R' ^5 }: N- K3 WN140 G0 Z300
( A; u. M" ?4 Z0 s5 Y# b) w: o$ {N150 M30
( h. I- J0 E& k1 ?' ?* k子程序：G0 G41 X=-R1
G3 Z-67 I=R1 J0 TURN=3 F2000
. U& j% z" \. p$ WZ2.5 I=R1 J0 TURN=3
, i6 a+ O, L& QM17

zhang48926

西门子的不会