0  BEGIN PGM M55 MM 
1  WRITE TO PLC KEY "WG_Nummer_aktives_NC_Macro" =+55 ; NUMBER NC MACRO ON
2  FN 18: SYSREAD Q1 = ID290 NR1
3  FN 9: IF +Q1 EQU +3 GOTO LBL "END"
4  M55
5  FN 17: SYSWRITE ID 290 NR1 =+3
6  M36
7  FN 20: WAIT FOR  SYNC
8  FN 20: WAIT FOR  MG_Maschinenparameter_synchron ==1
9  LBL "END"
10 WRITE TO PLC KEY "WG_Nummer_aktives_NC_Macro" =-1 ; NC MACRO OFF
11 END PGM M55 MM