BEGIN ~KGSTO4~

IF ~Global("KGSTO4","GLOBAL",0)RandomNum(4,1)~ THEN BEGIN Talk1
SAY @0
=
@1
=
@2
=
@3
IF ~~ THEN EXIT
END

IF ~Global("KGSTO4","GLOBAL",0)RandomNum(4,2)~ THEN BEGIN Talk2
SAY @4
=
@5
IF ~~ THEN REPLY @6 GOTO Lotus
IF ~~ THEN REPLY @7 GOTO Wizards
IF ~~ THEN REPLY @8 GOTO Namtar
IF ~~ THEN REPLY @9 GOTO RUDE
IF ~~ THEN REPLY @10 GOTO POLITE
END


IF ~Global("KGSTO4","GLOBAL",0)RandomNum(4,3)~ THEN BEGIN Talk4
SAY @11 
IF ~~ THEN EXIT
END

IF ~Global("KGSTO4","GLOBAL",0)RandomNum(4,4)~ THEN BEGIN Talk5
SAY @12
=
@13
IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN Lotus
SAY @14
=
@15
IF ~~ THEN REPLY @7 GOTO Wizards
IF ~~ THEN REPLY @8 GOTO Namtar
IF ~~ THEN REPLY @9 GOTO RUDE
IF ~~ THEN REPLY @10 GOTO POLITE
END

IF ~~ THEN BEGIN Wizards
SAY @16
=
@17
IF ~~ THEN REPLY @6 GOTO Lotus
IF ~~ THEN REPLY @8 GOTO Namtar
IF ~~ THEN REPLY @9 GOTO RUDE
IF ~~ THEN REPLY @10 GOTO POLITE
END


IF ~~ THEN BEGIN Namtar
SAY @18
=
@19
IF ~~ THEN REPLY @6 GOTO Lotus
IF ~~ THEN REPLY @7 GOTO Wizards
IF ~~ THEN REPLY @9 GOTO RUDE
IF ~~ THEN REPLY @10 GOTO POLITE
END


IF ~~ THEN BEGIN RUDE
SAY @20
IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN POLITE
SAY @21
IF ~~ THEN EXIT
END
