Bohrung entgraten

Hi! Habe folgendes Problem:
Und zwar muss ich in Rohre D108MM 4MM Wandung verschiedene Bohrungen fräsen ( zb. D22 D60 etc...). Da werden später irgendwelche Kabel durchgezogen. Dementsprechend müssen die kanten gratfrei bzw anfgefast werden! Nur mit der Ziehklinge ist das ein ziemlich umständlich! Deshalb will ich jetzt mit nem Rückwärtsentgrater die kanten entgraten!
Nur fehlt mir noch das Programm dazu!
Habe hier im Forum schon was ähnliches für Heidenhain gefunden!

* ; 90 GRAD SECO MINIMASTER DU 12
* ; RADIUS KORREKTUR BEI TIEFE 2MM
* ; RADIUS KORREKTUR = 2.4 MM
* FN 0: Q1 = +360 ; ANZAHL DER TEILUNGEN AUF 90 GRAD BEZOGEN
* FN 0: Q2 = +84 ; DURCHBESSER DER BOHRUNG
* FN 0: Q3 = +192 ; WELLENDURCHMESSER
* FN 0: Q7 = +0.5 ; FASENBREITE AN NUTENFLANKE
* FN 0: Q8 = 1000 ; VORSCHUB
* FN 0: Q10 = +2 ; SICHERHEITSABSTAND
* CALL PGM 45GRADBO
* L Z+10 R0 F MAX M


0 BEGIN PGM 45GRADBO MM
1 FN 1: Q17 = +Q7 + +2 ; EINTAUCHTIEFE BEI BEGINN
2 FN 4: Q4 = +Q3 DIV +2 ; RADIUS DER WELLE
3 FN 4: Q5 = +Q2 DIV +2 ; RADIUS DER BOHRUNG
4 FN 2: Q20 = +Q1 - +1 ; ANZAHL DER DURCHLAUEFE
5 FN 4: Q51 = +360 DIV +Q1 ; GRADSCHRITT
6 L Z-Q17 F500 ; EINTAUCHEN AUF TIEFE FUER FASE AN NUTE
7 L IX+0 IY+0 F MAX
8 CC ; IST POSITIONSUEBERNAHME KREISMITTELPUNKT
9 L IX+Q5 IY+0 RL F+Q8 ; MIT RADIUSKORREKTUR AN BOHRAND IM GLEICHLAUF
10 FN 4: Q21 = +360 DIV +Q1 ; ZAEHLER FUER GRAD
11 LBL 1
12 FN 6: Q22 = SIN+Q21
13 FN 3: Q23 = +Q22 * +Q5 ; KREISABSCHNITT HALBE
14 FN 3: Q24 = +Q23 * +2 ; KREISABSCHNITT SEHNE
15 FN 3: Q25 = +Q24 * +Q24 ; KREISABSCHNITT SEHNE ZUM QUADRAT
16 FN 3: Q26 = +Q4 * +Q4 ; RADIUSWELLE ZUM QUADRAT
17 FN 3: Q27 = +Q26 * +4 ; 4XRADIAUSWLLE ZUM QUADRAT
18 FN 2: Q28 = +Q27 - +Q25 ; 4XRADIUSWELLE ZUM QUADRAT MINUS SEHNE ZUM QAUDRAT
19 FN 5: Q29 = SQRT Q28 ; WURZEL AUS 4XRADIUSWELLE ZUM QUADRAT MINUS SEHNE ZUM QAUDRAT
20 FN 3: Q30 = +Q29 * +0.5 ; 0.5 X WURZEL AUS 4XRADIUSWELLE ZUM QUADRAT MINUS SEHNE ZUM QAUDRAT
21 FN 2: Q31 = +Q4 - +Q30 ; RADIUS WELLE - 0.5 X WURZEL AUS 4XRADIUSWELLE ZUM QUADRAT MINUS SEHNE ZUM QAUDRAT
22 ; Q31 = HOEHE SEHNENABSCHNITT
23 FN 1: Q32 = +Q31 + +Q17 ; EFFEKTIVE TIEFE
24 CP PA+Q21 Z-Q32 DR+ ; KREISINTERPOLATION HALBKREIS IN Z AUF FASENTIEFE AM A-DU
25 FN 1: Q21 = +Q21 + +Q51 ; SCHRITTWINKELADDITION
26 CALL LBL 1 REP 359/359
27 L IX-5 IY+0 R0 ; POSITIONIEREN 5MM WEG VON BOHRUNG
28 L Z+10 F MAX ; POSITIONIEREN IN Z
29 END PGM 45GRADBO MM

Habs auf Siemens umgeschrieben, die Steuerung rechnet sich aber nen Wolf dabei! ( S810D )
Kann mir jemand helfen? Die Obere kante und die Untere müssen entgratet werden!

Hallo Du kannst doch die Kontur ganz einfach definieren.
Dann würde ich das ganz einfach mit G Codes abfahren.

