0 BEGIN PGM 7090_it MM 
1 ;Programma per realizzare un
2 ;imbuto rettangolare e una tasca
3 ;sul fondo.
4 ;Definizione di tutti gli spigoli
5 ;in X e Y
6 ;
7 BLK FORM 0.1 Z  X+0  Y+0  Z-32
8 BLK FORM 0.2  X+100  Y+100  Z+0
9 ;
10 ;Chiamata utensile fresa
11 TOOL CALL 6 Z S4000
12 ;
13 L  Z+50 R0 FMAX M3
14 ;Definizione degli spigoli in alto
15 FN 0: Q1 =+10 ;1. SPIGOLO COORDINATA X
16 FN 0: Q2 =+10 ;1. SPIGOLO COORDINATA Y
17 FN 0: Q3 =+10 ;2. SPIGOLO COORDINATA X
18 FN 0: Q4 =+90 ;2. SPIGOLO COORDINATA Y
19 FN 0: Q5 =+90 ;3. SPIGOLO COORDINATA X
20 FN 0: Q6 =+90 ;3. SPIGOLO COORDINATA Y
21 FN 0: Q7 =+90 ;4. SPIGOLO COORDINATA X
22 FN 0: Q8 =+10 ;4. SPIGOLO COORDINATA Y
23 FN 0: Q9 =+8 ;RAGGIO DELL'ANGOLO
24 ;
25 ;Definizione degli spigoli in basso
26 FN 0: Q11 =+30 ;1. SPIGOLO COORDINATA X
27 FN 0: Q12 =+30 ;1. SPIGOLO COORDINATA Y
28 FN 0: Q13 =+30 ;2. SPIGOLO COORDINATA X
29 FN 0: Q14 =+70 ;2. SPIGOLO COORDINATA Y
30 FN 0: Q15 =+70 ;3. SPIGOLO COORDINATA X
31 FN 0: Q16 =+70 ;3. SPIGOLO COORDINATA Y
32 FN 0: Q17 =+70 ;4. SPIGOLO COORDINATA X
33 FN 0: Q18 =+30 ;4. SPIGOLO COORDINATA Y
34 FN 0: Q19 =+14.9 ;RAGGIO DELL'ANGOLO
35 ;
36 ;Dati di taglio
37 FN 0: Q20 =+100 ;AVANZAMENTO IN PROFONDITA'
38 FN 0: Q21 =+250 ;AVANZAMENTO FRESATURA
39 FN 0: Q24 =+1 ;SOVRAMETALLO LATERALE
40 FN 0: Q25 =+2 ;DISTANZA DI SICUREZZA
41 FN 0: Q26 =+3 ;PROFONDITA' INCREMENTO TASCA
42 FN 0: Q27 =+20 ;NUMERO DI AVANZAMENTI IN PROFONDITA' IMBUTO
43 FN 0: Q28 =+25 ;PROFONDITA' IMBUTO
44 FN 0: Q29 =+30 ;PROFONDITA' TASCA IN BASSO (ASSOLUTO)
45 ;Chiamata programma 70901_it
46 CALL PGM 70901_it.h
47 ;
48 ;Fine programma
49 L  Z+200 R0 FMAX M2
50 END PGM 7090_it MM