Mitsubishi C70

Appendix 1. Registering and Editing Fixed Cycle Programs
Appendix 1.5 Standard Fixed Cycle Subprogram
IV - 9
G84
G88
Tap cycle
G85
G89
Boring cycle
O840 TAP-CYCLE O850 BORING-CYCLE
G.1
IF[#30]GOTO2
M#24
Z#2
#2=##5#3003=#8OR1#3004=#9OR3
G1Z#3
G4P#4
M#6
#3900=1
G1Z-#3
#3004=#9
M#7
#3003=#8
IF[#24EQ#0]GOTO1
M#24+1
G4P#21
N1G0Z-#2
N2M99
G.1
IF[#30]GOTO2
M#24
Z#2
#2=##5#3003=#8OR1
G1Z#3
G4P#4
#3003=#8
Z-#3F#23
F#22
IF[#24EQ#0]GOTO1
M#24+1
G4P#21
N1G0Z-#2
N2M99