Macro chiavetta interpolazione FANUC

Sezione Fanuc
Rispondi
bigangelman
Junior
Junior
Messaggi: 51
Iscritto il: giovedì 29 settembre 2011, 22:10
Località: Novellara

Macro chiavetta interpolazione FANUC

Messaggio da bigangelman » sabato 5 dicembre 2015, 5:12

Riciao a tutti,
questa macro serve per eseguire chiavette meccaniche su FANUC, l'ho testata su controllo FANUC 16i MB. In realtà non ho eseguito la chiavetta su un particolare, mi sono limitato ad eseguire i calcoli in base ai gradi della chiavetta la lunghezza e lo spessore, e vedere se la macro eseguiva i calcoli giusti, ed è risultato tutto ok.

Esempio...:

T4M6(FRESA DIAM.5 ALTO RENDIMENTO)
M11
B0
M10
G54.1P30(ORIGINE)
S800F250M3
G43H4X100Y120Z500
G65P9014R200Z192S350Q0.1F100A30B7C40

Premessa... ci sono tanti modi per eseguire una chiavetta... dipende a che profondità va fatta... se c'è da fare un preforo di punta cosi la fresa ha spazio per evacuare il trucciolo... io l'ho fatta nel modo seguente, perchè a me sembra giusto cosi...
proseguiamo...


Il funzionamento... L'utensile si posiziona ad X100Y120, scende ad un accostamento R200 (in Z ovvio), penetra nel materiale a Z192 alla F100 impostata nel richiamo Macro, mentre in lavorazione utilizza la F250... Il raggio utensile viene preso dal T utilizzato... in questo caso utilizzo il T4, quindi andrà a prendere il correttore raggio D4, e se viene impostata la Q di sovrametallo, andrà a scriverlo nel parametro di USURA del correttore raggio D4, a fine ciclo il parametro di USURA ritorna a zero; se per qualche motivo viene resettato il ciclo prima che termini, il valore di USURA va azzerato manualmente alla D corrispondente... se invece viene poi riavviato il ciclo lo farà in automatico... la lettera A sono i gradi della chiavetta... se si mette A0 ovviamente parte dal centro raggio della prima interpolazione e corre lungo l'asse X+... la B determina lo spessore della chiavetta, che diviso due da il raggio di interpolazione... la C è la lunghezza della chiavetta da CENTRO/CENTRO raggio chiavetta... quindi c'è da fare attenzione se la quotatura parte dai bordi raggiati c'è da tirar via due volte il raggio e mettere la quota che rimane alla C... Ultima cosa... se abbiamo lasciato sovrametallo per un eventuale finitura, basta ripetere la riga di comando con l'utensile finitore impostando la Q a zero...

Spero di non aver creato confusione... Buon lavoro...


%
O9014(CHIAVETTA INTERPOLATA)

(#18 R ACCOSTAMENTO)
(#26 Z QUOTA FINE)
(#19 S SVINCOLO)
(#17 Q SOVRAMETALLO)
(#9 F AVANZAMENTO X ATTACCO)
(#1 A ANGOLO ESEC. CHIAVETTA)
(#2 B SPESSORE CHIAVETTA)
(#3 C LUNGHEZZA CHIAVETTA)
(ES..G65P9014R200Z192S350Q0.1F100A30B7C40)

IF[#18EQ0]GOTO8000
IF[#18EQ#0]GOTO8000
IF[#26EQ0]GOTO8001
IF[#26EQ#0]GOTO8001
IF[#19EQ0]GOTO8002
IF[#19EQ#0]GOTO8002
IF[#9EQ0]GOTO8004
IF[#9EQ#0]GOTO8004
IF[#1EQ#0]GOTO8005
IF[#2EQ0]GOTO8006
IF[#2EQ#0]GOTO8006
IF[#3EQ0]GOTO8007
IF[#3EQ#0]GOTO8007
IF[#17LE0]THEN#17=0
IF[#17EQ#0]GOTO8008

#101=#5001(---X---)
#102=#5002(---Y---)
#103=#4109(ULTIMO AVANZ.PROG.)
#104=#3*COS[#1]
#105=#3*SIN[#1]
#106=#101+#104(POS.X)
#107=#102+#105(POS.Y)
(#4120 = T UTENSILE)
(SOVRAMETALLO CALCOLATO CON USURA)
(A FINE LAVORAZIONE VIENE AZZERATO)
(#108 RAGGIO UT+USURA)
(CALCOLATO SUL T CARICATO)
#[13000+#4120]=#17
#108=#[12000+#4120]+#[13000+#4120]
#100=[#108*2]
IF[#100GE#2]GOTO8009
IF[#108EQ0]GOTO8010
(#109 RAGGIO INTERP.)
#109=#2/2
IF[#109LE0]GOTO8011
#110=#1+90
#111=#1-90
#112=#101+[[#2/2]*COS[#111]](X1)
#113=#102+[[#2/2]*SIN[#111]](Y1)
#114=#101+[[#2/2]*COS[#110]](X2)
#115=#102+[[#2/2]*SIN[#110]](Y2)
#116=#106+[[#2/2]*COS[#110]](X3)
#117=#107+[[#2/2]*SIN[#110]](Y3)
#118=#106+[[#2/2]*COS[#111]](X4)
#119=#107+[[#2/2]*SIN[#111]](Y4)

G0X#101Y#102
G0Z#18
G1Z#26F#9
G1G42X#112Y#113D#4120
G2X#114Y#115R#109F#103
G1X#116Y#117
G2X#118Y#119R#109
G1X#112Y#113
G0G40X#101Y#102
G0Z#19

(AZZERA USURA PER SOVRAMETALLO)
#[13000+#4120]=0

M99
N8000#3000=1(#18 MANCA-R-)
N8001#3000=2(#26 MANCA-Z-)
N8002#3000=3(#19 MANCA-S-)
N8004#3000=5(#9 MANCA-F-)
N8005#3000=6(#1 MANCA-A-)
N8006#3000=7(#2 MANCA-B-)
N8007#3000=8(#3 MANCA-C-)
N8008#3000=9(#17 MANCA-Q-)
N8009#3000=10(FRESA GRANDE)
N8010#3000=11(#108 D+USURA = 0)
N8011#3000=12(#109 R INTERP. NON OK)
M30
%

Rispondi

Torna a “Fanuc”