0  BEGIN PGM PALLET MM 
1  FN 17: SYSWRITE ID 2000 NR70 IDX7098 =+1003 ; NUMBER NC MACRO ON
2  FN 18: SYSREAD Q0 = ID510 NR2 IDX0 ; PAL No
3  FN 19: PLC =+Q0 / +0
4  M60
5  FN 17: SYSWRITE ID 2000 NR70 IDX7098 =-1 ; NC MACRO OFF
6  END PGM PALLET MM