0  BEGIN PGM 7065 MM 
1  BLK FORM 0.1 Z X-35 Y+0 Z-50
2  BLK FORM 0.2  X+35  Y+100  Z+0
3  FN 0: Q1 =+0
4  FN 0: Q2 =+0
5  FN 0: Q3 =+0
6  FN 0: Q4 =+100
7  FN 0: Q5 =+100
8  FN 0: Q6 =+30
9  FN 0: Q7 =+90
10 FN 0: Q8 =+270
11 FN 0: Q9 =+10
12 FN 0: Q10 =+300
13 TOOL CALL 157 Z S8000
14 TOOL CALL  DL-Q108
15 FN 2: Q13 =+Q3 - +Q108
16 FN 1: Q14 =+Q4 + +Q108
17 FN 1: Q26 =+Q6 + -Q108
18 FN 2: Q27 =+Q8 - +Q7
19 FN 4: Q28 =+Q27 DIV +Q5
20 FN 1: Q29 =+Q9 + +Q108
21 FN 0: Q30 =+0
22 L  Z+100 R0 F9999
23 L  Y+Q13  X+Q1 R0 F9999 M3
24 L  Z+Q29 R0 F9999
25 CC  Z+Q2  X+Q1
26 LP  PR+Q26  PA+Q7 FQ10
27 LBL 1
28 CP IPA+Q28 DR+ FQ10
29 L  Y+Q14 FQ10
30 FN 1: Q30 =+Q30 + +1
31 FN 9: IF +Q30 EQU +Q5 GOTO LBL 99
32 CP IPA+Q28 DR+ FQ10
33 L  Y+Q13 FQ10
34 FN 1: Q30 =+Q30 + +1
35 FN 12: IF +Q30 LT +Q5 GOTO LBL 1
36 LBL 99
37 L  Z+50 R0 F9999 M2
38 END PGM 7065 MM