0 BEGIN PGM 1035_IT MM 
1 ;Sequenza di foratura con riduzione
2 ;esponenziale della profondità di
3 ;penetrazione. Nel primo passo la
4 ;foratura viene eseguita con la profondità
5 ;di penetrazione definita. Negli
6 ;avanzamenti seguenti la profondità di
7 ;penetrazione viene ridotta in modo
8 ;esponenziale fino a raggiungere la
9 ;profondità incremento minima. Tutti gli
10 ;avanzamenti seguenti vengono eseguiti con
11 ;questo avanzamento minimo. Gli avanzamenti
12 ;vengono ripetuti fino a raggiungere la
13 ;profondità di foratura. Dopo gli
14 ;avanzamenti il ritorno viene eseguito a
15 ;distanza di sicurezza sulla base del foro.
16 ;Se si raggiunge un numero di avanzamenti
17 ;definito dall'operatore, l'utensile viene
18 ;ritirato completamente dal foro per
19 ;scaricare il truciolo.
20 ;I calcoli e i movimenti traiettoria per
21 ;la sequenza di foratura sono presenti in
22 ;un programma principale separato che è
23 ;definito in un ciclo 12 e quindi richiamato
24 ;con M99 nella posizione di foratura. In
25 ;questo programma si definiscono i parametri
26 ;necessari, l'utensile e le posizioni di
27 ;foratura in cui viene richiamato il ciclo 12
28 ;con M99 o Cycl Call. Nel secondo programma
29 ;non è necessario apportare alcuna modifica.
30 ;
31 BLK FORM 0.1 Z X+0 Y-10 Z-40
32 BLK FORM 0.2  X+40  Y+10  Z+0
33 ;
34 ;Immissione parametri
35 FN 0: Q1 =+1 ;DISTANZA DI SICUREZZA
36 FN 0: Q2 =-40 ;PROFONDITA'
37 FN 0: Q3 =-8 ;1. PROFONDITA' DI PENETRAZIONE
38 FN 0: Q4 =+1 ;TEMPO ATTESA SOPRA
39 FN 0: Q5 =+200 ;AVANZAMENTO IN PROFONDITA'
40 FN 0: Q6 =+0 ;COORDINATA SUPERFICIE
41 FN 0: Q7 =+15 ;2. DISTANZA DI SICUREZZA
42 FN 0: Q8 =+0.5 ;FATTORE DI REGRESSIONE
43 FN 0: Q9 =+3 ;NUMERO DEGLI AVANZAMENTI FINO AL
44 ;            ;RITIRO PER SCARICO TRUCIOLO
45 FN 0: Q10 =-5 ;PROFONDITA' DI PENETRAZIONE MINIMA
46 FN 0: Q11 =+1 ;TEMPO ATTESA SOTTO
47 ;Immissione parametri terminata
48 ;
49 ;Chiamata utensile punta
50 TOOL CALL 223 Z S1000
51 ;
52 ;Posizionamento ad altezza di sicurezza
53 L  Z+20 R0 F9998 M3
54 ;
55 ;Definizione della sequenza di foratura come ciclo
56 CYCL DEF 12.0 PGM CALL
57 CYCL DEF 12.1 PGM 10351_it.H
58 ;
59 ;Raggiungimento della posizione di foratura e chiamata ciclo
60 L  X+5  Y+0 R0 M99
61 L  X+30 M99
62 ;
63 ;Disimpegno e fine programma
64 L  Z+20 M2
65 END PGM 1035_IT MM