0  BEGIN PGM 7060 MM 
1  BLK FORM 0.1 Z X-55 Y+0 Z-55
2  BLK FORM 0.2  X+55  Y+100  Z+0
3  FN 0: Q1 =+0
4  FN 0: Q2 =-50.1
5  FN 0: Q3 =+0
6  FN 0: Q4 =+100
7  FN 0: Q5 =+50
8  FN 0: Q6 =+50
9  FN 0: Q7 =+10
10 FN 0: Q8 =+600
11 FN 0: Q9 =+300
12 TOOL CALL 156 Z S8000
13 TOOL CALL  Z DL-Q108
14 FN 2: Q13 =+Q3 - +Q108
15 FN 1: Q14 =+Q4 + +Q108
16 FN 2: Q15 =+Q14 - +Q13
17 FN 4: Q16 =+Q15 DIV +Q5
18 FN 2: Q17 =+Q5 - +1
19 FN 1: Q18 =+Q6 + +Q108
20 FN 1: Q19 =+Q1 + +Q18
21 FN 2: Q20 =+Q1 - +Q18
22 FN 1: Q26 =+Q6 + +Q108
23 L  Z+100 R0 F9999
24 L  X+Q19  Y+Q13 R0 F9999 M3
25 L  Z+Q7 R0 F9999
26 CC  X+Q1  Z+Q2
27 LBL 1
28 L  X+Q19 R0 FMAX
29 LP  PR+Q26  PA+90 FQ9
30 L IY+Q16 R0 FQ8
31 CP IPA-90 DR- FQ8
32 L  Z+Q7 R0 F9999
33 CALL LBL 1 REPQ17
34 L  X+Q20  Y+Q14 R0 F9999
35 CC  X+Q1  Z+Q2
36 LBL 2
37 L  X+Q20 R0 FMAX
38 LP  PR+Q26  PA-90 FQ9
39 L IY-Q16 R0 FQ8
40 CP IPA+90 DR+ FQ8
41 L  Z+Q7 R0 F9999
42 CALL LBL 2 REPQ17
43 L  Z+100 R0 F9999 M2
44 END PGM 7060 MM