Questo programma esegue un allargamento di 2 fori con un certo interasse che si intersecano fra loro ,ma e' parametrico e lo puoi adattare alle dimensioni che vuoi ,puoi togliere i G51 e ti farà solo 1 foro,ti fa anche il calcolo dell'avanzamento reale sul dente durante l'interpolazione circolare ,esegue sgrossatura e finitura. E vai ,prova inserirlo e vedere la grafica.
N1 O1
N2 T81M6[ FRESA CAND.BURZONI D=20.0 SEMI-FIN.ALTA VEL.
N3 Z200R[ SGR.E FIN.
N4 P40=9.99[ RAGGIO FRESA
N5 P49=2000[ AVANZAMENTO SUL DENTE/CALCOLARE A CENTRO FRESA
N6 P46=500[ AVANZ. IN Z
N7 P0=25[ DIAMETRO PREFORO
N8 [ P0 - IL PRIMO GIRO LO FA A QUESTO DIAMETRO
N9 P1=31.5[ DIAMETRO FINALE
N10 P2=0.25[ INCREMENTO SUL RAGGIO
N11 P3=28[ INTERASSE FORI
N12 [ ---
N13 P0=P0/2
N14 P1=P1/2
N15 P3=P3/2
N16 P5=P1-P0
N17 P20=NEI(P5/P2)
N18 P2=P5/P20
N19 P21=P20
N20 P41=P40*2[ DIAM.FRESA
N21 P42=P0*2[ DIAM.DA ESEGUIRE
N22 P48=(P49*(P42-P41))/P42
N23 P10=0.1
N24 P6=P10
N25 [ ---
N26 S2200M3FP46
N27 G49IP40
N28 G51X-P3Y0
N29 L10
N30 G51XP3Y0
N31 L10
N32 G50
N33 Z100RM5
N34 X500Z200R
N35 M0[ FINITURA
N36 P40=9.99[ RAGGIO FRESA
N37 P49=800[ AVANZAMENTO SUL DENTE/FINITURA
N38 P46=500[ AVANZ. IN Z
N39 P0=31.5[ DIAMETRO PARTENZA
N40 [ P0 - IL PRIMO GIRO LO FA A QUESTO DIAMETRO
N41 P1=31.8[ DIAMETRO FINALE
N42 P2=0.15[ INCREMENTO SUL RAGGIO
N43 P3=28[ INTERASSE FORI
N44 [ ---
N45 P0=P0/2
N46 P1=P1/2
N47 P3=P3/2
N48 P5=P1-P0
N49 P20=NEI(P5/P2)
N50 P2=P5/P20
N51 P21=P20
N52 P41=P40*2[ DIAM.FRESA
N53 P42=P0*2[ DIAM.DA ESEGUIRE
N54 P48=(P49*(P42-P41))/P42
N55 P10=0.1
N56 P6=P10
N57 [ ---
N58 S2200M3FP46
N59 G49IP40
N60 G51X-P3Y0
N61 L10
N62 G51XP3Y0
N63 L10
N64 G50
N65 Z100RM5
N66 X500Z150R
N67 M30
N68 L=10
N69 P6=P10
N70 P7=P0
N71 P42=P7*2
N72 X0YP6R
N73 M0[ SISTEMA SOFFIAGGIO/EVAQUAZIONE TRUCIOLI OK?
N74 Z1RM7
N75 Z-63FP46
N76 L=11
N77 G41K2FP47
N78 G20X0Y0IP7FP48
N79 G40X0YP6K2FP47
N80 P48=(P49*(P42-P41))/P42
N81 P47=P48/2
N82 P6=P6+P2
N83 P7=P7+P2
N84 P42=P7*2
N85 L11KP21
N86 Z100RM9
N87 G32