Glaub bloss nicht dass die HH so eine Kontur mit 10m Vorschub abfährt. Die rechnet genauso lang rum. Gut es kommt auf die Rechenleistung des Befehlsprozessors an aber ich denke da ist HH nicht recht viel schneller wie siemens. Da es ohnehin nur ums entgraten geht könntest du ja die Schrittweite vergrössern. Wenn die Teile im Rundtich oder Teilapparat gespannt sind könntest du probieren einfach ne ellipse aus Rund- und LinearAchse zu fräsen.

Das Progi läuft auf HH wunderbar! F2000 kein problem!
Bei Siemens läuft da ausser anfahren an die Kontur nix!
"Bildaufbereitung unterdrückt" wird dann angezeigt!

Kann mir einer der HH Profis mal erklären was diese Zeile bedeutet

24 CP PA+Q21 Z-Q32 DR+ ; KREISINTERPOLATION HALBKREIS IN Z AUF FASENTIEFE AM A-DU

ich interpretier das so Kreisbogen CCW alsoG3 auf Winkel Q31 und Tiefe q32 Allerdings ist mir nicht klar warum da soviel rumgerechnet wird. und warum es unbedingt ein polarer Kreis sein muss, da liegen doch eigentlich alle parameter vor so dass ein ganz normaler Kreisbogen auch lange würde.

Hallo Uli,

vermutlich aus dem Grund, weil man bei Heidenhain eine Spirale nur mit CP und Z-Zustellung programmieren kann. Ein normaler C-Satz mit Z-Zustellung lässt sich nicht schreiben.

So jetzt hab ichs mal ausprobiert. rennt doch wie der Teufel. Gut durch die ganze rechnerei kommt die Maschine bei den gegebenen Werten bloss auf 3300 Vorschub. Aber das sollte doch weiss gott langen. Wenn man weniger Abschnitte z.B. 120 macht sind aber schon 6m50 drin. Mein Programm läuft aber zur Zeit nur dann korrekt wenn die Welle parallel X liegt und die Bohrung zentrisch auf X0 Y0 ist. Aber ich denke mal die Änderung einen beliebigen Versatz in X,Y einzuführen wird nicht grossartig viel arbeit sein.

Ja!
klar läuft das auf HH nur halt auf Siemens nich!

@ Uli: Kannst Du dein Programm mal einstellen?

Na gut mach ich doch glatt

def real abschnitt=360, Dbohrg=84, Dwell=192, fasbr=0.5, Fed=2000, Sdis=2, Zaehler, posx, posy, posz, rbohrg, rwell, VersatzY=0; Def muss als allererste wirksame Zeile im programm stehen.

rbohrg=Dbohrg/2
rwell=Dwell/2

T1
m6
S6000 f=fed m3

G0 X0 Y0 Z=sdis
X=Rbohrg-10 Z0; Wert 10 abhängig vom Werkzeugdurchmesser
G1 G41 X=rbohrg
trans z=-fasbr

Repeat
Zaehler = Zaehler+(360/abschnitt)
Posx =rbohrg*cos(Zaehler)
Posy =rbohrg*sin(Zaehler) ;+VersatzY
Posz = SQRT(POT(rwell)-POT(posy)-rwell
G3 X=posx y=posy z=posz CR=Rbohrg
Until Zahler==360

G0 X0 Y0 Z10

M30

Ich habs jetzt noch ein wenig optimiert mittlerweile rennt das Teil mit 7Meter50 Möglicherweise ist ist noch etwas Tempo drin wenn ich den Teiler ausserhalb der Schleife ausrechne.

Wenn man jetzt noch einen Versatz aus der Mitte zulässt ändert sich im eigentlichen Programm nur dass zum Wert Posy der entsprechende Versatz dazugerechnet wird.

Und wenn man jetzt noch unterschiedliche Werte für X und YDurchmesser verwendet klappt das ganze auch mit ner Pseudoellipse. Allerdings sollte man dann auch den Bogenradius etwas anpassen.

Echt Klasse! Werd ich Morgen gleich mal ausprobieren!!
nochmal!

Sauber Uli! Besten Dank!

Achtung dominationmatze hat mich drauf aufmerksam gemacht ich hab im Satz
Posz = SQRT(POT(rwell)-POT(posy)-rwell eine Klammer vergessen

richtig ists so: Posz = SQRT(POT(rwell)-POT(posy))-rwell

und bei der Zustellung solltet ihr beachten dass ich das aus Geschwindigkeitsgründen über einen Trans befehl gemacht hab.
Es wäre genauso möglich im oberen Satz

Posz = SQRT(POT(rwell)-POT(posy))-rwell-fasbr

das mit in die Berechnung reinzuschreiben.

Es ist auch möglich einen Versatz in X und Z auf die obere Weise einfach in die Berechnung einzufügen. Das dauert zwar etwas länger zum Rechnen ist dafür aber Nebenwirkungsfrei was eventuelle Nullpunktverschiebungen betrifft.

Gruss Uli