0 BEGIN PGM 7095_it MM 
1 ;Programma per realizzare un imbuto
2 ;rettangolare e una tasca sul fondo.
3 ;Definizione degli spigoli in X e Y.
4 ;
5 BLK FORM 0.1 Z X+0 Y+0 Z-32
6 BLK FORM 0.2  X+100  Y+100  Z+0
7 ;
8 ;Chiamata utensile fresa
9 TOOL CALL 8 Z S4000
10 ;
11 L  Z+50 R0 FMAX M3
12 ;Definizione degli spigoli in alto
13 FN 0: Q71 =+10 ;1. SPIGOLO COORDINATA X
14 FN 0: Q72 =+10 ;1. SPIGOLO COORDINATA Y
15 FN 0: Q73 =+10 ;2. SPIGOLO COORDINATA X
16 FN 0: Q74 =+90 ;2. SPIGOLO COORDINATA Y
17 FN 0: Q75 =+90 ;3. SPIGOLO COORDINATA X
18 FN 0: Q76 =+90 ;3. SPIGOLO COORDINATA Y
19 FN 0: Q77 =+90 ;4. SPIGOLO COORDINATA X
20 FN 0: Q78 =+10 ;4. SPIGOLO COORDINATA Y
21 FN 0: Q79 =+8 ;RAGGIO DELL'ANGOLO
22 ;
23 ;Definizione degli spigoli in basso
24 FN 0: Q81 =+30 ;1. SPIGOLO COORDINATA X
25 FN 0: Q82 =+30 ;1. SPIGOLO COORDINATA Y
26 FN 0: Q83 =+30 ;2. SPIGOLO COORDINATA X
27 FN 0: Q84 =+70 ;2. SPIGOLO COORDINATA Y
28 FN 0: Q85 =+70 ;3. SPIGOLO COORDINATA X
29 FN 0: Q86 =+70 ;3. SPIGOLO COORDINATA Y
30 FN 0: Q87 =+70 ;4. SPIGOLO COORDINATA X
31 FN 0: Q88 =+30 ;4. SPIGOLO COORDINATA Y
32 FN 0: Q89 =+14.9 ;RAGGIO DELL'ANGOLO
33 ;
34 ;Dati di taglio
35 FN 0: Q90 =+100 ;AVANZAMENTO IN PROFONDITA'
36 FN 0: Q91 =+250 ;AVANZAMENTO FRESATURA
37 FN 0: Q24 =+1 ;SOVRAMETALLO LATERALE
38 FN 0: Q25 =+2 ;DISTANZA DI SICUREZZA
39 FN 0: Q26 =+3 ;PROFONDITA' INCREMENTO TASCA IN BASSO
40 FN 0: Q27 =+25 ;NUMERO DI AVANZAMENTI IN PROFONDITA' IMBUTO
41 FN 0: Q28 =+25 ;PROFONDITA' IMBUTO
42 FN 0: Q29 =+30 ;PROFONDITA' TASCA IN BASSO (ASSOLUTO)
43 ;Chiamata programma 70951_it
44 CALL PGM 70951_it.h
45 ;
46 ;Fine programma
47 L  Z+200 R0 FMAX M30
48 END PGM 7095_it MM