Konische Bohrung, auf Shopmill

Hallo,

hat einer eine Idee wie ich das (Bild) auf einer 810D mit Shopmill fertigen könnte?

Hauptsächlich geht es mir um die konische Bohrung.

Parameterprogramm Vorschläge sind gerne erwünscht.

Kegelsenker, Stufenbohrer, Gesenkfräser, Kugelfräser.

Ich weiß, dass man auf der 840D eine solche Bohrung mittels G2/3 und TURN in Verbindung mit OFFN herstellen kann.
Ob die 810er das beherrscht, weiß ich leider nicht.

mfG.
Eisen

Kann die 810 genauso, die hat lediglich in so speziellen Sachen wie Splines oder Spezialzyklen ein Defizit.

Geht ungefähr so
G0 X0 y0 z0
G41 X10
G3 X10 Y0 Z-20 I-10 j0 Turn=20 Offn=-3
G3 X7 Y0 Z-20 I-7 j0
G0 Z20

Der Beitrag wurde von uli12us bearbeitet: 10.08.2007, 19:22 Uhr

Kegelsenker oder ähnliches scheidet leider aus.
Da die Bohrung d=40mm ist, somit dürfte die Senkung einen Durchmesser von ca. 60mm oben haben. Jedenfalls so aus dem kopf raus.

Na dann würde ich es doch mal mit TURN und OFFN probieren...

mfG.
Eisen

Wenn der Winkel passt geht auch ein Messerkopf. Ausserdem es gibt doch diesen Winkeleinstellbaren Fasenfräser bei praktisch allen Werkzeughändler.
einfach Stufig vorfräsen und mit dem Fasenfräser nachbearbeiten.
Wenn du trotzdem mit offn testen willst mach vorher nen Luftschnitt, ich weiss nicht ob das mit + oder - programmiert werden muss. Wenn ichs mir überlege dann wohl eher + Und das gilt für den Radius.

...werde ich mal ausprobieren, ich berichte dann wie es ausgeht.

...so gerade mal getestet:

offn zeigt überhaupt keine Wirkung, weder mit positiven oder negativen Vorzeichen. Er macht eine gerade helix nach unten.
muss man da vorher noch was anwählen oder fehlt ein Parameter (z.B. Radius).

Der Beitrag wurde von Daniel bearbeitet: 13.08.2007, 08:49 Uhr

OFFN wirkt nur bei aktiver Werkzeugradiuskorektur.

AH! Ja genau die hab ich abgeschaltet. Tja dann schau ich gleich nochma.

Danke.

Hab ich nicht extra im Beispiel G41 geschrieben? Das hatte schon einen Grund.

Hallo
geht bei uns 840D super

mfg huronex30


t12d1
chou
traori
cut2df
drfof
cftcp
R011=$A_HOUR
R012=$A_MINUTE
g64 soft ffwon
g0g90 g54
s5000f5000m3m8
trans
;arot ?
;g0b? c=dc(0)

r13=100 ;Rückzug
r14=0 ;Startebene
r15=1 ;Sicherheitsabstand
r17=5 Tiefe
r18=20/2 Startdurchmesser
r31=1.5 Plattenradius(differenz zur schräge wird errechnet ausgeglichen)
r32=30 ;halber Konuswinkel
r33=0 Aufmaß xy
r34=0 Aufmaß z
r19=0.1 zustellung pro umlauf

mcall kegel

Koordinaten

mcall
R024=$A_HOUR
R025=$A_MINUTE
spos=0
m5
m30
;***************************************************************


UNTERPROGRAMM



proc testkegel save displof

; Innenkegel.MPF

; **** Berechnungen ****
R100=(r18-r17*tan(r32))*2

if r14==0 gotof label15
msg ("Kegel Tiefe="<<r17<<" Zustellung="<<r19<<" Anfangsdurchmesser="<<r18*2<<" Enddurchmesser="<<r100<<" Schraege="<<r32<<" Plattenradius="<<r31<<" Entiefe Z="<<r14-r17<<"")
gotof label16
label15:
msg ("Kegel Tiefe="<<r17<<" Zustellung="<<r19<<" Anfangsdurchmesser="<<r18*2<<" Enddurchmesser="<<r100<<" Schraege="<<r32<<" Plattenradius="<<r31<<" Entiefe Z="<<r14-r17<<"")

label16:

