0  BEGIN PGM DRILLTAP MM 
1  BLK FORM 0.1 Z  X+0  Y-5  Z-20
2  BLK FORM 0.2  X+440  Y+5  Z+0
3  TOOL CALL 3 Z S4000
4  L M6
5  L  X+10  Y+0  Z+20 R0 FMAX
6  L  Z+2 R0 FMAX M13
7  CYCL DEF 200 DRILLING ~
    Q200=+2    ;SET-UP CLEARANCE ~
    Q201=-4    ;DEPTH ~
    Q206=+150  ;FEED RATE FOR PLNGNG ~
    Q202=+5    ;PLUNGING DEPTH ~
    Q210=+0    ;DWELL TIME AT TOP ~
    Q203=+0    ;SURFACE COORDINATE ~
    Q204=+50   ;2ND SET-UP CLEARANCE ~
    Q211=+0    ;DWELL TIME AT DEPTH
8  L M99
9  L IX+60 R0 FMAX M99
10 L IX+60 R0 FMAX M99
11 L IX+60 R0 FMAX M99
12 L IX+60 R0 FMAX M99
13 L IX+60 R0 FMAX M99
14 L IX+60 R0 FMAX M99
15 L IX+60 R0 FMAX M99
16 END PGM DRILLTAP MM