0 BEGIN PGM 1070_NL MM 
1 ;Programma voor een boorbewerking waarbij het
2 ;gereedschap in een voorboorgat wordt
3 ;verplaatst voordat de bewerking wordt gestart.
4 ;De verplaatsing naar het voorboorgat vindt
5 ;linksom met een afzonderlijk te definiëren
6 ;toerental plaats.
7 ;
8 FN 0: Q1 =+0 ;COÖRDINATEN OPPERVLAK
9 FN 0: Q2 =-20 ;DIEPTE VOORBOORGAT
10 FN 0: Q3 =-10 ;TERUGTREKHOOGTE VOOR VERSPANEN
11 FN 0: Q4 =+2000 ;AANZET INSTEKEN
12 FN 0: Q5 =+200 ;AANZET BOREN
13 FN 0: Q14 =+100 ;TOERENTAL INSTEKEN
14 FN 0: Q6 =+2000 ;TOERENTAL BOREN
15 FN 0: Q7 =+5 ;DIEPTE-INSTELLING
16 FN 0: Q8 =-76 ;DIEPTE
17 FN 0: Q9 =+0.5 ;STILSTANDTIJD ONDER
18 FN 0: Q10 =+1 ;TERUGTREKKEN SPAANBREKEN
19 FN 0: Q11 =+2 ;VEILIGHEIDSAFSTAND
20 FN 0: Q12 =+30 ;2. VEILIGHEIDSAFSTAND
21 FN 0: Q13 =+2 ;AANTAL SPAANBREUKEN TOT VERSPANEN
22 ;
23 BLK FORM 0.1 Z X+0 Y+0 Z-70
24 BLK FORM 0.2  X+50  Y+50  Z+0
25 ;
26 ;Gereedschapsoproep boor
27 TOOL CALL 237 Z
28 ;
29 ;Definitie van programma 10701_nl.h als cyclus
30 CYCL DEF 12.0 PGM CALL
31 CYCL DEF 12.1 PGM 10701_nl.h
32 ;
33 ;Benaderen van de posities en cyclusoproep
34 L  X+25  Y+25 R0 FMAX M99
35 ;
36 ;Verplaatsen naar veilige hoogte en programma-einde
37 L  Z+50 FMAX M2
38 END PGM 1070_NL MM