0  BEGIN PGM 7095_DE MM 
1  ;Programm zum fertigen eines viereckigen
2  ;Trichters und einer Tasche am Grund.
3  ;Definition der Eckpunkte in X und Y
4  ;
5  BLK FORM 0.1 Z X+0 Y+0 Z-32
6  BLK FORM 0.2  X+100  Y+100  Z+0
7  ;
8  ;Werkzeugaufruf Fraeser
9  TOOL CALL 8 Z S4000
10 ;
11 L  Z+50 R0 FMAX M3
12 ;Definition der Ecken oben
13 FN 0: Q71 =+10 ;1.ECKE X-KOORDINATE
14 FN 0: Q72 =+10 ;1.ECKE Y-KOORDINATE
15 FN 0: Q73 =+10 ;2.ECKE X-KOORDINATE
16 FN 0: Q74 =+90 ;2.ECKE Y-KOORDINATE
17 FN 0: Q75 =+90 ;3.ECKE X-KOORINANTE
18 FN 0: Q76 =+90 ;3.ECKE Y-KOORDINATE
19 FN 0: Q77 =+90 ;4.ECKE X-KOORDINATE
20 FN 0: Q78 =+10 ;4.ECKE Y-KOORDINATE
21 FN 0: Q79 =+8 ;ECKENRADIUS
22 ;
23 ;Definition der Ecken unten
24 FN 0: Q81 =+30 ;1.ECKE X-KOORDINATE
25 FN 0: Q82 =+30 ;1.ECKE Y-KOORDINATE
26 FN 0: Q83 =+30 ;2.ECKE X-KOORDINATE
27 FN 0: Q84 =+70 ;2.ECKE Y-KOORDINATE
28 FN 0: Q85 =+70 ;3.ECKE X-KOORDINATE
29 FN 0: Q86 =+70 ;3.ECKE Y-KOORDINATE
30 FN 0: Q87 =+70 ;4.ECKE X-KOORDINATE
31 FN 0: Q88 =+30 ;4.ECKE Y-KOORDINATE
32 FN 0: Q89 =+14.9 ;ECKENRADIUS
33 ;
34 ;Schnittdaten
35 FN 0: Q90 =+100 ;VORSCHUB TIEFENZUSTELLUNG
36 FN 0: Q91 =+250 ;VORSCHUB FRAESEN
37 FN 0: Q24 =+1 ;SEITLICHES AUFMASS
38 FN 0: Q25 =+2 ;SICHERHEITABSTAND
39 FN 0: Q26 =+3 ;ZUSTELLTIEFE TASCHE UNTEN
40 FN 0: Q27 =+25 ;ANZAHL DER TIEFENZUSTELLUNGEN TRICHTER
41 FN 0: Q28 =+25 ;TIEFE TRICHTER
42 FN 0: Q29 =+30 ;TIEFE TASCHE UNTEN(ABSOLUT)
43 ;Aufruf Programm 70951_de
44 CALL PGM 70951_de
45 ;
46 ;Programmende
47 L  Z+200 R0 FMAX M30
48 END PGM 7095_DE MM