Fresar furo cônico ou chanfros parametrizado. Usando variáveis de sistema substituindo as macros.

Fresar furo cônico ou chanfros parametrizado. Usando variáveis de sistema substituindo as macros do usuário no SSCNC.

email: [email protected]

O0147(FRESAR FURO CONICO PARAMETRIZADO)
(PROGRAMADO POR JEREMIAS FERRAZ)
(PROGRAMA P/ USO DE FRESA TOPO RETO OU ESFERICA)
G90G94G17G21G69G40
T10M6(FRESA DE TOPO DIAMETRO 12MM)
G54G90G40G0X0Y0S2000M3
G43G0G90Z50H10
G0Z5.0

#101=12(DIAMETRO DA FERRAMENTA)
#102=14.381(ANGULO DO CONE)
#104=0(Z INICIAL)
#106=27.5(DIAMETRO INICIAL RELACIONADO A FACE)
#109=50(NUMERO DE PASSES PARA INCREMENTO EM Z)
#114=0("0" FRESA DE TOPO RETO "1" FRESA DE TOPO ESFERICA)
#111=5(ALTURA TOTAL RELACIONADO A FACE)

( NAO ALTERAR AS VARIAVEIS DAQUI EM DIANTE )

#101=#101/2
#106=#106/2
#108=90-#102
#112=-1*[#101]*SIN[#108](CALCULO P/ FRESA ESFERICA "X")
#113=-1*[#112]*TAN[#108/2](CALCULO P/ FRESA ESFERICA "Z")
#117=#101
(IF[#114EQ0]THEN#112=0)
(IF[#114EQ0]THEN#113=0)
(IF[#114EQ1]THEN#117=0)

IF[#114NE0]GOTO551
#112=0
#113=0
N551
IF[#114NE1]GOTO552
#117=0
N552

#103=#117-#106(X INICIAL)
#105=#111/#109(INCREMENTO EM Z)
#115=#105*TAN[#102](CALCULO DO INCREMENTO EM X)
G90G0X0Y0S2000M3
G1Z0F200
WHILE[#104LT#111]DO1
#103=#103+#115
#104=#104+#105
G1X[#103-#112]Z-[#104+#113]F600
G3X[#103-#112]Y0I-[#103-#112]J0
END1
G90G0Z70M5
M30