che mi sono stati molto utili.
a qualcuno potrebbero servire.
ciao
(progr- x chiavette esterno)
(attacco tangeniale)
t1m6
s5000m3f500
#11=3 (raggio fresa)
#1=0 (centro-pezzo)
#2=40 (mezza-lunghezza X)
#2=[#2+#11] (mezza-lunghezza X)
#3=6 (mezza-lunghezza Y)
#3=[#3+#11] (mezza-lunghezza Y)
#4=[#3+#11+#11] (punto partenza in Y)
#5=[#4-#3] (raggio x attacco tangenziale)
#119=10 (profondita)
#113=1 (valore Z incrementale)
#114=fup[#119/#113] (arrotondamento passate)
g0x#1y#4
g0z0
M98 P101L#114(L=valore FUP)
g0z50
m2 (fine programma---------------)
o100 ( sub ed esecuzione )
g3y#3r#11 f500
g1x#2
g2y[0-#3 ] r#3
g1x[0-#2 ]
g2y#3 r#3
g1x#1
g3y#4r#11
m99
o101
g91
g1Z[0-#113]
G90
M98 p100 L1 (L=passata-profilo)
M99 (ritorno sub)
------------------------------------------------------------
(progr- x chiavette INTERNO)
(attacco tangenziale )
g58 (origine)
t1m6
s5000m3f500
#11=3 (raggio fresa)
#1=0 (centro-pezzo)
#2=40 (lunghezza X)
#3=10 (lunghezza Y)
#119=5 (profondita)
#2=[[#2/2]-#11] (mezza-lunghezza X)
#3=[[#3/2]-#11] (mezza-lunghezza Y)
#2=[#2-#3]
#4=[#3+#11+#11] (punto partenza in Y)
#5=[#3/2] (raggio x attacco tangenziale)
#113=.75 (valore Z incrementale)
#114=fup[#119/#113] (arrotondamento passate)
g0x0y0
g0z0
M98 P101L#114(L=valore FUP)
g0z50
m2 (fine programma---------------)
o100 ( sub ed esecuzione )
g3y#3r#5 f500
g1x[0-#2]
g3y[0-#3 ] r#3
g1x#2
g3y#3 r#3
g1x#1
g3y0r#5
m99
o101
g91
g1Z[0-#113]
G90
M98 p100 L1 (L=passata-profilo)
M99 (ritorno sub)
------------------------------------------------------------
(parametri foratura elicoidale)
g90
g58 (Origine Lavoraione)
t8m6
s8000m3
#1000=35 (diametro foro)
#1001=8 (diametro fresa)
#1002=3 (passo zeta in profondita)
#1500=23.5 (profondita foro)
#114=fup[#1500/#1002] (arrotondamento passate)
#1003=0 ( zeta0)
#1004=0
#1111=20 (altezza di sicurezza)
#3333=800 (velocita' avanzamento in fresatura)
(calcoli)
#1100=[#1000/2] (raggio foro)
#1101=[#1001/2] (raggio utensile)
#1102=[#1100-#1101-#1004] (prima coordinata x)
#1103=[-1*#1003] (prima coordinata z)
f#3333
M98 P11000 L1
g0z#1111
m30
O11000
g0x0y0
#1104=#1103 (coordinata Z inizio passate)
g0z #1104
g3x#1102i[#1102/2] (primo attacco)
g3x#1102i[-1*#1102] (passata a vuoto)
M98 P10000 L#114
g3x#1102i[-1*#1102] (passata a vuoto)
g3x0i[-1*[#1102/2]]
#1102=[#1102+#1005]
M99
o10000
#1104=[#1104-#1002]
g3x#1102i[-1*#1102]z[#1104]
M99
----------------------------------------------------
(progr-parametrico elicoidale)
(per ralizzare tondi sporgenti su piani)
g58 (Origine Lavoraione-oppure usa g92 per spostamenti)
t8m6
s8000m3
#5=5 (raggio di attacco)
#1000=30 (diametro foro)
#1001=8 (diametro fresa)
#1002=2 (passo zeta in profondita)
#1500=23.5 (profondita foro)
#114=fup[#1500/#1002] (arrotondamento passate)
#1003=0 ( zeta0)
#1004=0
#1111=60 (altezza di sicurezza)
#3333=800 (IMPOSTA avanzamento in fresatura)
(calcoli)
#1100=[#1000/2] (raggio foro )
#1101=[#1001/2] (raggio utensile )
#1102=[#1100+#1101] (prima coordinata )
#9=[[#5+#5]+#1102] (attacco-fuori )
#1103=[-1*#1003] (prima coordinata z)
f#3333
M98 P11000 L1
g0z#1111
m30
O11000
g0x#9y0
#1104=#1103 (coordinata Z inizio passate)
g0z #1104
g2x#1102r#5 (primo attacco tangenziale )
g3x#1102i[-1*#1102] (passata a vuoto)
M98 P10000 L#114
g3x#1102i[-1*#1102] (passata a vuoto)
g2x#9r#5 (distacco tangenziale )
#1102=[#1102+#1005]
M99
o10000
#1104=[#1104-#1002]
g3x#1102i[-1*#1102]z[#1104]
M99
---------------------------------------------------
(progr- x tondo-esterno)
(con passate multiple attacco tangenziale)
g90
t1m6
s5000m3f500
#11=3 (raggio fresa)
#1=0 (centro-pezzo)
#3=10 (raggio Y)
#3=[#3+#11] (mezzo-raggio Y)
#4=[#3+#11+#11] (punto partenza in Y)
#5=[#4-#3] (raggio x attacco tangenziale)
#119=10 (profondita)
#113=1 (valore Z incrementale)
#114=fup[#119/#113] (arrotondamento passate)
g0x#1y#4
g0z0
M98 P101L#114(L=valore FUP)
g0z50
m2 (fine programma---------------)
o100 ( sub ed esecuzione )
g3y#3r#11 f500
g2y[0-#3 ] r#3
g2y#3 r#3
g3y#4r#11
m99
o101
g91
g1Z[0-#113]
G90
M98 p100 L1 (L=passata-profilo)
M99 (ritorno sub)
---------------------------------------------------------
(programma che eseguisce poligoni ESTERNI )
(PARTENZE da fuori poligono, attacco a angolo)
(impostare: NUMERO ANGOLI)
(se si IMPOSTANO 360 realizza un tondo)
(GRADI se si vuole conico)
(PROFONDITA lavorazione)
(PROFONDITA per passata)
g90 (g92x20y20 )
t1m6
s60000m3f800
#108=3 (raggio fresa)
#103=10 (raggio del cerchio passante agli angoli)
#104=6 (INPOSTA QUANTI ANGOLI)
#118=10 (gradi da fresare---prova---)
#119=10 (profondita)
#113=.5 (valore Z incrementale)
#114=fup[#119/#113] (arrotondamento passate)
#140=[#118*tan[#113]] (tangente)
#98=0 (coordinata X del centro )
#99=0 (coordinata Y del centro )
#102=0 (imposta l'angolo iniziale)
#106=[#103+#108] (aggiungi raggio fresa al raggio)
#198=[#98+#106+#108]
#199=[#99+#106+#108]
#105=[360/#104]
#102=#105
g0x#198y0
g0z5
g1z#150 (va a zeta +)
M98 P101L#114(L=valore FUP)
g1x#198y0 (torna alla partenza)
g0z20 (risali a quota sicurezza sopra)
g90 (torna a valori assoluti)
m2 (fine programma-----------------------)
o100 ( sub calcolo ed esecuzione poligono)
#100=[#98+#106*cos[#102]] (coordinata X)
#101=[#99+#106*sin[#102]] (coordinata Y)
g1x#100y#101 (sposta a XY)
#102=[#102+#105] (Incremento angolo)
m99 (ritorno sub)
o101
g1x#198
g1x#106
g91
g1Z[0-#113]
G90
#106=[#106+#140] (#140 valore tangente per discesa ---prova---)
M98 p100 L#104
M99 (ritorno sub)
-----------------------------------------------------------
(programma che eseguisce poligoni INTERNI )
(PARTENZE da foro centrale, attacco a angolo)
(impostare: NUMERO ANGOLI;se 360 fa cerchio..)
(GRADI se si vuole conico)
(PROFONDITA lavorazione)
(PROFONDITA per passata)
g90 (g92x20y20 )
t1m6
s50000m3f800
#108=3 (raggio fresa)
#103=25 (raggio del cerchio passante agli angoli)
#9=[[#103/2]+[#108]]
#104=6 (INPOSTA QUANTI ANGOLI;360=cerchio)
#118=10 (gradi da fresare---prova---)
#119=10(profondita)
#113=.5 (valore Z incrementale)
#114=fup[#119/#113] (arrotondamento passate)
#140=[#118*tan[#113]] (tangente)
#98=0 (coordinata X del centro )
#99=0 (coordinata Y del centro )
#102=0 (imposta l'angolo iniziale)
#106=[#103+#108] (aggiungi raggio fresa al raggio)
#198=[#98+#106+#108]
#199=[#99+#106+#108]
#105=[360/#104]
#102=#105
g0x#9y0
g0z5
g1z#150 (va a zeta +)
M98 P101L#114(L=valore FUP)
g1x#9y0 (torna alla partenza)
g0z20 (risali a quota sicurezza sopra)
g90 (torna a valori assoluti)
m2 (fine programma-----------------------)
o100 ( sub calcolo ed esecuzione poligono)
#100=[#98+#106*cos[#102]] (coordinata X)
#101=[#99+#106*sin[#102]] (coordinata Y)
g1x#100y#101 (sposta a XY)
#102=[#102+#105] (Incremento angolo)
m99 (ritorno sub)
o101
g1x#9
g1x#106
g91
g1Z[0-#113]
G90
#106=[#106-#140] (#140 valore tangente per discesa ---prova---)
M98 p100 L#104
M99 (ritorno sub)
---------------------------------------------------
g58 g90
T8
M6
S10000M3F2000
#97=3 (raggio fresa)
#99=18 (raggio da fresare)
#98=37 (lunghezza)
#103=165 (valore inizio gradi)
#99=[#99-#97]
#100=[0-#99] (asseX =#99)
#101=0 (asseZ)
#115=#98
#116=[0-#98]
g0y#100x#115
M98 P100L75 (L=valore fine gradi)
g0z20
m2
o100
#103=[#103-1]
#100=[#99*sin[#103]]
#101=[#99*cos[#103]]
#110=[#100-[#100+#100]] (valore opposto Z)
g1z#110y#101
g1x#116
#103=[#103-1]
#100=[#99*sin[#103]]
#101=[#99*cos[#103]]
#110=[#100-[#100+#100]] (valore opposto Z)
g1z#110y#101
g1x#115
m99
-----------------------------------------------
g58g90
g92z0 (spostamento in zeta)
T1M6
S10000M3F2000
#97=4 (raggio fresa)
#99=20 (raggio da fresare)
#98=10 (lunghezza)
#103=180 (valore inizio gradi)
#99=[#99+#97]
#100=[0-#99] (asseX =#99)
#101=0 (asseZ)
#115=#98
#116=[0-#98]
g0y#100x#115
M98 P100L90 (L=valore fine gradi)
g0z20
g90
m2
o100
#103=[#103-1]
#100=[#99*sin[#103]]
#101=[#99*cos[#103]]
#110=[#100-[#100-#100]] (valore opposto Z)
g1z#110y#101
g1x#116
#103=[#103-1]
#100=[#99*sin[#103]]
#101=[#99*cos[#103]]
#110=[#100-[#100-#100]] (valore opposto Z)
g1z#110y#101
g1x#115
m99
