Appendix 4. Registering/Editing the Fixed Cycle Program
4.5 Standard Fixed Cycle Subprogram (For L system)
IV-7
G75.1 (O751) Groove cutting cycle
G. 1 ;
#3003 = #8 OR 1 ;
G0 X #1 ;
G1 Y #2 ;
G0 Y − #2 ;
X #5 ;
1F [ #3 EQ 0 ] GOTO 1 ;
G1 X − #3 Y #4 ;
N1 G1 Y#6 ;
X − #7 ;
G0Y − #2 ;
X − #5 ;
1F [ #3 EQ 0 ] GOTO 2 ;
G1 X #3 Y #4 ;
N2 G1 Y#6 ;
X #7 ;
#3003 = #8 ;
G0Y − #2 ;
M99 ;
G76 (O760)
Compound thread cutting
cycle
G. 1 ;
#12 = 1 ;
#13 = #9 ;
1F [ ABS [ #13 ] GE [ ABS [ #8 ] ] ] GOTO 1 ;
#16 = 1 ;
#13 = #8 ;
N1 #11 = #13 ;
1F [ ABS [ #11 ] LT [ ABS [ #4 − #5 ] ] ] GOTO 2 ;
#11 = #4 − #5 ;
#14 = 1 ;
N2 #17 = #11 ;
#18 = ROUND [ [ #4 − #11 − #5 ] ∗ #7 ] ;
IF [ [ #18 XOR #1 ] GE 0 ] GOTO 10 ;
#18 = − #18 ;
N10 #19 = #18 ;
#10 = ROUND [ [ #11 + #5 ] ∗ #7 ] ;
IF [ [ #10 XOR #1 ] GE 0 ] GOTO 20 ;
#10 = − #10 ;
N20 G00 X#10 ;
#20 = #10
D0 1 ;
#15 = ROUND [ #10 ∗ #3/#1 ] ;
G00 Y #2 + #3 − #4 − #15 + #11 ;
G33 X#1 − #10 − #18 Y −#3 + #15 ;
G00 Y − #2 + #4 − #11 ;
IF [ #14 GT 0 ] GOTO 3 ;
IF [ #16 GT 0 ] GOTO 7 ;
#12 = #12 + 1 ;
#13 = ROUND [ #9 ∗ SQRT [ #12 ] ] ;