0 BEGIN PGM 3085_FR MM 
1 ;Programme CN permettant d'usiner un segment d'arc
2 ;concave. Au début et à la fin de l'arc, il est
3 ;possible de définir des rayons différents pour un
4 ;même profil.
5 ;L'angle de départ et l'angle final sont librement
6 ;définissables, dans le profil comme dans le
7 ;plan X/Y.
8 ;Dans ce programme CN, vous définissez l'outil, ainsi
9 ;que tous les paramètres utiles à l'usinage. La CN
10 ;appelle ensuite un autre programme CN dans lequel
11 ;elle effectue tous les calculs et tous les mouvements
12 ;de contournage. Vous n'avez pas besoin de modifier le
13 ;programme CN appelé.
14 ;Dans cet exemple, l'usinage est programmé en deux étapes.
15 ;Pour cela, les paramètres de finition à modifier sont de
16 ;nouveau définis après le premier appel de programme et le
17 ;programme CN est appelé une deuxième fois pour l'usinage.
18 ;
19 BLK FORM 0.1 Z X+0 Y+0 Z-40
20 BLK FORM 0.2  X+200  Y+100  Z+0
21 ;
22 TOOL CALL "BALL_MILL_D10" Z S2800
23 TOOL CALL  Z DL-Q108
24 L  Z+20 R0 F9998 M3
25 ;Définition des paramètres
26 ;Paramètres généraux
27 FN 0: Q1 =+100 ;CENTRE DE L'ARC EN X
28 FN 0: Q2 =+0 ;CENTRE DE L'ARC EN Y
29 FN 0: Q3 =+0 ;CENTRE DE L'ARC EN Z
30 FN 0: Q6 =+25 ;RAYON DE DEPART DU CONTOUR DANS LE PLAN X/Z
31 FN 0: Q16 =+10 ;RAYON FINAL DU CONTOUR DANS LE PLAN X/Z
32 FN 0: Q7 =+90 ;ANGLE DE DEPART DU CONTOUR DANS LE PLAN X/Z
33 FN 0: Q17 =+270 ;ANGLE FINAL DU CONTOUR DANS LE PLAN X/Z
34 FN 0: Q8 =+0 ;ANGLE DE DEPART DU CONTOUR DANS LE PLAN X/Y
35 FN 0: Q18 =+180 ;ANGLE FINAL DU CONOTUR DANS LE PLAN X/Y
36 FN 0: Q10 =+60 ;RAYON AU CENTRE DU CONTOUR DANS LE PLAN X/Y
37 FN 0: Q25 =+10 ;DISTANCE D'APPROCHE
38 FN 0: Q26 =+100 ;NOMBRE DE PASSES
39 FN 0: Q27 =+50 ;NOMBRE D'ELEMENTS LINEAIRES PAR PASSE
40 ;
41 ;Paramètres de l'ébauche
42 FN 0: Q20 =+100 ;AVANCE DE LA PASSE EN PROFONDEUR
43 FN 0: Q21 =+300 ;AVANCE FRAISAGE
44 FN 0: Q22 =+300 ;AVANCE DE PRE-POSITIONNEMENT
45 FN 0: Q23 =+8 ;SUREPAISSEUR SUR L'AXE Z
46 FN 0: Q29 =+2 ;FACTEUR D'EBAUCHE
47 ;Fin de la programmation des paramètres
48 ;
49 ;Calcul de la correction de rayon
50 FN 2: Q6 =+Q6 - +Q108
51 FN 2: Q16 =+Q16 - +Q108
52 ;
53 ;Pré-positionnement de l’outil
54 L  X+Q1  Y+Q2 R0 F9999
55 ;
56 ;Appel du programme pour l'usinage
57 CALL PGM 30851_fr
58 ;
59 ;Paramètres de la finition
60 FN 0: Q20 =+200 ;AVANCE DE LA PASSE EN PROFONDEUR
61 FN 0: Q21 =+500 ;AVANCE FRAISAGE
62 FN 0: Q22 =+1000 ;AVANCE DE PRE-POSITIONNEMENT
63 FN 0: Q23 =+0 ;SUREPAISSEUR SUR L'AXE Z
64 FN 0: Q29 =+1 ;FACTEUR D'EBAUCHE
65 ;Fin de la programmation des paramètres
66 ;
67 ;Pré-positionnement de l’outil
68 L  X+Q1  Y+Q2 R0 F9999
69 ;
70 ;Appel du programme pour l'usinage
71 CALL PGM 30851_fr
72 ;
73 ;Dégagement et fin de programme
74 L  Z+50 R0 F9998 M2
75 END PGM 3085_FR MM