Gewinde fräsen auf Haas Fräsmaschine

Hallo an alle Kollegen,

hab hier ein Problem. Ich hab eine Haas Fräsmaschine vor mir und muß ein Programm schreiben zum Gewinde fräsen.
Gewindegröße M16 x 1,5 in eine Stahlplatte durchgehend, Wendeschneidplatten Gewindefräser mit einer Platte
Gibt es bei der Haas Steuerung einen Gewindefräszyklus?
Wie programmiere ich das am besten, ich hoffe es kann mir jemand helfen.
Kenn mich mit diesen Haas Steuerungen nicht aus.

Vielen Dank für Eure Hilfe

Grüße

holla,

die haas, soweit ich sie kenne, is mit zyklen recht geizig!

ich würde es inkremental prorammieren, zb:

G00 X0 Y0
Z-20
G91
G01 G41 D01 X8 F100
G3 I-8 Z1,5 L10
G40 G01 X-8
G90 G00 Z100 M30

gruss.....

Hallo MK1905 !!!

Schau mal hier nach.

http://www.emuge.de/deutsch/medien/softwar...fe_deutsch.html

das ist mit die beste lösung finde ich. so programmier ich meine gewinde auch Z1.5 ist die Steigung des gewindes und L10 die widerholungen.

theoretisch müsste deine haas maschine im Visual Quick Code einen gewindeschneidzyklus haben. bei der nicht neusten software drücke edit un ddreimal programm/conversation. Bei der 2009er software gibts den auch, allerdings weiß ich im moment nicht, wie man den aufruft.

du meinst wohl G84 und G74 fürs gewindeschneiden. ansonsten gibt es keine vorlage fürs gewinde fräsen. unser vorredner wollte ein gewinde fräsen mit ein einzahn oder vergleichbares.

Hallo,
habe das mal selber geschrieben,musst du in Visual Quick Code einfügen.
Ist für Metrische und Zollgewinde(Innengewinde passt,Aussengewinde habee ich noch nicht getestet).Muss du halt anpassen.
Gruß Jürgen

N900
(CATEGORY)
(NAME GEWINDEFRAESEN)

N901
(TEMPLATE)
(NAME I.D. Gewindefraesen METRISCH)

(DIAGRAM)

(LINE [40,0] [40,1]) (CENTER LINES)
(LINE [0,0] [0,1])

(DATUM [19,14])

(CIRCLE [19,14] 13)

(LINE [23,15] [25,13])
(LINE [25,15] [23,13])
(LINE [29,15] [31,13])
(LINE [31,15] [29,13])

(ARROW [20,14] [23,14])

(CCW [30,16] [24,16] 4)
(LINE [24,17] [24,16])
(LINE [24,16] [25,16])

(CCW [24,12] [30,12] 4)
(LINE [30,11] [30,12])
(LINE [29,12] [30,12])

(LINE [5,31] [5,24])
(LINE [33,31] [33,24])
(ARROW [15,30] [5,30])
(ARROW [23,30] [33,30])

(PRINT [13,20] XPos,YPos=Mitte)

(END DIAGRAM)

(PARAMETERS)

