0 BEGIN PGM CASE_1 MM 1 ; Bereich mit Ladewerten 2 Q1 = +6 ; Anzahl der Bearbeitungen 3 Q2 = Q1 - +1 ; Berechnung der Wiederholungen 4 Q3 = -60 ; Startwinkel 5 ; Beginn des Hauptprogramms 6 BLK FORM 0.1 Z X-50 Y-50 Z-50 7 BLK FORM 0.2 X+50 Y+50 Z+0 8 TOOL CALL 5 Z S2000 F200 9 L X+0 Y+0 Z+200 A+0 C+0 R0 FMAX 10 ; 11 ; Programmteilwiederholung 12 LBL 9 13 ; Nullpunkt der Drehachse auf berechneten Winkel verschieben 14 CYCL DEF 7.0 NULLPUNKT 15 CYCL DEF 7.1 CQ3 16 ; Bezugssystem drehen 17 CYCL DEF 10.0 DREHUNG 18 CYCL DEF 10.1 ROTQ3 19 M128 ; Werkzeuganstellung automatisch kompensieren 20 L X+0 Y+10 Z+50 A-80 C+0 FMAX ; Werkzeug vorpositionieren und anstellen 21 L X+0 Y+10 Z+10 F2000 ; Werkzeug zustellen 22 L X+0 Y+90 Z-20 A-15 C+0 ; Kontur bearbeiten und Anstellung verändern 23 L X+0 Y+90 Z+50 ; Werkzeug freifahren 24 L X+0 Y+10 Z+50 FMAX ; Werkzeug vorpositionieren 25 M129 ; M128 deaktivieren 26 Q3 = Q3 + ( +360 / Q1 ) ; Winkel für nächste Bearbeitung berechnen 27 CALL LBL 9 REPQ2 28 ; 29 ; Programm beenden inkl. Rücksetzen und Freifahren 30 * - ... 31 CALL LBL "RESET" 32 ; 33 M30 34 ; 35 * - LBL RESET 36 LBL "RESET" 37 M129 38 CALL LBL "SAFE" 39 CYCL DEF 8.0 SPIEGELUNG 40 CYCL DEF 8.1 41 CYCL DEF 10.0 DREHUNG 42 CYCL DEF 10.1 ROT+0 43 PLANE RESET TURN FMAX 44 CYCL DEF 7.0 NULLPUNKT 45 CYCL DEF 7.1 X+0 46 CYCL DEF 7.2 Y+0 47 CYCL DEF 7.3 Z+0 48 LBL 0 49 ; 50 * - LBL SAFE 51 LBL "SAFE" 52 M140 MB MAX M3 53 L Z+300 R0 FMAX M91 54 L X+400 Y-300 R0 FMAX M91 55 LBL 0 56 END PGM CASE_1 MM