Interpolação helicoidal parametrizada p/ abrir roscas + circulo de furos equidistantes. скачать в хорошем качестве

Interpolação helicoidal parametrizada p/ abrir roscas + circulo de furos equidistantes.

Programa CNC parametrizado de interpolação helicoidal para abrir roscas mais circulo de furos equidistantes com primeiro furo em qualquer ângulo Ex: 360°÷ 5 = 72° ou seja 5 furos equidistantes 72° com o primeiro furo iniciando no ângulo de 30°. email: jeremias.ferraz@yahoo.com O0136(INTERPOLACAO HELICOIDAL + CIRCULO DE FUROS) (INTERPOLACAO HELICOIDAL P/ ABRIR ROSCAS INTERNA DIREITA) (PROGRAMADO POR JEREMIAS FERRAZ) T13M6(FRESA DE ABRIR ROSCA D16MM) #1=22.0(DIAMETRO MENOR DA ROSCA) #2=24.0(DIAMETRO MAIOR DA ROSCA) #3=2.0(PASSO DA ROSCA) #4=16(COMPRIMENTO TOTAL DA ROSCA) #5=0(INCREMENTO P/ NUMERO DE PASSES VALOR EM DIAMETRO) #103=5(QUANTIDADE DE FUROS EQUIDISTANTES) #104=100(DIAMETRO CIRCULO DOS FUROS) #113=30(ANGULO INICIAL) #114=13(NUMERO DO CORRETOR DA FERRAMENTA) #115=15.5(DIAMETRO DA FRESA) G43G0G90H13D#114Z50M8 G54G90S3200M3 G0Z5.0 ( NAO ALTERAR AS VARIAVEIS DAQUI EM DIANTE ) IF[#103EQ0]THEN#103=1 IF[#5EQ0]THEN#5=#3 #1=#1/2 #2=#2/2 #5=#5/2 #7=#4+#3 #104=#104/2 #112=360/#103(DIVISAO DOS ANGULOS) #115=#115/2 #11=#1 #12=#2 G10L12P#114R#115(CARREGA RAIO DA FRESA VIA PROGRAMA) N55 G68X0Y0R#113 G0X#104Y0 N2 #6=0 G90G0Z#3 #1=#1+#5 IF[#1GT#2]THEN#1=#2 G91G42G1D#114Y#1F1000 WHILE[#6LT#7]DO1 #6=#6+#3 G91G2J-#1Z-#3F800 END1 G91G1G40Y-#1F1000 IF[#1EQ#2]GOTO22 IF[#1LT#2]GOTO2 N22 #1=#11 #2=#12 G0G90Z100 #113=#113+#112 #111=#111+1 IF[#111LT#103]GOTO55 G69 G0G90Z200M5 M30