0  BEGIN PGM 4230_DE MM 
1  ;NC-Programm, um eine Foerderschraube zu
2  ;bearbeiten. Die Koerperform mit ihren
3  ;Hinterschnitten macht es noetig das
4  ;Werkzeug waehrend der Bearbeitung
5  ;anzustellen. Da somit beim Fraesen der Radien
6  ;eine Ausgleichsbewegung einer der Rundachsen
7  ;erfolgen muss, hat man die Funktion TCPM
8  ;verwendet.
9  ;Die Bearbeitung ist in drei Schritte
10 ;aufgeteilt: Schruppen, Vorschlichten und
11 ;Schlichten.
12 ;In diesem Hauptprogramm definieren Sie alle
13 ;benoetigten Parameter und Werkzeuge.
14 ;Zunaechst definieren Sie einige allgemeine
15 ;Parameter. Im Anschluss definieren Sie fuer
16 ;jeden Arbeitsschritt das Werkzeug und einige
17 ;Parameter. Nach den Definitionen erfolgt der
18 ;Aufruf eines weiteren NC-Programmes. In
19 ;diesem berechnet die Steuerung alle
20 ;weiteren benoetigten Daten und bearbeitet den
21 ;Koerper.
22 ;Die Kontur des Koerpers in der Ebene X/Y ist
23 ;ebenfalls in dem gerufenen Programm
24 ;programmiert.
25 ;!Wichtig! Die Bearbeitung muss mit
26 ;Kugelfraesern erfolgen. Ausserdem ist zu
27 ;beachten, dass dieses Programm fuer eine
28 ;Maschine mit der Kinematik B-Kopf und
29 ;C-Tisch erstellt ist.
30 ;
31 BLK FORM 0.1 Z X-35 Y-35 Z-40
32 BLK FORM 0.2  X+35  Y+35  Z+0
33 ;
34 ;Parametereingabe
35 FN 0: Q9 =+3 ;STARTPUNKT IN DER Z-ACHSE
36 FN 0: Q1 =-40 ;ENDPUNKT IN DER Z-ACHSE
37 FN 0: Q2 =+45 ;ROTATION DER KONTUR
38 FN 0: Q5 =+25 ;SICHERE HOEHE
39 FN 0: Q6 =+45 ;SICHERER RADIUS
40 ;
41 ;Schruppen
42 ;
43 ;Werkzeugaufruf fuer das Schruppen
44 TOOL CALL "BALL_MILL_D10" Z S3000 F1000
45 TOOL CALL  DL-Q108 ;Laengenkompensation ins Kugelzentrum
46 ;
47 ;Parameter fuer die Schruppbearbeitung
48 FN 0: Q3 =-2 ;ZUSTELLTIEFE
49 FN 0: Q4 =+90 ;ANSTELLWINKEL DER B-ACHSE
50 FN 0: Q7 =+5 ;AUFMASS
51 CALL PGM 42301_de.h
52 ;
53 ;Werkzeugaufruf fuer das Vorschlichten
54 TOOL CALL "BALL_MILL_D8" Z S18000 F1000
55 TOOL CALL  DL-Q108 ;Laengenkompensation ins Kugelzentrum
56 ;
57 ;Parameter fuer das Vorschlichten
58 FN 0: Q3 =-1 ;ZUSTELLTIEFE
59 FN 0: Q4 =+75 ;ANSTELLWINKEL DER B-ACHSE
60 FN 0: Q7 =+1 ;AUFMASS
61 CALL PGM 42301_de.h
62 ;
63 ;Werkzeugaufruf fuer das Schlichten
64 TOOL CALL "BALL_MILL_D6" Z S20000 F600
65 TOOL CALL  DL-Q108 ;Laengenkompensation ins Kugelzentrum
66 ;
67 ;Parameter fuer das Schlichten
68 FN 0: Q3 =-0.5 ;ZUSTELLTIEFE
69 FN 0: Q4 =+60 ;ANSTELLWINKEL DER B-ACHSE
70 FN 0: Q7 =+0 ;AUFMASS
71 CALL PGM 42301_de.h
72 ;
73 ;Programmende
74 M30
75 END PGM 4230_DE MM