0  BEGIN PGM 50151_DE MM 
1  ;Programm zum vorfraesen vom Zylinder
2  ;
3  L  Y-Q108 R0 F9999 M3 ;Vorpositionieren der Y-Achse
4  CC  X+0  Z+0 ;Zylindermittelpunkt
5  FN 1: Q26 =+Q6 + -Q108 ;Berechnung vom Radius auf dem die Werkzeugmitte faehrt
6  LP  PR+Q26  PA+90 ;Position in X und Z anfahren
7  LBL 1
8  CP IPA+1 DR+ F200 ;Winkel takten
9  L IY+Q8 F500 ;Verfahren in Y
10 CP IPA+3 DR+ F200 ;Winkel takten
11 L  Y-Q108 F500 ;Verfahren in Y
12 CALL LBL 1 REP44 ;Wiederholen der Winkeltaktung und der Y Bahnen
13 L  Z+50 R0 FMAX ;Freifahren
14 END PGM 50151_DE MM