BEGIN ~BG1X41~

IF ~True()~ THEN BEGIN INTRO1
SAY @0
=
@1
IF ~~ THEN REPLY @2 GOTO OPENStore
IF ~~ THEN REPLY @3 GOTO PEACE
END

IF ~~ THEN OPENStore
SAY @4
IF ~~ THEN DO ~StartStore("BG1TOB1",LastTalkedToBy())~ EXIT
END


IF ~~ THEN PEACE
SAY @5
IF ~~ THEN EXIT
END