BEGIN ~chante2~

IF ~True()~ THEN BEGIN 0
  SAY @20404
  IF ~~ THEN REPLY @20406 GOTO 1
  IF ~~ THEN REPLY @20407 GOTO 2
END

IF ~~ THEN BEGIN 1
  SAY @20411
  IF ~~ THEN REPLY @20422 DO ~EscapeArea()~ EXIT
  IF ~~ THEN REPLY @20424 GOTO 2
END

IF ~~ THEN BEGIN 2
  SAY @20429
  IF ~~ THEN REPLY @20431 GOTO 3
  IF ~~ THEN REPLY @20437 GOTO 4
END

IF ~~ THEN BEGIN 3
  SAY @20439
  IF ~~ THEN DO ~EscapeArea()~ UNSOLVED_JOURNAL @310335 EXIT
END

IF ~~ THEN BEGIN 4
  SAY @20447
  IF ~~ THEN REPLY @20448 GOTO 5
END

IF ~~ THEN BEGIN 5
  SAY @20449
  IF ~~ THEN DO ~EscapeArea()~ JOURNAL @310761 EXIT
END
