%BEGIN ! CHECKS MISPLACED ON EVENTS ARE FAULTED %INTEGER I %ROUTINE A %IF I=1 %START PRINTSTRING("HELLO") %FINISH %ELSE %START %ONEVENT 9 %START PRINTSTRING("GOODBYE") %FINISH %FINISH %END I=1 A %ENDOFPROGRAM