0 BEGIN PGM 10701_IT MM 
1 FN 11: IF +Q8 GT +0 GOTO LBL 199 ;Salto se non è possibile alcuna lavorazione
2 FN 11: IF +Q8 GT +Q2 GOTO LBL 199 ;Salto se non è possibile alcuna lavorazione
3 FN 1: Q21 =+Q1 + +Q2 ;Posizione di partenza in valore assoluto
4 FN 1: Q22 =+Q1 + +Q2 ;Profondità di preforatura in valore assoluto
5 FN 1: Q23 =+Q1 + +Q3 ;Altezza per scarico truciolo
6 FN 1: Q24 =+Q22 + +Q11 ;Profondità di preforatura con distanza di sicurezza
7 FN 1: Q28 =+Q1 + +Q8 ;Profondità finale in valore assoluto
8 FN 1: Q31 =+Q1 + +Q11 ;Distanza di sicurezza in valore assoluto
9 FN 1: Q32 =+Q1 + +Q12 ;2a distanza di sicurezza in valore assoluto
10 FN 0: Q33 =+0 ;Contatore incrementi
11 TOOL CALL  Z SQ14 ;Numero di giri per l'entrata nel foro pilota
12 L  Z+Q31 R0 FMAX M4 ;Posizionamento a distanza di sicurezza
13 L  Z+Q24 FQ4 ;Raggiungimento della posizione di partenza
14 L M5 ;Arresto mandrino
15 TOOL CALL  Z SQ6 ;N. giri foratura
16 L  Z+Q22 FQ5 M3 ;N. giri e avanzamento di lavorazione
17 LBL 2 ;Inizio rettifica
18 FN 1: Q21 =+Q21 + -Q7 ;Nuova profondità
19 FN 1: Q30 =+Q21 + +Q10 ;Altezza rottura truciolo
20 FN 1: Q33 =+Q33 + +1 ;Contatore per rottura truciolo
21 FN 1: Q34 =+Q30 + +Q11 ;Nuovo incremento Z
22 FN 9: IF +Q21 EQU +Q28 GOTO LBL 99 ;Profondità raggiunta?
23 FN 12: IF +Q21 LT +Q28 GOTO LBL 99 ;Profondità eccessiva?
24 L  Z+Q21 FQ5 ;Raggiungimento della nuova profondità
25 L  Z+Q30 FQ4 ;Rottura truciolo
26 FN 12: IF +Q33 LT +Q13 GOTO LBL 2 ;Conteggio delle rotture truciolo
27 FN 0: Q33 =+0 ;Reset contatore
28 L  Z+Q23 FQ4 ;Posizionamento ad altezza per scarico truciolo
29 CYCL DEF 9.0 TEMPO DI SOSTA
30 CYCL DEF 9.1 SOSTAQ9
31 L  Z+Q34 FQ4 ;Raggiungimento della posizione per successivo avanzamento in profondità
32 FN 11: IF +Q21 GT +Q28 GOTO LBL 2 ;Profondità raggiunta?
33 LBL 99
34 L  Z+Q28 FQ5 ;Posizionamento a profondità finale
35 LBL 100
36 CYCL DEF 9.0 TEMPO DI SOSTA
37 CYCL DEF 9.1 SOSTAQ9
38 TOOL CALL  SQ14 ;Numero di giri per uscita
39 L  Z+Q31 FQ4 ;Posizionamento a distanza di sicurezza
40 L  Z+Q32 FMAX ;Posizionamento a 2a distanza di sicurezza
41 L M5 ;Arresto mandrino
42 LBL 199
43 END PGM 10701_IT MM