Gravurzyklus 840D

Hallo zusammen,

ich bin auf der Suche nach einem Gravurzyklus der bei der 840 D/810 D in der Y/Z - Ebene (G19) funktioniert. Ich benötige den Zyklus auf der Drehmaschine um mit angetriebenen Werkzeugen auf der Mantelfläche von Drehteilen Schriften zu gravieren. Für die Ebene X/Y (G17) habe ich einen Zyklus, der auch Problemlos funktioniert. Jedoch lässt er sich nicht auf Ebene G19 umsetzen.
Bin gespannt auf Eure Antworten.

Viele Grüße,
Stephan

Hallo Stephan,

Ich habe ein Gravierzyklus zum Gravieren von Mantelflächen geschrieben geschrieben, allerdings nur für Heidenhain auf Fräsmaschinen.
Ich denke, dass das System das gleiche ist, da das Werkstück genau achsmittig zur Drehachse gespannt werden muss. Der Zyklus funktioniert dann über die C-Achse ( Drehachse ) und X-Achse ( bei dir wahrscheinlich Z )

Und so sieht es bei Heidenhain aus ( aber nur für die Zahl ?0?) :

1 ; CYCLUS ZUM GRAVIEREN VON ZAHLEN AUF RUNDEN FLAECHEN (FUER 5ACHS MIT ~
C U. X )
2 ;
3 ; Q1 -----> CODE FUER ZAHL
4 ; Q2 -----> GRAVUR TIEFE
5 ; Q3 -----> GROESS DER ZAHL
6 ; Q20 ----> WERKSTUEKRADIUS
7 ;
8 Q5 = -1 + Q2 ; ABSTAND 1
9 FN 0: Q14 = +1 ; WINKELSCHRITT FUER KREISBERECHNUNG
10 ;
11 FN 9: IF +Q1 EQU +0 GOTO LBL 10
12 FN 9: IF +Q1 EQU +1 GOTO LBL 1
13 FN 9: IF +Q1 EQU +2 GOTO LBL 2
14 FN 9: IF +Q1 EQU +3 GOTO LBL 3
15 FN 9: IF +Q1 EQU +4 GOTO LBL 4
16 FN 9: IF +Q1 EQU +5 GOTO LBL 5
17 FN 9: IF +Q1 EQU +6 GOTO LBL 6
18 FN 9: IF +Q1 EQU +7 GOTO LBL 7
19 FN 9: IF +Q1 EQU +8 GOTO LBL 8
20 FN 9: IF +Q1 EQU +9 GOTO LBL 9
21 STOP
22 ; >>> ZAHL NICHT DEFINIERT <<<<
23 ;
24 * - --Q1=10-->0-- NG
25 LBL 10 ; FUER 0
26 Q11 = 0.25 * Q3
27 L IX-Q11 R0 F MAX
28 L IZ+Q5 R0 FQ88
29 Q15 = -180
30 LBL 108 ; <-
31 Q15 = Q15 + Q14
32 Q10 = ASIN (((COS (Q15 + Q14) * (0.25 * Q3)) - (COS Q15 * (0.25 * ~
Q3))) / Q20)
33 Q11 = (SIN Q15 * (0.25 * Q3)) - (SIN (Q15 + Q14) * (0.25 * Q3))
34 L IX+Q11 IC+Q10
35 FN 10: IF +Q15 NE +0 GOTO LBL 108 ; ->
36 Q11 = 0.5 * Q3
37 L IX-Q11
38 Q15 = 0
39 LBL 109 ; <-
40 Q15 = Q15 + Q14
41 Q10 = ASIN (((COS (Q15 + Q14) * (0.25 * Q3)) - (COS Q15 * (0.25 * ~
Q3))) / Q20)
42 Q11 = (SIN Q15 * (0.25 * Q3)) - (SIN (Q15 + Q14) * (0.25 * Q3))
43 L IX+Q11 IC+Q10
44 FN 10: IF +Q15 NE +180 GOTO LBL 109 ; ->
45 L IX+Q11
46 L IZ-Q5 R0 F MAX
47 FN 9: IF +1 EQU +1 GOTO LBL 11 ; ---->
48 ;
und so weiter ??????????..

Hoffentlich nützt dir das was, viel spaß beim basteln.

gsteff

Moin Stefan,

ich glaube du kannst deinen Gravurzyklus auch auf der Mantelflaeche benutzen, indem du mit ATRANS und AROT das Wks verdrehst. Hier mal ein Beispiel von einer Gildemeister Twin65 mit 840D (Gravieren auf einem 50er Durchmesser in Umfangsrichtung). Vielleicht kannst du das so oder ähnlich auch anwenden.
Gruß
Teileschneider

N010 M814
N015 G17 DIAMOF
N020 G54
N025 G59 X0 Y0 Z=RG720
N030 T1
N035 TC(1)
N040 L707(0) ;C-ACHSE EIN
N045 SETMS(1)
N050 G0 G90 G95 S1=4000 M1=3 F0.05 M108
N055 G0 Z-5
N060 G0 X27 Y0
N065 TRACYL_S4(50)
N070 ATRANS X25 Z-5
N075 AROT Y90
N080 AROT Z90
N085 G0 X0 Y0 Z2
N090 CYCLEGRA(...) ;***Gravurzyklus***
N095 G0 G90 Z2
N100 TRANS_OFF
N105 L708 ;C-ACHSE AUS
N110 M1=5 M109
N115 L711(1) ;WERKZEUGWECHSELPUNKT
N120 M17

Hallo Teileschneider,

vielen Dank für Deinen Tip mit der Drehung.
Es funktioniert !!!!!!!!!!!!

Viele Grüße,

Stephan