BEGIN ~tralit~

IF ~True()~ THEN BEGIN 0
  SAY @20247
  IF ~~ THEN REPLY @20249 GOTO 1
  IF ~~ THEN REPLY @20261 GOTO 2
END

IF ~~ THEN BEGIN 1
  SAY @20252
  IF ~~ THEN DO ~EscapeArea()~ JOURNAL @310598 EXIT
END

IF ~~ THEN BEGIN 2
  SAY @20262
  IF ~~ THEN REPLY @20265 GOTO 3
  IF ~~ THEN REPLY @20269 GOTO 4
END

IF ~~ THEN BEGIN 3
  SAY @20266
  IF ~~ THEN JOURNAL @310598 EXIT
END

IF ~~ THEN BEGIN 4
  SAY @20270
  IF ~~ THEN DO ~EscapeArea()~ JOURNAL @310598 EXIT
END
