RR(ALL_E)
100 MOVL P(1)110 WAIT RR(ALL_A)=0120 IF RR(ALL_E)!=0 THEN /* Confirming error status130 PRINT "ERROR STOP"140 ELSE150 PRINT "NORMAL STOP"160 END_IF170 PRX RR(ALL_E)