R50=R31-((R31/cos(R32))-(R31*tan(R32)))
;Berech. Tangentenpunkt/Plattenradius = R50
R51=R17 ;Endtiefe = R51
R52=R51*tan(R32) ;Kegelsteigung = R52
R53=R18-R52 ;Berechnung Kegelradius unten = R53
R54=R18-R53 ;Radiusunterschiedberechnung = R54
R55=R51/R19 ;Berech. Anzahl/Umdrehungen = R55
R56=R54/R55 ;I-Vektor = R56
R57=R56/8 ;Berech. Mittelpunksversch.+ i j = R57
R58=-R57 ;Mittelpunktsverschibung- i j = R58
R59=R57*2 ;Berech. Radiussteigung/Viertelk. = R59
R60=R19/4 ;Berech. Zllung/Viertelk. = R60
R61=R18+R50 ;Berech. Radius oben X = R61
R62=R61 ;Kegelradius oben Y = R62
R63=R53+R50 ;Berech. Radius unten = R63
R64=R14 ;Vergleichsberech. = R64
R65=0 ;Nullparameter
R66=(R17-R60) ;Vergleichswert
;****Ablauf****

offn=R33
G0 z=R13
Z=R64+R15
G1 Z=R64+R34
g91
g41 X=R61 Y=R58
R62=R62-R57
POS1:
R65=R65+R60
if R65>=R66 GOTOF POS2
G3 X=-R62 Y=R62 Z=-R60 I=-R62 J=0
R65=R65+R60
R62=R62-R59
if R65>=R66 GOTOF POS3
G3 X=-R62 Y=-R62 Z=-R60 I=0 J=-R62
R65=R65+R60
R62=R62-R59
if R65>=R66 GOTOF POS4
G3 X=R62 Y=-R62 Z=-R60 I=R62 J=0
R65=R65+R60
R62=R62-R59
if R65>=R66 GOTOF POS5
G3 X=R62 Y=R62 Z=-R60 I=0 J=R62
R62=R62-R59
IF R65<R66 GOTOB POS1
Pos2:
R62=R62+R57
G1 g40 X=-R62 Y=R57
GOTOF POS6
POS3:
R62=R62+R57
G1 G40 x=-R57 Y=-R62
GOTOF POS6
POS4:
R62=R62+R57
G1 G40 x=R62 Y=-R57
GOTOF POS6
POS5:
R62=R62+R57
G1 G40 x=R57 Y=R62
POS6:
R65=R65-R60
g41 x=R63 y0 z=-(R17-R65)
g03 x0 y0 i=-R63 j0
g1 g40 x=-R63 y0
g90
G0 Z=R13
m01
N440 M17

Wie gesagt, könnte man auch in einem Satz erschlagen:

G3 X.. Y.. Z-.. I.. J... TURN=... OFFN=...

Dann wird der Kreis bei jeder Umdrehung um den OFFN-Wert geteilt durch den TURN-Wert kleiner. Die erste Umdrehung zählt dabei glaube ich nicht mit - oder so ähnlich irgendein Fallstrick war dabei zu beachten.

Ein Versuch mit kleineren Werten bringt bestimmt den Aha-Effekt und das Teil ist nicht gleich für die Schrottkiste

mfG.
Eisen

Richtig, die erste Umdrehung kommt vom G3 alles weitere von Turn. Turn darf auch eine Bruchzahl sein. In dem Fall spielts aber überhaupt keine Rolle, Das ist aber wichtig wenn man selber Gewinde ohne Zyklus fräsen will.

Hallo huronex30,

Dein R-Parameter Pg ist ja ein guter ansatz, würde das ganze aber eher in einem Zyklus schreiben. Vorteile Fehlererkennung usw...

Zyklus ist noch nicht ganz fertig.

mfg Sit

Hier ist der fertige Zyklus...

musste G41 durch G42 erstezten würde das aber eher mit DEF REAL machen war jetzt bloss zu faul SRK ist immer so ne sache.

Kann mir jemand sagen wie ich das mit der Drehzahl besser machen kann.
Bin für jeden guten Rat offen

viel Spass damit


mfg Wolle schönen Urlaub

Der Beitrag wurde von Sit22 bearbeitet: 02.09.2007, 15:02 Uhr

Hab das unterprog mal Hochgeladen
aschreiben ist ja lästig

probiert s mal aus




mfg huronex30

Der Beitrag wurde von huronex30 bearbeitet: 17.09.2007, 23:49 Uhr