BEGIN PGM 278 MM
FN 18: SYSREAD Q0 = ID210 NR4 IDX1
FN 18: SYSREAD Q1 = ID210 NR4 IDX2
FN 18: SYSREAD Q2 = ID210 NR4 IDX3
Q0 = Q0 + Q1 + Q2  
FN 9: IF +Q0 EQU +3 GOTO LBL 1
FN 14: ERROR = 1007
LBL 1 
L  Z+Q200 R0 FMAX
L  X+Q225  Y+Q226 R0 FMAX
END PGM 278 MM 
