0  BEGIN PGM skosy4x MM
1  BLK FORM 0.1 Z  X-120  Y-64  Z-60
2  BLK FORM 0.2  X+120  Y+64  Z+0
/ 3  TOOL CALL 25 Z S1500 DL+0 DR+0
4  TOOL CALL 31 Z S3000 DL-1.8 DR-2.5
5  L M3
6  L  C+0  A+0 R0 FMAX M126
7  L M3 M7
8  FN 0: Q1 =+120 ; X
9  FN 0: Q2 =+64 ; Y
10 L  C+0  A+0 R0 FMAX M126
11 CYCL DEF 7.0 PUNKT BAZOWY
12 CYCL DEF 7.1  X-Q1
13 CYCL DEF 7.2  Y+Q2
14 CALL LBL 1
15 CYCL DEF 7.0 PUNKT BAZOWY
16 CYCL DEF 7.1  X+Q1
17 CYCL DEF 7.2  Y+Q2
18 CYCL DEF 10.0 OBROT
19 CYCL DEF 10.1  ROT-90
20 CALL LBL 1
21 CYCL DEF 10.0 OBROT
22 CYCL DEF 10.1  ROT+0
23 CYCL DEF 7.0 PUNKT BAZOWY
24 CYCL DEF 7.1  X+Q1
25 CYCL DEF 7.2  Y-Q2
26 CYCL DEF 10.0 OBROT
27 CYCL DEF 10.1  ROT+180
28 CALL LBL 1
29 CYCL DEF 10.0 OBROT
30 CYCL DEF 10.1  ROT+0
31 CYCL DEF 7.0 PUNKT BAZOWY
32 CYCL DEF 7.1  X-Q1
33 CYCL DEF 7.2  Y-Q2
34 CYCL DEF 10.0 OBROT
35 CYCL DEF 10.1  ROT+90
36 CALL LBL 1
37 L M9
38 L M140 MB MAX F99999
39 L  X+0  Y+0 R0 FMAX M92
40 L M30
41 LBL 1
42 FN 0: Q3 =+0
43 L  X-12  Y+12 R0 FMAX
44 L  Z+10 FMAX
45 L  Z+1 F1000
46 LBL 2
47 L  Z+Q3 F600
48 L  X-1  Y-26 RL F1000
49 L  X+26  Y+1
50 L  X-12  Y+12 R0
/ 51 FN 2: Q3 =+Q3 - +0.5
/ 52 FN 11: IF +Q3 GT -6.01 GOTO LBL 2
53 L  Z+100 R0 FMAX
54 LBL 0
55 END PGM skosy4x MM