0 BEGIN PGM 4230_IT MM 
1 ;Programma NC per la lavorazione di una coclea
2 ;di alimentazione. La forma del corpo con
3 ;relativi sottosquadri rende necessaria
4 ;l'inclinazione dell'utensile durante la
5 ;lavorazione. Dovendo eseguire un movimento di
6 ;compensazione di uno degli assi rotativi per
7 ;la fresatura dei raggi, è stata impiegata la
8 ;funzione TCPM.
9 ;La lavorazione è suddivisa in tre fasi:
10 ;sgrossatura, prefinitura e finitura.
11 ;In questo programma principale si definiscono
12 ;tutti i parametri e gli utensili necessari.
13 ;Si definiscono dapprima alcuni parametri
14 ;generali. Successivamente si definiscono
15 ;l'utensile e alcuni parametri per ciascuna
16 ;fase di lavoro. Terminata la definizione viene
17 ;eseguita la chiamata di un altro programma NC.
18 ;Nello stesso programma il controllo numerico
19 ;calcola tutti gli altri dati richiesti e lavora
20 ;il corpo.
21 ;Il profilo del corpo nel piano X/Y è programmato
22 ;anch'esso nel programma chiamato.
23 ;!Importante! La lavorazione deve essere eseguita
24 ;con frese sferiche. È inoltre necessario tenere
25 ;presente che questo programma è creato per una
26 ;macchina con la cinematica testa B e tavola C.
27 ;
28 BLK FORM 0.1 Z X-35 Y-35 Z-40
29 BLK FORM 0.2  X+35  Y+35  Z+0
30 ;
31 ;Immissione parametr
32 FN 0: Q9 =+3 ;PUNTO DI PARTENZA NELL'ASSE Z
33 FN 0: Q1 =-40 ;PUNTO FINALE NELL'ASSE Z
34 FN 0: Q2 =+45 ;ROTAZIONE DEL PROFILO
35 FN 0: Q5 =+25 ;ALTEZZA DI SICUREZZA
36 FN 0: Q6 =+45 ;RAGGIO DI SICUREZZA
37 ;
38 ;Sgrossatura
39 ;
40 ;Chiamata utensile per sgrossatura
41 TOOL CALL "BALL_MILL_D10" Z S3000 F1000
42 TOOL CALL  DL-Q108 ;Compensazione lineare al centro della sfera
43 ;
44 ;Parametri per la sgrossatura
45 FN 0: Q3 =-2 ;PROFONDITA' DI PENETRAZIONE
46 FN 0: Q4 =+90 ;ANGOLO DI INCLINAZIONE DELL'ASSE B
47 FN 0: Q7 =+5 ;SOVRAMETALLO
48 CALL PGM 42301_it.h
49 ;
50 ;Chiamata utensile per prefinitura
51 TOOL CALL "BALL_MILL_D8" Z S18000 F1000
52 TOOL CALL  DL-Q108 ;Compensazione lineare al centro della sfera
53 ;
54 ;Parametri per la prefinitura
55 FN 0: Q3 =-1 ;PROFONDITA' DI PENETRAZIONE
56 FN 0: Q4 =+75 ;ANGOLO DI INCLINAZIONE DELL'ASSE B
57 FN 0: Q7 =+1 ;SOVRAMETALLO
58 CALL PGM 42301_it.h
59 ;
60 ;Chiamata utensile per la finitura
61 TOOL CALL "BALL_MILL_D6" Z S20000 F600
62 TOOL CALL  DL-Q108 ;Compensazione lineare al centro della sfera
63 ;
64 ;Parametri per la finitura
65 FN 0: Q3 =-0.5 ;PROFONDITA' DI PENETRAZIONE
66 FN 0: Q4 =+60 ;ANGOLO DI INCLINAZIONE DELL'ASSE B
67 FN 0: Q7 =+0 ;SOVRAMETALLO
68 CALL PGM 42301_it.h
69 ;
70 ;Fine programma
71 M30
72 END PGM 4230_IT MM