(#DPos)
(NO DECIMAL)

(#ThrdDpth)
(LABEL GwndSchntief)

(#AnzGwSt)
(LABEL AnzahlGwSteigung)
(NO DECIMAL)

(#Feedrate)
(LABEL Vorschub)

(#MajorDia)
(LABEL GewindinnenD)
(POSITION [16,32])

(#ThdPitch)
(LABEL Steigung)


(END PARAMETERS)

(GCODE)
N1 (#660=1)
N1 (#661=#AnzGwSt)
N1 (G00 Z#ThrdDpth )
N1 (G91)
N1 (G01 G42 Y[#MajorDia/2] D#DPos F#Feedrate)
N1 (WH[#661GE#660]DO1)
N1 (G02 J-[#MajorDia/2] I0 Z[-#ThdPitch])
N1 (#660=#660+1)
N1 (END1)
N1 (G00 G40 Y[-#MajorDia/2] )
N1 (G90)
N1 (G00 Z5.)
N1 (M99)

(END GCODE)

(END TEMPLATE)

N902
(TEMPLATE)
(NAME A.D. Gewindefraesen METRISCH)

(DIAGRAM)

(LINE [40,0] [40,1]) (CENTER LINES)
(LINE [0,0] [0,1])

(DATUM [19,14])

(CIRCLE [19,14] 13)

(LINE [33,15] [35,13])
(LINE [35,15] [33,13])
(LINE [39,15] [41,13])
(LINE [41,15] [39,13])

(ARROW [38,14] [36,14])

(CCW [40,16] [34,16] 4)
(LINE [34,17] [34,16])
(LINE [34,16] [35,16])

(CCW [34,12] [40,12] 4)
(LINE [40,11] [40,12])
(LINE [39,12][40,12])

(LINE [5,31] [5,24])
(LINE [33,31] [33,24])
(ARROW [15,30] [5,30])
(ARROW [23,30] [33,30])

(PRINT [13,20] XPos,YPos=Mitte)

(END DIAGRAM)

(PARAMETERS)

(#XPos)

(#YPos)

(#DPos)


(#ThrdDpth)
(LABEL GwndSchntief)

(#Feedrate)
(LABEL Vorschub)

(#AnzGwSt)
(LABEL AnzahlGwSteigung)
(NO DECIMAL)

(#MinorDia)
(LABEL GewindaussenD)
(POSITION [16,31])

(#ThdPitch)
(LABEL Steigng)

(#CuterRad)
(LABEL Fraesrradius)

(END PARAMETERS)

(GCODE)

N1 (#660=1)
N1 (#661=#AnzGwSt)
N1 (G01 Z[-#ThdPitch+#ThrdDpth] F1254.)
N1 (G41 Y[#YPos+#ArcInOut] D#DPos)
N1 (G02 I-[#MinorDia/2] J0 Z-#ThrdDpth )
N1 (WH[#661GE#660]DO1)
N1 (G03 I-[#MinorDia/2] J0 Z[-[#660*#ThdPitch]+#ThrdDpth])
N1 (#660=#660+1)
N1 (END1)
N1 (G01 G40 X[#XPos+#MinorDia/2+#ArcInOut] Y#YPos)
N1 (G00 Z5.)
N1 (M99)

(END GCODE)

(END TEMPLATE)
N903
(TEMPLATE)
(NAME I.D. Gewindefraesen ZOLL)

(DIAGRAM)

(LINE [40,0] [40,1]) (CENTER LINES)
(LINE [0,0] [0,1])

(DATUM [19,14])

(CIRCLE [19,14] 13)

(LINE [23,15] [25,13])
(LINE [25,15] [23,13])
(LINE [29,15] [31,13])
(LINE [31,15] [29,13])

(ARROW [20,14] [23,14])

(CCW [30,16] [24,16] 4)
(LINE [24,17] [24,16])
(LINE [24,16] [25,16])

(CCW [24,12] [30,12] 4)
(LINE [30,11] [30,12])
(LINE [29,12] [30,12])

(LINE [5,31] [5,24])
(LINE [33,31] [33,24])
(ARROW [15,30] [5,30])
(ARROW [23,30] [33,30])

(PRINT [13,20] XPos,YPos=Mitte)
(PRINT [0,5] R1/8"=0.125)
(PRINT [0,7] R1/4"=0.25)
(PRINT [0,9] R3/8"=0.375)
(PRINT [0,11] R1/2"=0.5)
(PRINT [0,13] R3/4"=0.75)
(PRINT [30,5] R1"=1.0)
(PRINT [30,7] R1 1/4"=1.25)
(PRINT [30,9] R1 1/2"=1.5)
(PRINT [30,11] R2"=2.)

(END DIAGRAM)


(PARAMETERS)


(#DPos)
(NO DECIMAL)


(#ThrdDpth)
(LABEL GwndSchntief)

(#Feedrate)
(LABEL Vorschub)

(#AnzGwSt)
(LABEL AnzahlGwSteigung)
(NO DECIMAL)


(#GwBez)
(LABEL Gewindebez.)

(END PARAMETERS)

(GCODE)

N1 (#660=1)
N1 (#661=#AnzGwSt)
N1 (#662=#GwBez)
N2 (#667=0.907)
N1 (#675=9.7)
N1 (IF[#662 EQ 0.125]THEN #667=0.907)
N1 (IF[#662 EQ 0.250]THEN #667=1.337)
N1 (IF[#662 EQ 0.375]THEN #667=1.337)
N1 (IF[#662 EQ 0.500]THEN #667=1.814)
N1 (IF[#662 EQ 0.750]THEN #667=1.814)
N1 (IF[#662 EQ 1.000]THEN #667=2.309)
N1 (IF[#662 EQ 1.250]THEN #667=2.309)
N1 (IF[#662 EQ 1.500]THEN #667=2.309)
N1 (IF[#662 EQ 2.000]THEN #667=2.309)
N1 (IF[#662 EQ 0.125]THEN #675=9.7)
N1 (IF[#662 EQ 0.250]THEN #675=13.14)
N1 (IF[#662 EQ 0.375]THEN #675=16.68)
N1 (IF[#662 EQ 0.500]THEN #675=21.0)
N1 (IF[#662 EQ 0.750]THEN #675=26.45)
N1 (IF[#662 EQ 1.000]THEN #675=33.26)
N1 (IF[#662 EQ 1.250]THEN #675=41.9)
N1 (IF[#662 EQ 1.500]THEN #675=47.8)
N1 (IF[#662 EQ 2.000]THEN #675=59.6)
N1 (G00 Z#ThrdDpth )
N1 (G91)
N1 (G01 G42 Y[#675/2] D#DPos F#Feedrate)
N1 (WH[#661GE#660]DO1)
N1 (G02 J-[#675/2] I0 Z[-#667])
N1 (#660=#660+1)
N1 (END1)
N1 (G00 G40 Y[-#675/2])
N1 (G90)
N1 (G00Z5.)
N1 (M99)


(END GCODE)

(END TEMPLATE)
N904
(TEMPLATE)
(NAME A.D. Gewindefraesen ZOLL)

(DIAGRAM)

(LINE [40,0] [40,1]) (CENTER LINES)
(LINE [0,0] [0,1])

(DATUM [19,14])

(CIRCLE [19,14] 13)

(LINE [33,15] [35,13])
(LINE [35,15] [33,13])
(LINE [39,15] [41,13])
(LINE [41,15] [39,13])

(ARROW [38,14] [36,14])

(CCW [40,16] [34,16] 4)
(LINE [34,17] [34,16])
(LINE [34,16] [35,16])

(CCW [34,12] [40,12] 4)
(LINE [40,11] [40,12])
(LINE [39,12][40,12])

(LINE [5,31] [5,24])
(LINE [33,31] [33,24])
(ARROW [15,30] [5,30])
(ARROW [23,30] [33,30])

(PRINT [13,20] XPos,YPos=Mitte)

(END DIAGRAM)

(PARAMETERS)

(#XPos)

(#YPos)

(#DPos)


(#ThrdDpth)
(LABEL GwndSchntief)

(#Feedrate)
(LABEL Vorschub)

(#AnzGwSt)
(LABEL AnzahlGwSteigung)
(NO DECIMAL)

(#MinorDia)
(LABEL GewindKleinD)
(POSITION [16,31])

(#ThdPitch)
(LABEL Steigung)

(#CuterRad)
(LABEL Fraesrradius)

(END PARAMETERS)

(GCODE)

N1 (#660=1)
N1 (#661=#AnzGwSt)
N1 (#662=0.907)
N1 (#663=1.337)
N1 (#664=1.814)
N1 (#665=2.309)
N1 (G01 Z[-#ThdPitch+#ThrdDpth] F1254.)
N1 (G41 Y[#YPos+#ArcInOut] D#DPos)
N1 (G02 I-[#MinorDia/2] J0 Z-#ThrdDpth )
N1 (WH[#661GE#660]DO1)
N1 (G03 I-[#MinorDia/2] J0 Z[-[#660*#ThdPitch]+#ThrdDpth])
N1 (#660=#660+1)
N1 (END1)
N1 (G01 G40 X[#XPos+#MinorDia/2+#ArcInOut] Y#YPos)
N1 (G00 Z5.)
N1 (M99)

(END GCODE)

(END TEMPLATE)
(END CATEGORY)