0 BEGIN PGM 10010_IT MM 1 ;Pezzo da fresare-tornire 2 ;Il pezzo grezzo corrisponde al 3 ;pezzo da lavorare che deve essere 4 ;realizzato con il programma 5 ;10005_it.h. 6 ; 7 ;Definizione del pezzo grezzo come 8 ;corpo simmetrico di rotazione il 9 ;cui profilo è definito nel 10 ;sottoprogramma BLANK 11 BLK FORM ROTATION Z DIM_D LBL "BLANK" 12 ; 13 ;Attivazione dell'origine 14 CYCL DEF 247 BEZUGSPUNKT SETZEN ~ Q339=+2 ;BEZUGSPUNKT-NUMMER 15 ; 16 ;Tornitura di sgrossatura esterna 17 ;Chiamata utensile per tornire sgrossatura 18 TOOL CALL "TURN_ROUGH" 19 ; 20 ;Chiamata sottoprogramma Modalità di tornitura 21 CALL LBL "TURN" 22 ;Chiamata sottoprogramma Raggiungimento della posizione di sicurezza 23 CALL LBL "SAFE" 24 ; 25 ;Adattamento del sistema di tornitura 26 CYCL DEF 800 KOORD.-SYST.ANPASSEN ~ Q497=+0 ;PRAEZESSIONSWINKEL ~ Q498=+0 ;WERKZEUG UMKEHREN ~ Q530=+0 ;ANGESTELLTE BEARB. ~ Q531=+0 ;ANSTELLWINKEL ~ Q532=+750 ;VORSCHUB ~ Q533=+0 ;VORZUGSRICHTUNG ~ Q535=+3 ;EXZENTERDREHEN ~ Q536=+0 ;EXZENTR. OHNE STOPP 27 ; 28 ;Velocità di taglio costante e definizione 29 ;del numero di giri massimo 30 FUNCTION TURNDATA SPIN VCONST:ON VC:400 SMAX800 31 ; 32 ;Azzeramento dell'asse orientabile e 33 ;attivazione del mandrino rotativo 34 L A+0 R0 FMAX M303 35 ; 36 ;Tornitura a sfacciare 37 CYCL DEF 821 ABSATZ PLAN ~ Q215=+0 ;BEARBEITUNGS-UMFANG ~ Q460=+2 ;SICHERHEITS-ABSTAND ~ Q493=+0 ;KONTURENDE DURCHMESSER ~ Q494=+0 ;KONTURENDE Z ~ Q463=+3 ;MAX. SCHNITTTIEFE ~ Q478=+0.3 ;VORSCHUB SCHRUPPEN ~ Q483=+0.4 ;AUFMASS DURCHMESSER ~ Q484=+0.2 ;AUFMASS Z ~ Q505=+0.2 ;VORSCHUB SCHLICHTEN ~ Q506=+0 ;KONTURGLAETTUNG 38 L X+122 Y+0 R0 FMAX ;Preposizionamento 39 L Z+5 R0 FMAX ;Raggiungimento dell'altezza di partenza 40 M99 ;Chiamata del ciclo 41 ; 42 ;Tornitura profilo 43 CYCL DEF 14.0 KONTUR 44 CYCL DEF 14.1 KONTURLABEL1 45 CYCL DEF 810 DREHEN KONTUR LAENGS ~ Q215=+0 ;BEARBEITUNGS-UMFANG ~ Q460=+2 ;SICHERHEITS-ABSTAND ~ Q499=+0 ;KONTUR UMKEHREN ~ Q463=+3 ;MAX. SCHNITTTIEFE ~ Q478=+0.3 ;VORSCHUB SCHRUPPEN ~ Q483=+0.4 ;AUFMASS DURCHMESSER ~ Q484=+0.2 ;AUFMASS Z ~ Q505=+0.2 ;VORSCHUB SCHLICHTEN ~ Q487=+1 ;EINTAUCHEN ~ Q488=+0 ;VORSCHUB EINTAUCHEN ~ Q479=+0 ;SCHNITTBEGRENZUNG ~ Q480=+0 ;GRENZWERT DURCHMESSER ~ Q482=+0 ;GRENZWERT Z ~ Q506=+0 ;KONTURGLAETTUNG 46 L X+122 Y+0 R0 FMAX ;Preposizionamento 47 L Z+5 R0 FMAX ;Raggiungimento dell'altezza di partenza 48 M99 ;Chiamata ciclo 49 ; 50 ;Fresatura superfici e fori 51 ;Chiamata sottoprogramma Modalità di fresatura 52 CALL LBL "MILL" 53 ;Chiamata sottoprogramma Raggiungimento della posizione di sicurezza 54 CALL LBL "SAFE" 55 ; 56 ;Chiamata utensile fresa a candela 57 TOOL CALL "MILL_D20_ROUGH" Z S3000 F500 58 ; 59 ;Foro al centro 60 L X+0 Y+0 Z+50 R0 FMAX M3 ;Preposizionamento 61 CYCL DEF 208 BOHRFRAESEN ~ Q200=+2 ;SICHERHEITS-ABST. ~ Q201=-40 ;TIEFE ~ Q206= AUTO ;VORSCHUB TIEFENZ. ~ Q334=+1.5 ;ZUSTELL-TIEFE ~ Q203=+0 ;KOOR. OBERFLAECHE ~ Q204=+50 ;2. SICHERHEITS-ABST. ~ Q335=+32 ;SOLL-DURCHMESSER ~ Q342=+0 ;VORGEB. DURCHMESSER ~ Q351=+1 ;FRAESART 62 M99 ;Chiamata ciclo 63 ; 64 ;Chiamata sottoprogramma Raggiungimento della posizione di sicurezza 65 CALL LBL "SAFE" 66 ; 67 ;Chiamata utensile fresa a candela 68 TOOL CALL "MILL_D10_ROUGH" Z S12000 F300 69 ; Q50 = 0 ;Angolo C corrente 70 ; 71 ;Ripetizione per inclinazione e fresatura superfici 72 LBL 2 73 PLANE SPATIAL SPA+0 SPB+0 SPC+Q50 STAY ;Orientamento del sistema di coordinate su angolo C corrente 74 ; 75 ;Spostamento origine su bordo di orientamento 76 CYCL DEF 7.0 NULLPUNKT 77 CYCL DEF 7.1 X+37 78 ; 79 PLANE RELATIV SPB+60 TURN MB MAX FMAX ;Rotazione di B relativa all’angolo C 80 ; 81 ;Fresatura superfici 82 L X+12 Y+0 Z+50 R0 FMAX M3 ;Preposizionamento 83 CYCL DEF 251 RECHTECKTASCHE ~ Q215=+0 ;BEARBEITUNGS-UMFANG ~ Q218=+28 ;1. SEITEN-LAENGE ~ Q219=+50 ;2. SEITEN-LAENGE ~ Q220=+0 ;ECKENRADIUS ~ Q368=+0 ;AUFMASS SEITE ~ Q224=+0 ;DREHLAGE ~ Q367=+0 ;TASCHENLAGE ~ Q207= AUTO ;VORSCHUB FRAESEN ~ Q351=+1 ;FRAESART ~ Q201=-12 ;TIEFE ~ Q202=+5 ;ZUSTELL-TIEFE ~ Q369=+0 ;AUFMASS TIEFE ~ Q206= AUTO ;VORSCHUB TIEFENZ. ~ Q338=+0 ;ZUST. SCHLICHTEN ~ Q200=+2 ;SICHERHEITS-ABST. ~ Q203=+12 ;KOOR. OBERFLAECHE ~ Q204=+50 ;2. SICHERHEITS-ABST. ~ Q370=+1 ;BAHN-UEBERLAPPUNG ~ Q366=+0 ;EINTAUCHEN ~ Q385= AUTO ;VORSCHUB SCHLICHTEN 84 M99 ;Chiamata del ciclo 85 ; 86 M140 MB MAX ;Disimpegno 87 PLANE RESET STAY ;Riposizionamento mediante calcolo 88 ;Reset dello spostamento origine 89 CYCL DEF 7.0 NULLPUNKT 90 CYCL DEF 7.1 X+0 91 CYCL DEF 7.2 Y+0 92 CYCL DEF 7.3 Z+0 93 ; Q50 = Q50 + 60 ;Ulteriore calcolo dell'angolo C 94 CALL LBL 2 REP5 ;Ripetizione 95 ; 96 ;Chiamata sottoprogramma Raggiungimento della posizione di sicurezza 97 CALL LBL "SAFE" 98 ; 99 ;Riposizionamento fisico 100 PLANE RESET TURN MB MAX 101 ; 102 ;Foratura inclinata 103 ;Chiamata utensile punta 104 TOOL CALL "DRILL_D8" Z S12000 F300 105 ; Q50 = 0 ;Angolo C corrente 106 ; 107 ;Ripetizione per inclinazione e foratura 108 LBL 3 109 PLANE SPATIAL SPA+0 SPB+0 SPC+Q50 STAY ;Orientamento del sistema di coordinate su angolo C corrente 110 ; 111 ;Spostamento origine su bordo di orientamento 112 CYCL DEF 7.0 NULLPUNKT 113 CYCL DEF 7.1 X+37 114 ; 115 PLANE RELATIV SPB+60 TURN MB MAX FMAX ;Rotazione di B relativa all’angolo C 116 ; 117 L X+12 Y+0 Z+50 R0 FMAX M3 ;Preposizionamento 118 CYCL DEF 200 BOHREN ~ Q200=+3 ;SICHERHEITS-ABST. ~ Q201=-35 ;TIEFE ~ Q206= AUTO ;VORSCHUB TIEFENZ. ~ Q202=+5 ;ZUSTELL-TIEFE ~ Q210=+0 ;VERWEILZEIT OBEN ~ Q203=+0 ;KOOR. OBERFLAECHE ~ Q204=+50 ;2. SICHERHEITS-ABST. ~ Q211=+0 ;VERWEILZEIT UNTEN 119 M99 ;Chiamata ciclo 120 ; 121 M140 MB MAX ;Disimpegno 122 PLANE RESET STAY ;Riposizionamento mediante calcolo 123 ;Reset dello spostamento origine 124 CYCL DEF 7.0 NULLPUNKT 125 CYCL DEF 7.1 X+0 126 CYCL DEF 7.2 Y+0 127 CYCL DEF 7.3 Z+0 128 ; Q50 = Q50 + 60 ;Ulteriore calcolo dell'angolo C 129 CALL LBL 3 REP5 ;Ripetizione 130 ; 131 ;Chiamata sottoprogramma Raggiungimento della posizione di sicurezza 132 CALL LBL "SAFE" 133 ; 134 ;Riposizionamento fisico 135 PLANE RESET TURN MB MAX 136 ; 137 ;Fine programma 138 M30 139 ; 140 ; 141 ;Sottoprogramma Modalità di tornitura 142 LBL "TURN" 143 M140 MB MAX ;Disimpegno 144 M145 ;Annullamento calcolo cinematica 145 FUNCTION MODE TURN ;Attivazione Modalità di tornitura 146 M144 ;Attivazione calcolo cinematica 147 M136 ;Commutazione avanzamento su mm al giro 148 LBL 0 149 ; 150 ;Sottoprogramma Modalità di fresatura 151 LBL "MILL" 152 M140 MB MAX ;Disimpegno 153 M145 ;Annullamento calcolo cinematica 154 FUNCTION MODE MILL ;Attivazione Modalità di fresatura 155 M137 ;Commutazione avanzamento su mm al minuto 156 ;Chiamata sottoprogramma Raggiungimento della posizione di sicurezza 157 CALL LBL "SAFE" 158 L C+0 A+0 R0 FMAX ;Azzeramento degli assi orientabili 159 LBL 0 160 ; 161 ;Sottoprogramma Raggiungimento della posizione di sicurezza 162 LBL "SAFE" 163 L X+400 Y+400 R0 FMAX M91 ;Posizione di sicurezza !A seconda della macchina! 164 LBL 0 165 ; 166 LBL 1 ;Descrizione profilo 167 L Z+0 X+80 168 L Z-17.32 X+100 169 L Z-28.0925 X+100 170 L Z-33 X+117 171 LBL 0 172 ; 173 ;Descrizione pezzo grezzo 174 LBL "BLANK" 175 L X+0 Z+2 176 L X+120 177 L Z-38 178 L Z-38 X+117 179 L Z-41.0937 X+100 180 L Z-55 X+100 181 L Z-55 X+108.9998 182 L Z-55.5 X+110 183 L Z-57.5 X+110 184 L Z-58 X+109 185 L Z-58 X+105 186 L Z-61.2192 X+105 187 CT Z-62.1894 X+103.4851 188 L Z-63.8106 X+90.5146 189 CT Z-64.7808 X+88.9997 190 L Z-68.2192 X+88.9997 191 CT Z-69.1894 X+90.5146 192 L Z-70.8106 X+103.4851 193 CT Z-71.7808 X+105 194 L Z-75 X+105 195 L Z-75 X+108.9998 196 L Z-75.5 X+110 197 L Z-77.5 X+110 198 L Z-78 X+109 199 L Z-78 X+92.7 200 L Z-81.2081 X+92.7 201 L Z-83.2 X+95 202 L Z-96 X+95 203 CT Z-98 X+91 204 L Z-98 X+85 205 L Z-93 206 L X+75 207 L Z-58 208 L X+32 209 L Z-38 210 L X+0 211 L Z+2 212 LBL 0 213 END PGM 10010_IT MM