BEGIN ~ESRENAL~

IF ~True()~ THEN BEGIN 1a
      SAY @0 
      IF ~~ THEN REPLY @1 DO ~StartStore("ESLISTO1",LastTalkedToBy())~ EXIT
      IF ~~ THEN REPLY @2 GOTO 2a
      IF ~~ THEN REPLY @3  GOTO 6a  
END

IF ~~ THEN BEGIN 2a
SAY @4
IF ~GlobalLT("chapter","GLOBAL",4)~ THEN REPLY @5 GOTO 3a
IF ~~ THEN REPLY @6 GOTO 4a
IF ~~ THEN REPLY @7 GOTO 5a
IF ~~ THEN REPLY @8 DO ~StartStore("ESLISTO1",LastTalkedToBy())~ EXIT
IF ~~ THEN REPLY @9 GOTO 6a 
END

IF ~~ THEN BEGIN 3a
SAY @10
IF ~~ THEN REPLY @11 GOTO 2a
IF ~~ THEN REPLY @8 DO ~StartStore("ESLISTO1",LastTalkedToBy())~ EXIT
IF ~~ THEN REPLY @12 GOTO 6a
END


IF ~~  THEN BEGIN 4a
SAY @13
IF ~~ THEN REPLY @11 GOTO 2a
IF ~~ THEN REPLY @8 DO ~StartStore("ESLISTO1",LastTalkedToBy())~ EXIT
IF ~~ THEN REPLY @12 GOTO 6a
END

IF ~~ THEN BEGIN 5a
SAY @14
IF ~~ THEN REPLY @11 GOTO 2a
IF ~~ THEN REPLY @15 DO ~StartStore("ESLISTO1",LastTalkedToBy())~ EXIT
IF ~~ THEN REPLY @12 GOTO 6a
END

IF ~~ THEN BEGIN 6a
SAY @16
IF ~~ THEN EXIT
END


