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

laomei

老师好。最近一批活，在德玛吉机床上用直径50的磨头磨一直径76的孔，磨头螺旋进螺旋出，编了一个西门子宏，本来是三刀就程序结束，现在这个程序上机却是无限循环了，而且X尺寸38一直都毫无变化，能帮我看看这个程序是什么毛病吗？谢谢！
. L9 _. H  V2 WG40 G17 G710 G90
G54
. t) q( J1 h) S. l# R+ [/ dT="D50"
" l. L: t; u) I7 fM6
S1200 M3
, ?' C( h& }  V6 r$ V/ o" LG00 X0 Y0 D1
/ K! E5 b0 {' m0 g3 rZ0.5
KK:R1=38 R2=0 R3=R1+R2
2 a) Z  ^* g4 m, f% ^: SG0 G41 X=-R3
0 K" h' x2 M% x6 G5 D6 Z2 cG3 Z-25 I=R3 J0 TURN=3 F400 M8
G2 Z0.5 I=R3 J0 TURN=3
R2=R2+0.015
- f. ^6 Y7 X  EIF R3<38.03 GOTOB KK
G0 Z300
, C# H5 w, R: _6 BM30

laomei

老师提供的程序还是无限循环，X还是毫无变化，但还是要谢谢老师的指点。我现在写的程序虽然不精简，但能用，程序如下：N10 G40 G17 G710 G90
; M' u4 O; X! O$ K$ w6 fN20 G54
1 h1 k* s! [' m- E! pN30 T="D50"
+ l  B7 u$ v8 I$ n' l5 lN40 M6
N50 S3000 M3
& g. a/ V9 ?. _* T3 vN60 G00 X0 Y0 D1
7 M- b0 |5 d7 Y3 [8 G6 e0 fN70 Z0.5
N80 R1=38
9 s& _6 Y2 V% c. [  P! lN90 ZCX
N100 R1=38.015
3 i( V5 i& T1 ~6 n& P* L% nN110 ZCX
0 y2 B$ n4 u, I% e6 U2 BN120 R1=38.03
N130 ZCX
9 \7 [- G4 J' k! ~3 u7 K& ~N140 G0 Z300
N150 M30
子程序：G0 G41 X=-R1
- t( d4 D8 g. r  q) d/ H2 hG3 Z-67 I=R1 J0 TURN=3 F2000
Z2.5 I=R1 J0 TURN=3
M17

zhang48926

西门子的不会