0  BEGIN PGM 8225_EN MM 
1  ;NC program with a simple machining operation.
2  ;When machining has been completed, the
3  ;control calls another program. There, it
4  ;increases the counter by one, compares the
5  ;current time with a time defined by you
6  ;in program 8220_en.h and then either sets
7  ;the counter to zero or jumps back to this
8  ;program, depending on the result of the
9  ;comparison.
10 ;
11 ;
12 BLK FORM 0.1 Z X-50 Y-50 Z-20
13 BLK FORM 0.2  X+50  Y+50  Z+0
14 ;
15 ;Tool call
16 TOOL CALL 8 Z S9000 F1000
17 L  Z+100 R0 FMAX M3
18 ;
19 ;Machining example
20 CYCL DEF 252 CIRCULAR POCKET ~
    Q215=+0    ;MACHINING OPERATION ~
    Q223=+50   ;CIRCLE DIAMETER ~
    Q368=+0    ;ALLOWANCE FOR SIDE ~
    Q207=+500  ;FEED RATE FOR MILLNG ~
    Q351=+1    ;CLIMB OR UP-CUT ~
    Q201=-18   ;DEPTH ~
    Q202=+5    ;PLUNGING DEPTH ~
    Q369=+0    ;ALLOWANCE FOR FLOOR ~
    Q206=+150  ;FEED RATE FOR PLNGNG ~
    Q338=+0    ;INFEED FOR FINISHING ~
    Q200=+2    ;SET-UP CLEARANCE ~
    Q203=+0    ;SURFACE COORDINATE ~
    Q204=+50   ;2ND SET-UP CLEARANCE ~
    Q370=+1    ;TOOL PATH OVERLAP ~
    Q366=+1    ;PLUNGE ~
    Q385=+500  ;FINISHING FEED RATE ~
    Q439=+0    ;FEED RATE REFERENCE
21 L  X+0  Y+0 R0 FMAX M99
22 ;
23 ;Program call to increase the counter and
24 ;to compare the times
25 CALL PGM 82251_en.h
26 ;
27 ;Program end
28 M30
29 END PGM 8225_EN MM