0 BEGIN PGM 13_002_2_FR MM 1 ;Programme permettant d'usiner la face avant 2 ;du boîtier de la montre. 3 ;Il est possible de se servir des perçages 4 ;réalisés par l'arrière de la pièce pour 5 ;déterminer le désalignement de celle-ci, 6 ;ainsi que les points d'origine en X et en Y. 7 ; 8 BLK FORM 0.1 Z X-49 Y+0 Z-38 9 BLK FORM 0.2 X+49 Y+85 Z+5 10 ; 11 ;Réinitialisation de l'inclinaison et du 12 ;point zéro 13 CALL LBL "RESET" 14 ; 15 ;Appel de l'outil pour la surface transversale, 16 ;l'épaulement et la poche circulaire 17 TOOL CALL 11 Z S9550 F2000 18 L Z+100 R0 FMAX M3 19 ; 20 ;Usinage de la surface transversale 21 CYCL DEF 233 FRAISAGE TRANSVERSAL ~ Q215=+0 ;OPERATIONS D'USINAGE ~ Q389=+4 ;STRATEGIE FRAISAGE ~ Q350=+1 ;SENS DE FRAISAGE ~ Q218=+100 ;1ER COTE ~ Q219=+100 ;2EME COTE ~ Q227=+5 ;PT INITIAL 3EME AXE ~ Q386=+0 ;POINT FINAL 3EME AXE ~ Q369=+0.2 ;SUREP. DE PROFONDEUR ~ Q202=+5 ;PROF. PLONGEE MAX. ~ Q370=+1 ;FACTEUR RECOUVREMENT ~ Q207= AUTO ;AVANCE FRAISAGE ~ Q385= AUTO ;AVANCE DE FINITION ~ Q253= MAX ;AVANCE PRE-POSIT. ~ Q357=+2 ;DIST. APPR. LATERALE ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q204=+50 ;SAUT DE BRIDE ~ Q347=+0 ;1ERE LIMITE ~ Q348=+0 ;2EME LIMITE ~ Q349=+0 ;3EME LIMITE ~ Q220=+0 ;RAYON D'ANGLE ~ Q368=+0 ;SUREPAIS. LATERALE ~ Q338=+0 ;PASSE DE FINITION 22 L X-50 Y-7.5 R0 FMAX M99 23 ; 24 ;Fraisage de l'épaulement 25 CYCL DEF 233 FRAISAGE TRANSVERSAL ~ Q215=+0 ;OPERATIONS D'USINAGE ~ Q389=+2 ;STRATEGIE FRAISAGE ~ Q350=+1 ;SENS DE FRAISAGE ~ Q218=+98 ;1ER COTE ~ Q219=-67 ;2EME COTE ~ Q227=+0 ;PT INITIAL 3EME AXE ~ Q386=-14 ;POINT FINAL 3EME AXE ~ Q369=+0.2 ;SUREP. DE PROFONDEUR ~ Q202=+5 ;PROF. PLONGEE MAX. ~ Q370=+1 ;FACTEUR RECOUVREMENT ~ Q207= AUTO ;AVANCE FRAISAGE ~ Q385= AUTO ;AVANCE DE FINITION ~ Q253= MAX ;AVANCE PRE-POSIT. ~ Q357=+2 ;DIST. APPR. LATERALE ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q204=+50 ;SAUT DE BRIDE ~ Q347=-2 ;1ERE LIMITE ~ Q348=+0 ;2EME LIMITE ~ Q349=+0 ;3EME LIMITE ~ Q220=+0 ;RAYON D'ANGLE ~ Q368=+0.2 ;SUREPAIS. LATERALE ~ Q338=+0 ;PASSE DE FINITION 26 L X-49 Y+85 R0 FMAX M99 27 ; 28 ;Fraisage de la poche circulaire 29 L X+0 Y+50 R0 FMAX 30 CYCL DEF 252 POCHE CIRCULAIRE ~ Q215=+0 ;OPERATIONS D'USINAGE ~ Q223=+60 ;DIAMETRE DU CERCLE ~ Q368=+0.2 ;SUREPAIS. LATERALE ~ Q207= AUTO ;AVANCE FRAISAGE ~ Q351=+1 ;MODE FRAISAGE ~ Q201=-5 ;PROFONDEUR ~ Q202=+5 ;PROFONDEUR DE PASSE ~ Q369=+0.2 ;SUREP. DE PROFONDEUR ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q338=+0 ;PASSE DE FINITION ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q203=-14 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE ~ Q370=+1 ;FACTEUR RECOUVREMENT ~ Q366=+1 ;PLONGEE ~ Q385= AUTO ;AVANCE DE FINITION 31 M99 32 L Z+100 R0 FMAX M5 ;Dégagement 33 ; 34 ;Appel de l'outil pour le pré-fraisage 35 ;du contour 36 TOOL CALL 16 Z S2000 F300 37 L Z+100 R0 FMAX M3 38 CYCL DEF 14.0 CONTOUR 39 CYCL DEF 14.1 LABEL CONTOUR1 40 CYCL DEF 25 TRACE DE CONTOUR ~ Q1=-7 ;PROFONDEUR FRAISAGE ~ Q3=+0.5 ;SUREPAIS. LATERALE ~ Q5=-14 ;COORD. SURFACE PIECE ~ Q7=+50 ;HAUTEUR DE SECURITE ~ Q10=-5 ;PROFONDEUR DE PASSE ~ Q11= AUTO ;AVANCE PLONGEE PROF. ~ Q12= AUTO ;AVANCE EVIDEMENT ~ Q15=+1 ;MODE FRAISAGE 41 M99 42 L Z+100 R0 FMAX M5 43 ; 44 ;Appel de l'outil pour l'usinage de la pente, 45 ;des poches et la finition du contour 46 TOOL CALL 5 Z S14000 F2500 47 ; 48 ;Dégagement à une position de sécurité 49 CALL LBL "S-POS" 50 ; 51 ;Décalage du point zéro 52 CYCL DEF 7.0 POINT ZERO 53 CYCL DEF 7.1 Y+18 54 CYCL DEF 7.2 Z-14 55 ; 56 ;Inclinaison du plan d'usinage 57 PLANE SPATIAL SPA-45 SPB+0 SPC+0 TURN MB MAX FMAX 58 L Z+100 R0 FMAX M3 59 L X-55 Y+0 R0 FMAX 60 CYCL DEF 251 POCHE RECTANGULAIRE ~ Q215=+0 ;OPERATIONS D'USINAGE ~ Q218=+110 ;1ER COTE ~ Q219=+22 ;2EME COTE ~ Q220=+5 ;RAYON D'ANGLE ~ Q368=+0.2 ;SUREPAIS. LATERALE ~ Q224=+0 ;POSITION ANGULAIRE ~ Q367=+4 ;POSITION POCHE ~ Q207= AUTO ;AVANCE FRAISAGE ~ Q351=+1 ;MODE FRAISAGE ~ Q201=-10 ;PROFONDEUR ~ Q202=+5 ;PROFONDEUR DE PASSE ~ Q369=+0.2 ;SUREP. DE PROFONDEUR ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q338=+5 ;PASSE DE FINITION ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q203=+10 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE ~ Q370=+1 ;FACTEUR RECOUVREMENT ~ Q366=+2 ;PLONGEE ~ Q385= AUTO ;AVANCE DE FINITION 61 M99 62 L Z+100 R0 FMAX 63 ; 64 ;Réinitialisation de l'inclinaison et du point zéro 65 CALL LBL "RESET" 66 ; 67 ;Fraisage de la poche rectangulaire 68 L Z+100 R0 FMAX 69 CYCL DEF 251 POCHE RECTANGULAIRE ~ Q215=+0 ;OPERATIONS D'USINAGE ~ Q218=+12 ;1ER COTE ~ Q219=+30 ;2EME COTE ~ Q220=+0 ;RAYON D'ANGLE ~ Q368=+0.2 ;SUREPAIS. LATERALE ~ Q224=+0 ;POSITION ANGULAIRE ~ Q367=+0 ;POSITION POCHE ~ Q207= AUTO ;AVANCE FRAISAGE ~ Q351=+1 ;MODE FRAISAGE ~ Q201=-5 ;PROFONDEUR ~ Q202=+3 ;PROFONDEUR DE PASSE ~ Q369=+0.2 ;SUREP. DE PROFONDEUR ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q338=+5 ;PASSE DE FINITION ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q203=-21 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE ~ Q370=+1 ;FACTEUR RECOUVREMENT ~ Q366=+2 ;PLONGEE ~ Q385= AUTO ;AVANCE DE FINITION 70 L X-41 Y+66 R0 FMAX M99 71 L X+41 Y+66 R0 FMAX M99 72 ; 73 ;Finition du contour 74 CYCL DEF 14.0 CONTOUR 75 CYCL DEF 14.1 LABEL CONTOUR1 76 CYCL DEF 25 TRACE DE CONTOUR ~ Q1=-7 ;PROFONDEUR FRAISAGE ~ Q3=+0 ;SUREPAIS. LATERALE ~ Q5=-14 ;COORD. SURFACE PIECE ~ Q7=+50 ;HAUTEUR DE SECURITE ~ Q10=-5 ;PROFONDEUR DE PASSE ~ Q11= AUTO ;AVANCE PLONGEE PROF. ~ Q12= AUTO ;AVANCE EVIDEMENT ~ Q15=+1 ;MODE FRAISAGE 77 M99 78 L Z+100 R0 FMAX M5 ;Dégagement 79 ; 80 ;Appel de l'outil d'ébavurage 81 TOOL CALL 172 Z S900 F500 82 L Z+100 R0 FMAX M3 83 ; 84 ;Ebavurage des trous 85 L X+0 Y+50 R0 FMAX 86 CYCL DEF 240 CENTRAGE ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q343=+1 ;CHOIX DIAM./PROFOND. ~ Q201=-2 ;PROFONDEUR ~ Q344=-9 ;DIAMETRE ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q211=+0 ;TEMPO. AU FOND ~ Q203=-19 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE 87 M99 88 CYCL DEF 240 CENTRAGE ~ Q200=+3 ;DISTANCE D'APPROCHE ~ Q343=+1 ;CHOIX DIAM./PROFOND. ~ Q201=-2 ;PROFONDEUR ~ Q344=-6 ;DIAMETRE ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q211=+0 ;TEMPO. AU FOND ~ Q203=-19 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE 89 PATTERN DEF ~ CIRC1( X+0 Y+50 D46 START+0 NUM4 Z+0 ) 90 CYCL CALL PAT FMAX 91 ; 92 ;Appel de l'outil avec DR pour le chanfrein 93 TOOL CALL 172 Z S900 F500 DR-4.5 94 ; 95 ;Ebavurage de la poche circulaire 96 L X+0 Y+50 R0 FMAX 97 CYCL DEF 252 POCHE CIRCULAIRE ~ Q215=+2 ;OPERATIONS D'USINAGE ~ Q223=+60 ;DIAMETRE DU CERCLE ~ Q368=+0.1 ;SUREPAIS. LATERALE ~ Q207= AUTO ;AVANCE FRAISAGE ~ Q351=+1 ;MODE FRAISAGE ~ Q201=-0.8 ;PROFONDEUR ~ Q202=+5 ;PROFONDEUR DE PASSE ~ Q369=+0 ;SUREP. DE PROFONDEUR ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q338=+1 ;PASSE DE FINITION ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q203=-14 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE ~ Q370=+1 ;FACTEUR RECOUVREMENT ~ Q366=+1 ;PLONGEE ~ Q385= AUTO ;AVANCE DE FINITION 98 M99 99 ; 100 ;Ebavurage du contour 101 CYCL DEF 14.0 CONTOUR 102 CYCL DEF 14.1 LABEL CONTOUR1 103 CYCL DEF 25 TRACE DE CONTOUR ~ Q1=-2.5 ;PROFONDEUR FRAISAGE ~ Q3=+0 ;SUREPAIS. LATERALE ~ Q5=-14 ;COORD. SURFACE PIECE ~ Q7=+50 ;HAUTEUR DE SECURITE ~ Q10=-2.3 ;PROFONDEUR DE PASSE ~ Q11= AUTO ;AVANCE PLONGEE PROF. ~ Q12= AUTO ;AVANCE EVIDEMENT ~ Q15=+1 ;MODE FRAISAGE 104 M99 105 L Z+100 R0 FMAX M5 ;Dégagement 106 ; 107 ;Appel de l'outil de pointage 108 TOOL CALL 204 Z S6000 F400 109 L Z+100 R0 FMAX M3 110 ; 111 ;Pointages sur le cadran 112 L X+0 Y+50 R0 FMAX 113 CYCL DEF 240 CENTRAGE ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q343=+1 ;CHOIX DIAM./PROFOND. ~ Q201=-2 ;PROFONDEUR ~ Q344=-5 ;DIAMETRE ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q211=+0 ;TEMPO. AU FOND ~ Q203=-19 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE 114 CC X+0 Y+50 115 LP PR+23 PA+30 FMAX M99 116 LP IPA+30 R0 FMAX M99 117 LP IPA+60 R0 FMAX M99 118 LP IPA+30 R0 FMAX M99 119 LP IPA+60 R0 FMAX M99 120 LP IPA+30 R0 FMAX M99 121 LP IPA+60 R0 FMAX M99 122 LP IPA+30 R0 FMAX M99 123 L Z+100 R0 FMAX M5 ;Dégagement 124 ; 125 ;Pointage des perçages D10 126 ; 127 ;Approche de la position de sécurité 128 CALL LBL "S-POS" 129 ; 130 ;Décalage du point zéro 131 CYCL DEF 7.0 POINT ZERO 132 CYCL DEF 7.1 Y+4 133 ; 134 ;Inclinaison du plan d'usinage 135 PLANE SPATIAL SPA-45 SPB+0 SPC+0 TURN MB MAX FMAX 136 L Z+100 R0 FMAX M3 137 L X+38 Y+9 R0 FMAX 138 CYCL DEF 240 CENTRAGE ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q343=+1 ;CHOIX DIAM./PROFOND. ~ Q201=-2 ;PROFONDEUR ~ Q344=-10.5 ;DIAMETRE ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q211=+0 ;TEMPO. AU FOND ~ Q203=+0 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE 139 M99 140 L X-38 R0 FMAX M99 141 L Z+100 R0 FMAX M5 ;Dégagement 142 ; 143 ;Réinitialisation de l'inclinaison et du point zéro 144 CALL LBL "RESET" 145 ; 146 ;Appel de l'outil de perçage D10 147 TOOL CALL 232 Z S3000 F400 148 ; 149 ;Approche de la position de sécurité 150 CALL LBL "S-POS" 151 ; 152 ;Décalage du point zéro 153 CYCL DEF 7.0 POINT ZERO 154 CYCL DEF 7.1 Y+4 155 ; 156 ;Inclinaison du plan d'usinage 157 PLANE SPATIAL SPA-45 SPB+0 SPC+0 TURN MB MAX FMAX 158 L Z+100 R0 FMAX M3 159 L X+38 Y+9 R0 FMAX 160 CYCL DEF 200 PERCAGE ~ Q200=+2 ;DISTANCE D'APPROCHE ~ Q201=-9 ;PROFONDEUR ~ Q206= AUTO ;AVANCE PLONGEE PROF. ~ Q202=+5 ;PROFONDEUR DE PASSE ~ Q210=+0 ;TEMPO. EN HAUT ~ Q203=+0 ;COORD. SURFACE PIECE ~ Q204=+50 ;SAUT DE BRIDE ~ Q211=+0 ;TEMPO. AU FOND ~ Q395=+1 ;REFERENCE PROFONDEUR 161 M99 162 L X-38 R0 FMAX M99 163 L Z+100 R0 FMAX M5 ;Dégagement 164 ; 165 ;Réinitialisation de l'inclinaison et du point zéro 166 CALL LBL "RESET" 167 ; 168 L Z+100 R0 FMAX M30 ;Dégagement 169 ; 170 ;Sous-programmes 171 ;Contour 172 LBL 1 173 L X-65 Y+22 RL 174 L X-49 175 FL X-34 AN+28 176 RND R10 177 L Y+50 178 CC X+0 Y+50 179 CP PA+0 DR- 180 FLT X+34 AN-90 181 FCT DR+ R10 182 FLT X+49 Y+22 AN-28 183 L X+65 184 LBL 0 185 ; 186 ;Position de sécurité 187 LBL "S-POS" 188 L Z+135 R0 FMAX M91 189 L X+175 Y+140 R0 FMAX M91 190 LBL 0 191 ; 192 ;Réinitialisation de l'inclinaison 193 LBL "RESET" 194 ;Approche de la position de sécurité 195 CALL LBL "S-POS" 196 ;Réinitialisation de l'inclinaison 197 PLANE RESET TURN FMAX 198 ;Réinitialisation du point zéro 199 CYCL DEF 7.0 POINT ZERO 200 CYCL DEF 7.1 X+0 201 CYCL DEF 7.2 Y+0 202 CYCL DEF 7.3 Z+0 203 LBL 0 204 END PGM 13_002_2_FR MM