BEGIN ~ENNA~

IF ~False()~ THEN BEGIN 0
  SAY  @40008
  IF ~~ THEN REPLY @40009 GOTO 7
  IF ~~ THEN REPLY @40010 DO ~~ EXIT
END

IF ~False()~ THEN BEGIN 1
  SAY @40011
  IF ~~ THEN REPLY @40012 DO ~~ GOTO 2
  IF ~~ THEN REPLY @40013 DO ~~ GOTO 3
  IF ~~ THEN REPLY @40014 DO ~~ GOTO 4
END

IF ~~ THEN BEGIN 2
  SAY @40015
  IF ~~ THEN DO ~~ EXIT
END

IF ~~ THEN BEGIN 3
  SAY @40016
  IF ~~ THEN DO ~~ EXIT
END

IF ~~ THEN BEGIN 4
  SAY @40017
  IF ~~ THEN DO ~~ EXIT
END

IF ~False()~ THEN BEGIN 5
  SAY @40018
  IF ~~ THEN DO ~~ EXIT
END

IF ~False()~ THEN BEGIN 6
  SAY @40019
  IF ~~ THEN DO ~~ EXIT
END

IF ~~ THEN BEGIN 7
  SAY @40020
  IF ~~ THEN DO ~~ EXIT
END
