Programação CNC parametrizada comando fanuc: Fresar bolsão elipse usando programação c/ argumentos.

Programação CNC parametrizada comando fanuc: Fresar bolsão elipse usando programação c/ argumentos, programa CNC completo na descrição do vídeo.
email: [e-mail]
O0059(PROGRAMA PRINCIPAL ELIPSE)
(PROGRAMADO POR JEREMIAS FERRAZ)
(FRESAR ELIPSE 140MMX75MM)
G17G21G90G94G69G49G80
G28G91G0Z0
G90
T11M6(FRESA D20MM)
G54G90X0Y0S1350M3
G43G0G90H11Z80
( ARGUMENTOS )
( A=ANGULO INICIAL )
( B=INCREMENTO DO ANGULO )
( R=RAIO DA FRESA )
( X=RAIO DA ELIPSE EM X)
( Y=RAIO DA ELIPSE EM Y)
#101=0("Z" INICIAL)
#102=2.0(INCREMENTO EM "Z")
#103=-6.5(PROFUNDIDADE FINAL EM "Z" VALOR NEGATIVO)
#104=2(RECUO P/ EIXO "Z")
G90G0Z5
N1
#101=[#101-[+#102]]
IF[#101LT#103]THEN#101=#103
G90G1Z#101F250
G65P60L1X90Y35A0B2R10
G65P60L1X120Y55A0B2R10
G65P60L1X140Y75A0B2R10
G91G0Z#104
G90G0X0Y0
IF[#101GT#103]GOTO1
G90G0Z80M5
M30
-------------------------------------------------------------------------------------
O0060(SUB-PROGRAMA MACRO ELIPSE)
G90
#24=-1*[#24/2]+#18(REDEFINIR RAIO DO ARCO MAIOR)
#25=-1*[#25/2]+#18(REDEFINIR RAIO DO ARCO MENOR)
G1X[#24*COS[0]]Y[#25*SIN[0]]F500
WHILE[#1LE360]DO1
G1X[#24*COS[#1]]Y[#25*SIN[#1]]F500
#1=#1+#2
END1
M99

[@oclauchihaeouzumaki8691]

Parabéns meu amigo show

[@jeremiasferraz1341]

Olá Neymar tudo bem? Obrigado pelo seu comentário, abraço.

[@---MarcosVanzuita---]

Olá mestre! Muito bacana está opção de elipse..... e com opção de uso de su- programa, fica bem interessante.... como sempre trazendo opções ótimas para a galera do ramo da usinagem!!!! Parabéns Jeremias!!!🤜🤛👏

[@jeremiasferraz1341]

Olá Marcos, obrigado pelo seu comentário sempre muito técnico......ajudando no crescimento do canal, abraço amigo.