0 BEGIN PGM 8270_NL MM 
1 ;NC-programma om een referentiepunt te
2 ;activeren en een bewerking te simuleren.
3 ;De bewerking wordt in dit
4 ;voorbeeldprogramma door een stilstandtijd
5 ;gesimuleerd. Vervolgens roept de besturing
6 ;een ander NC-programma op om waarden in
7 ;een protocoltabel te schrijven.
8 ;Nadat het opgeroepen NC-programma is
9 ;uitgevoerd, beëindigt de besturing dit
10 ;NC-programma.
11 BLK FORM 0.1 Z X-25 Y-25 Z-70
12 BLK FORM 0.2  X+25  Y+25  Z+0
13 ;
14 ;Referentiepunt activeren
15 CYCL DEF 247 BEZUGSPUNKT SETZEN ~
   Q339=+2    ;BEZUGSPUNKT-NUMMER
16 ;
17 ;Gereedschap oproepen
18 TOOL CALL 3 Z S10000 F300
19 ;
20 ;Vrijzetten
21 L  Z+100 R0 FMAX M3
22 ;
23 ;Simulatie van een bewerking door een
24 ;stilstandtijd
25 CYCL DEF 9.0 VERWEILZEIT
26 CYCL DEF 9.1 V.ZEIT120
27 ;
28 ;Oproep van het NC-programma
29 ;82701_nl.h om waarden uit dit
30 ;NC-programma in een protocoltabel
31 ;te schrijven
32 CALL PGM 82701_nl.h
33 ;
34 ;Einde programma
35 M30
36 END PGM 8270_NL MM