0  BEGIN PGM 5105_ES MM 
1  ;Programa NC para fresar una ranura para
2  ;chaveta en un eje y, a continuación,
3  ;desbarbar dicha ranura en la arista
4  ;superior con una herramienta de conformar.
5  ;Para fresar la ranura se ha programado un
6  ;ciclo estándar. Para calcular la
7  ;trayectoria de herramienta para el
8  ;desbarbado se ha definido un programa NC
9  ;como ciclo.
10 ;
11 ;
12 BLK FORM CYLINDER Y D80 L200 DIST+0
13 ;
14 ;Llamada a la herramienta para el fresado de la ranura
15 TOOL CALL "MILL_D6_ROUGH" Z S555
16 ;
17 ;Definición de parámetros para el taladro
18 ;profundo. El radio del eje debe definirse
19 ;como coordenadas de la superficie.
20 CYCL DEF 253 FRESADO RANURA ~
    Q215=+0    ;TIPO MECANIZADO ~
    Q218=+63   ;LONGITUD RANURA ~
    Q219=+22   ;ANCHURA RANURA ~
    Q368=+0.1  ;SOBREMEDIDA LATERAL ~
    Q374=+90   ;ANGULO GIRO ~
    Q367=+0    ;POSICION RANURA ~
    Q207=+500  ;AVANCE DE FRESADO ~
    Q351=+1    ;TIPO DE FRESADO ~
    Q201=-9    ;PROFUNDIDAD ~
    Q202=+5    ;PASO PROFUNDIZACION ~
    Q369=+0    ;SOBREMEDIDA PROFUND. ~
    Q206=+150  ;AVANCE PROFUNDIDAD ~
    Q338=+0    ;PASADA PARA ACABADO ~
    Q200=+2    ;DISTANCIA SEGURIDAD ~
    Q203=+40   ;COORD. SUPERFICIE ~
    Q204=+50   ;2A DIST. SEGURIDAD ~
    Q366=+2    ;PUNZONAR ~
    Q385=+500  ;AVANCE ACABADO ~
    Q439=+3    ;REFER. AVANCE
21 ;
22 L  X+0  Y-50  Z+50 R0 FMAX M3 M99 ;Posicionamiento y llamada de ciclo
23 ;
24 ;Llamada de herramienta para el desbarbado
25 ;Debe determinarse el punto de corte de la
26 ;cuchilla de la herramienta con los
27 ;valores DL y DR
28 TOOL CALL "NC_DEBURRING_D8" Z S555 DL-1 DR-3
29 ;
30 ;Definición del programa NC 51051_es.H como ciclo
31 SEL CYCLE "51051_es.h"
32 ;
33 ;Introducción de parámetros para el desbarbado
34 Q201 = - 1 ;PROFUNDIDAD
35 Q222 = 80 ;DIÁMETRO DEL EJE
36 Q200 = 2 ;DIST. SEGURIDAD
37 Q204 = 50 ;2.ª DIST. SEGURIDAD
38 Q207 = 300 ;AVANCE DE FRESADO
39 ;
40 ;Solo se deben definir los siguientes
41 ;parámetros si se van a ejecutar ciclos
42 ;adicionales entre el paso de mecanizado
43 ;Fresado de ranura y Desbarbado.
44 ;Q218 = 63 ;LONGITUD DE RANURA
45 ;Q219 = 22 ;ANCHURA RANURA
46 ;Q374 = 90 ;ANGULO GIRO
47 ;Q367 = 0 ;POSICIÓN DE LA RANURA
48 ;Q203 = 40 ;SUPERFICIE DE COORDEN.
49 ;Fin de la introducción de parámetros
50 ;
51 L  X+0  Y-50  Z+50 R0 FMAX M99 ;Posicionamiento y llamada de ciclo
52 ;
53 M140 MB MAX F9999 ;Retirar la hta.
54 M30 ;Final del programa
55 ;
56 END PGM 5105_ES MM