0  BEGIN PGM 1015 MM 
1  FN 0: Q1 =+45
2  FN 0: Q2 =+5
3  FN 0: Q3 =+60
4  FN 0: Q4 =+2.5
5  FN 0: Q5 =+50
6  FN 0: Q6 =+50
7  FN 0: Q7 =+2
8  FN 0: Q8 =+20
9  BLK FORM 0.1 Z X+0 Y+0 Z-12
10 BLK FORM 0.2  X+100  Y+95  Z+0
11 TOOL CALL 225 Z S2000
12 CYCL DEF 1.0 TIEFBOHREN
13 CYCL DEF 1.1 ABST2
14 CYCL DEF 1.2 TIEFE-10
15 CYCL DEF 1.3 ZUSTLG10
16 CYCL DEF 1.4 V.ZEIT0
17 CYCL DEF 1.5 F1000
18 CC  X+Q5  Y+Q6
19 LP  PR+0  PA+0 R0 FMAX M3
20 CYCL DEF 10.0 DREHUNG
21 CYCL DEF 10.1  ROT+Q8
22 CALL LBL 2
23 L  Z+100 R0 F9999 M2
24 LBL 2
25 LP  PR+Q2  PA+0 R0 F9998
26 L  Z+Q7
27 FN 0: Q14 =+Q4
28 FN 0: Q13 =+Q3
29 FN 3: Q34 =+Q2 * +Q4
30 FN 3: Q33 =+Q2 * +Q3
31 FN 0: Q24 =+Q2
32 FN 0: Q23 =+0
33 LBL 1
34 FN 4: Q14 =+Q34 DIV +Q24
35 FN 4: Q13 =+Q33 DIV +Q24
36 FN 1: Q24 =+Q24 + +Q14
37 FN 1: Q23 =+Q23 + +Q13
38 LP  PR+Q24  PA+Q23 F9999
39 CYCL CALL
40 FN 11: IF +Q1 GT +Q24 GOTO LBL 1
41 LBL 0
42 END PGM 1015 MM