0  BEGIN PGM 1110 MM 
1  FN 0: Q31 =+40
2  FN 0: Q32 =+0
3  FN 0: Q33 =+50
4  FN 0: Q34 =+50
5  FN 0: Q35 =+30
6  FN 0: Q36 =+12
7  FN 0: Q40 =+10
8  FN 0: Q41 =-30
9  FN 0: Q42 =+25
10 FN 0: Q43 =+2
11 FN 0: Q44 =+1200
12 FN 2: Q37 =+Q36 - +2
13 FN 4: Q45 =+Q40 DIV +2
14 FN 3: Q46 =+Q42 * +360
15 BLK FORM 0.1 Z X+0 Y+0 Z-40
16 BLK FORM 0.2  X+100  Y+100  Z+0
17 TOOL CALL 6 Z S8000
18 L  Z+100 R0 FMAX M3
19 CYCL DEF 12.0 PGM CALL
20 CYCL DEF 12.1 PGM 11101.h
21 CALL LBL 1
22 L  Z+50 R0 F9999 M2
23 LBL 1
24 CC  X+Q33  Y+Q34
25 LP  PR+Q31  PA+Q32 R0 F9999
26 CYCL CALL
27 LBL 2
28 CC  X+Q33  Y+Q34
29 LP IPA+Q35 F9999
30 CYCL CALL
31 CALL LBL 2 REPQ37
32 LBL 0
33 END PGM 1110 MM