0 BEGIN PGM 3200_IT MM 
1 ;Programma NC per la creazione di un passacavo.
2 ;Si compone di un foro e di una scanalatura che
3 ;vengono arrotondate con un raggio definito come
4 ;protezione antipiegatura. La lavorazione viene
5 ;eseguita con un solo utensile.
6 ;All'inizio del programma si definiscono tutti i
7 ;parametri necessari per la lavorazione e
8 ;l'utensile. Per questo occorre verificare che
9 ;possa penetrare in verticale e la lunghezza del
10 ;tagliente nell'asse utensile sia più lunga del
11 ;raggio di arrotondamento da creare.
12 ;Il controllo numerico posiziona in seguito
13 ;l'utensile dapprima nella posizione di foratura
14 ;e quindi alla distanza di sicurezza. Il controllo
15 ;numerico porta quindi l'utensile alla profondità
16 ;di foratura con un avanzamento di foratura
17 ;definito. Una volta raggiunta la profondità di
18 ;foratura, il controllo numerico ritira l'utensile
19 ;alla profondità della scanalatura e percorre quindi
20 ;la lunghezza della scanalatura in avanzamento di
21 ;fresatura. Assicurarsi che questo movimento venga
22 ;sempre eseguito in direzione X+. La direzione della
23 ;scanalatura si definisce con il parametro Rotazione.
24 ;Una volta raggiunto il punto finale della scanalatura,
25 ;il controllo numerico porta l'utensile alla distanza
26 ;di sicurezza e quindi di nuovo al centro del foro.
27 ;Qui sposta l'utensile nell'asse Z sul punto di
28 ;partenza dell'arrotondamento.
29 ;Il controllo numerico divide l'arrotondamento in
30 ;singole sezioni lineari e le percorre in una
31 ;ripetizione di blocchi di programma. Il numero delle
32 ;traiettorie si stabilisce nel parametro Q12.
33 ;
34 ;
35 ;
36 BLK FORM 0.1 Z X-10 Y-10 Z-30
37 BLK FORM 0.2  X+30  Y+10  Z+0
38 ;
39 ;IMMISSIONE
40 FN 0: Q1 =+0 ;POSIZIONE X FORO
41 FN 0: Q2 =+0 ;POSIZIONE Y FORO
42 FN 0: Q3 =+10 ;POSIZIONE DI ROTAZIONE
43 FN 0: Q4 =+2 ;DISTANZA DI SICUREZZA
44 FN 0: Q5 =-30 ;PROFONDITA' DI FORATURA
45 FN 0: Q6 =+300 ;AVANZAMENTO IN PROFONDITA'
46 FN 0: Q7 =-5 ;PROFONDITA' SCANALATURA
47 FN 0: Q8 =+6000 ;INVERS. AVANZAMENTO
48 FN 0: Q9 =+20 ;LUNGHEZZA SCANALATURA
49 FN 0: Q10 =+1000 ;AVANZAMENTO FRESATURA
50 FN 0: Q11 =+10 ;RAGGIO DELLO SMUSSO
51 FN 0: Q12 =+45 ;NUMERO DI INCREMENTI NEL RAGGIO
52 ;FINE IMMISSIONE
53 ;
54 ;Chiamata utensile fresa
55 TOOL CALL 5 Z S9000
56 L  Z+100 R0 FMAX M3 ;Disimpegno
57 ;
58 ;Calcoli
59 FN 2: Q21 =+Q7 - +Q11 ;Centro cerchio Z
60 FN 4: Q22 =+90 DIV +Q12 ;Passo angolare
61 FN 2: Q23 =+Q12 - +1 ;Numero di ripetizioni
62 ;Fine calcoli
63 ;
64 ;Spostamento origine al centro del foro
65 CYCL DEF 7.0 PUNTO ZERO
66 CYCL DEF 7.1  X+Q1
67 CYCL DEF 7.2  Y+Q2
68 ;Rotazione
69 CYCL DEF 10.0 ROTAZIONE
70 CYCL DEF 10.1  ROT+Q3
71 ;
72 L  X+0  Y+0 R0 FMAX ;Preposizionamento al centro del foro
73 L  Z+Q4 F9999  ;Posizionamento alla distanza di sicurezza
74 L  Z+Q5 FQ6 ;Foratura
75 L  Z+Q7 FQ8 ;Ritorno alla profondità della scanalatura
76 L  X+Q9 FQ10 ;Fresatura scanalatura
77 L  Z+Q4 FQ8 ;Ritorno a distanza di sicurezza
78 L  X+0  Y+0 R0 FMAX ;Preposizionamento al centro del foro
79 CC  Z+Q21  X+Q11 ;Centro raggio
80 LP  PR+Q11  PA-90 R0 FQ6 ;Raggiungimento del punto di partenza arrotondamento
81 LBL 2 ;Loop
82 LP IPA+Q22 FQ10 ;Spostamento del passo angolare
83 CALL LBL 2 REPQ23 ;Ripetizione loop
84 L  Z+Q4 R0 FMAX ;Posizionamento alla distanza di sicurezza
85 L  Z+100 R0 FMAX M5 ;Disimpegno
86 ;
87 ;Reset spostamento origine e rotazione
88 CYCL DEF 10.0 ROTAZIONE
89 CYCL DEF 10.1  ROT+0
90 CYCL DEF 7.0 PUNTO ZERO
91 CYCL DEF 7.1  X+0
92 CYCL DEF 7.2  Y+0
93 CYCL DEF 7.3  Z+0
94 M30 ;Fine programma
95 END PGM 3200_IT MM