0  BEGIN PGM 3080_DE MM 
1  ;NC-Programm, um eine schraege Flaeche zu bearbeiten.
2  ;Die Werkzeugbewegung erfolgt mit den drei Linearachsen
3  ;X, Y und Z und kann somit auch auf einer 
4  ;3-Achs-Maschine erfolgen.
5  ;Die Bearbeitung kann sowohl mit einem Schaftfraeser,
6  ;einem Kugelfraeser oder einem Torusfraeser erfolgen.
7  ;Die Steuerung liest im NC-Programm den
8  ;Werkzeugschneidenradius R2 aus der Werkzeugtabelle und
9  ;berechnet daraus den schneidenen Punkt am Werkzeug.
10 ;Ebenso berechnet die Steuerung aus den von Ihnen
11 ;definierten Parametern die Werkzeugbahnen und bearbeitet
12 ;die Flaeche.
13 ;
14 ;Mit den Parametern zur Definition der Flaeche bestimmen 
15 ;Sie die Position und die Lage der zu bearbeitenden Flaeche. 
16 ;Dabei haben Sie die Moeglichkeit, zunaechst den Nullpunkt  
17 ;zu verschieben. Anschliessend koennen Sie das
18 ;Koordinatensystem um den Nullpunkt rotieren. Danach
19 ;definieren Sie die Flaeche ueber zwei Punkte in der
20 ;Ebene X/Y und eine Laenge der Flaeche in der Y-Richtung. 
21 ;Dabei ist zu beachten, dass die Flaeche immer an der
22 ;Koordinate Y0 beginnt und Sie von dort eine inkrementale
23 ;Laenge definieren.
24 ;In einem zweiten Parameterblock definieren Sie die Werte der
25 ;Werkzeugbahnen. Hierbei ist zu beachten, dass Sie mit dem
26 ;Parameter ANZAHL DER FRAESBAHNEN die Oberflaechenguete 
27 ;beeinflussen koennen, denn die Steuerung verteilt die
28 ;Fraesbahnen gleichmaessig auf der Flaeche.
29 ;Danach ruft die Steuerung das als Zyklus definierte
30 ;NC-Programm 30801_de.h  auf und fuehrt in diesem NC-Programm
31 ;alle Berechnungen und Bewegungen aus.
32 ;
33 BLK FORM 0.1 Z X+0 Y+0 Z-42
34 BLK FORM 0.2  X+100  Y+100  Z+0
35 ;
36 ;Werkzeugaufruf
37 TOOL CALL "TORUS_MILL_D6_1" Z S8000
38 ;
39 L  Z+50 R0 FMAX M3 ;Z-Achse auf sichere Position fahren
40 ;
41 ;NC-Programm 30801_de.h als Zyklus definieren
42 CYCL DEF 12.0 PGM CALL
43 CYCL DEF 12.1 PGM 30801_de.H
44 ;
45 ;Parameter zur Definition der Flaeche 
46 FN 0: Q1 =+100 ;VERSCHIEBUNG NULLPUNKT IN X
47 FN 0: Q2 =+0 ;VERSCHIEBUNG NULLPUNKT IN Y
48 FN 0: Q3 =+0 ;VERSCHIEBUNG NULLPUNKT IN Z
49 FN 0: Q4 =+45 ;DREHUNG DER BEARBEITUNG UM NULLPUNKT
50 FN 0: Q6 =+0 ;X-KOORDINATE VOM STARTPUNKT DER FLAECHE
51 FN 0: Q7 =+0 ;Z-KOORDINATE VOM STARTPUNKT DER FLAECHE
52 FN 0: Q8 =+70.5 ;X-KOORDINATE VOM ENDPUNKT DER FLAECHE
53 FN 0: Q9 =-30 ;Z-KOORDINATE VOM ENDPUNKT DER FLAECHE
54 FN 0: Q12 =+141 ;INKREMENTALE LAENGE DER FLAECHE IN Y-RICHTUNG
55 ;               ;STARTPUNKT IST BEI Y0
56 ;Definition der Flaeche abgeschlossen
57 ;
58 ;Parameter zur Definition der Fraesbahnen 
59 FN 0: Q20 =+400 ;VORSCHUB EINTAUCHEN
60 FN 0: Q21 =+1000 ;VORSCHUB FRAESEN
61 FN 0: Q23 =+2 ;AUFMASS IN DER WERKZEUGACHSE
62 FN 0: Q24 =+2 ;AUFMASS IN DER EBENE
63 FN 0: Q25 =+10 ;SICHERHEITSABSTAND IN DER WERKZEUGACHSE
64 FN 0: Q26 =+50 ;ANZAHL DER FRAESBAHNEN
65 ;Definition der Parameter abgeschlossen
66 ;
67 L  X+50  Y+0 R0 F9999 M99 ;Werkzeug vorpositionieren und Zyklusaufruf 
68 ;
69 ;In diesem Beispielprogramm erfolgt eine zweite 
70 ;Bearbeitung der Flaeche zum Schlichten.
71 ;Dazu werden die Parameter fuer die Fraesbahnen
72 ;mit den Schlichtwerten erneut definiert.
73 ;
74 ;Parameter zur Definition der Fraesbahnen 
75 FN 0: Q20 =+400 ;VORSCHUB EINTAUCHEN
76 FN 0: Q21 =+800 ;VORSCHUB FRAESEN
77 FN 0: Q23 =+0 ;AUFMASS IN DER WERKZEUGACHSE
78 FN 0: Q24 =+0 ;AUFMASS IN DER EBENE
79 FN 0: Q25 =+10 ;SICHERHEITSABSTAND IN DER WERKZEUGACHSE
80 FN 0: Q26 =+200 ;ANZAHL DER FRAESBAHNEN
81 ;Definition der Parameter abgeschlossen
82 ;
83 L  X+50  Y+0 R0 F9999 M99 ;Werkzeug vorpositionieren und Zyklusaufruf 
84 ;
85 L  Z+50 R0 FMAX M2 ;Freifahren und Programmende
86 END PGM 3080_DE MM