BEGIN ~gord~

IF ~GlobalLT("Chapter","GLOBAL",4)~ THEN BEGIN 0
  SAY @18579
  IF ~~ THEN REPLY @18580 GOTO 1
  IF ~~ THEN REPLY @18581 GOTO 2
END

IF ~~ THEN BEGIN 1
  SAY @18582
  IF ~~ THEN DO ~EscapeArea()~ UNSOLVED_JOURNAL @310338 EXIT
END

IF ~~ THEN BEGIN 2
  SAY @18583
  IF ~~ THEN DO ~EscapeArea()~ EXIT
END
