BEGIN ~BG1X7~

IF ~NumTimesTalkedTo(0)~ THEN BEGIN Talk1
SAY @0
IF ~~ THEN REPLY @1 GOTO NO1
IF ~~ THEN REPLY @2 GOTO MAYBE1
END

IF ~~ THEN BEGIN NO1
SAY @3
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END

IF ~~ THEN BEGIN MAYBE1
SAY @4
=
@5
=
@6
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD1
IF ~~ THEN REPLY @8 GOTO NO1
END


IF ~~ THEN BEGIN GOLD1
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSER
IF ~~ THEN REPLY @11 GOTO LOSER
IF ~~ THEN REPLY @12 GOTO LOSER
IF ~~ THEN REPLY @13 GOTO LOSER
IF ~~ THEN REPLY @14 GOTO LOSER
IF ~~ THEN REPLY @15 GOTO LOSER
IF ~~ THEN REPLY @16 GOTO WIN1
END

IF ~~ THEN BEGIN LOSER
SAY @17 = @18 
IF ~~ THEN GOTO LOSER2
END


IF ~~ THEN BEGIN LOSER2
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END

IF ~~ THEN BEGIN WIN1
SAY @17 = @18 
IF ~~ THEN GOTO JPOT1
END


IF ~~ THEN BEGIN JPOT1
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END


IF ~Global("SALVATORE1","GLOBAL",4)~ THEN BEGIN CHAT1
SAY @21
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD2

IF ~~ THEN REPLY @8 GOTO NO1
END

IF ~~ THEN BEGIN GOLD2
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS5
IF ~~ THEN REPLY @11 GOTO WIN2
IF ~~ THEN REPLY @12 GOTO LOSS1
IF ~~ THEN REPLY @13 GOTO LOSS1
IF ~~ THEN REPLY @14 GOTO LOSS1
IF ~~ THEN REPLY @15 GOTO LOSS3
IF ~~ THEN REPLY @16 GOTO LOSS7
END

IF ~~ THEN BEGIN LOSS1
SAY @17 = @18 
IF ~~ THEN GOTO LOSS2
END

IF ~~ THEN BEGIN LOSS2
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",5)~EXIT
END

IF ~~ THEN BEGIN WIN2
SAY @17 = @18 
IF ~~ THEN GOTO JPOT2
END


IF ~~ THEN BEGIN JPOT2
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",5)~EXIT
END

IF ~Global("SALVATORE1","GLOBAL",5)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD3

IF ~~ THEN REPLY @8 GOTO NO1
END

IF ~~ THEN BEGIN GOLD3
SAY @9 

IF ~~ THEN REPLY @10 GOTO WIN3
IF ~~ THEN REPLY @11 GOTO LOSS5
IF ~~ THEN REPLY @12 GOTO LOSS3
IF ~~ THEN REPLY @13 GOTO LOSS3
IF ~~ THEN REPLY @14 GOTO LOSS13
IF ~~ THEN REPLY @15 GOTO LOSS3
IF ~~ THEN REPLY @16 GOTO LOSS9
END

IF ~~ THEN BEGIN LOSS3
SAY @17 = @18 
IF ~~ THEN GOTO LOSS4
END

IF ~~ THEN BEGIN LOSS4
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",6)~EXIT
END

IF ~~ THEN BEGIN WIN3
SAY @17 = @18 
IF ~~ THEN GOTO JPOT3
END


IF ~~ THEN BEGIN JPOT3
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",6)~EXIT
END

IF ~Global("SALVATORE1","GLOBAL",6)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD4

IF ~~ THEN REPLY @8 GOTO NO1
END

IF ~~ THEN BEGIN GOLD4
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS3
IF ~~ THEN REPLY @11 GOTO LOSS5
IF ~~ THEN REPLY @12 GOTO WIN4
IF ~~ THEN REPLY @13 GOTO LOSS5
IF ~~ THEN REPLY @14 GOTO LOSS5
IF ~~ THEN REPLY @15 GOTO LOSS9
IF ~~ THEN REPLY @16 GOTO LOSS7
END

IF ~~ THEN BEGIN LOSS5
SAY @17 = @18 
IF ~~ THEN GOTO LOSS6
END

IF ~~ THEN BEGIN LOSS6
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",7)~EXIT
END

IF ~~ THEN BEGIN WIN4
SAY @17 = @18 
IF ~~ THEN GOTO JPOT4
END


IF ~~ THEN BEGIN JPOT4
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",7)~EXIT
END

IF ~Global("SALVATORE1","GLOBAL",7)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD5

IF ~~ THEN REPLY @8 GOTO NO1
END

IF ~~ THEN BEGIN GOLD5
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS3
IF ~~ THEN REPLY @11 GOTO LOSS7
IF ~~ THEN REPLY @12 GOTO LOSS7
IF ~~ THEN REPLY @13 GOTO LOSS7
IF ~~ THEN REPLY @14 GOTO WIN5
IF ~~ THEN REPLY @15 GOTO LOSS5
IF ~~ THEN REPLY @16 GOTO LOSS7
END

IF ~~ THEN BEGIN LOSS7
SAY @17 = @18 
IF ~~ THEN GOTO LOSS8
END

IF ~~ THEN BEGIN LOSS8
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",8)~EXIT
END

IF ~~ THEN BEGIN WIN5
SAY @17 = @18 
IF ~~ THEN GOTO JPOT5
END


IF ~~ THEN BEGIN JPOT5
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",20)~EXIT
END


IF ~Global("SALVATORE1","GLOBAL",8)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD6

IF ~~ THEN REPLY @8 GOTO NO1
END

IF ~~ THEN BEGIN GOLD6
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS3
IF ~~ THEN REPLY @11 GOTO LOSS9
IF ~~ THEN REPLY @12 GOTO WIN6
IF ~~ THEN REPLY @13 GOTO LOSS9
IF ~~ THEN REPLY @14 GOTO LOSS9
IF ~~ THEN REPLY @15 GOTO LOSS5
IF ~~ THEN REPLY @16 GOTO LOSS9
END

IF ~~ THEN BEGIN LOSS9
SAY @17 = @18 
IF ~~ THEN GOTO LOSS10
END

IF ~~ THEN BEGIN LOSS10
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",9)~EXIT
END

IF ~~ THEN BEGIN WIN6
SAY @17 = @18 
IF ~~ THEN GOTO JPOT6
END


IF ~~ THEN BEGIN JPOT6
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",9)~EXIT
END



IF ~Global("SALVATORE1","GLOBAL",9)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD7

IF ~~ THEN REPLY @8 GOTO REJECT1
END


IF ~~ THEN BEGIN REJECT1
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END

IF ~~ THEN BEGIN GOLD7
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS3
IF ~~ THEN REPLY @11 GOTO LOSS11
IF ~~ THEN REPLY @12 GOTO LOSS11
IF ~~ THEN REPLY @13 GOTO LOSS11
IF ~~ THEN REPLY @14 GOTO LOSS13
IF ~~ THEN REPLY @15 GOTO WIN7
IF ~~ THEN REPLY @16 GOTO LOSS11
END

IF ~~ THEN BEGIN LOSS11
SAY @17 = @18 
IF ~~ THEN GOTO LOSS12
END

IF ~~ THEN BEGIN LOSS12
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",14)~EXIT
END

IF ~~ THEN BEGIN WIN7
SAY @17 = @18 
IF ~~ THEN GOTO JPOT7
END


IF ~~ THEN BEGIN JPOT7
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",10)~EXIT
END


IF ~Global("SALVATORE1","GLOBAL",10)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD8

IF ~~ THEN REPLY @8 GOTO REJECT2
END


IF ~~ THEN BEGIN REJECT2
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",6)~EXIT
END




IF ~~ THEN BEGIN GOLD8
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS13
IF ~~ THEN REPLY @11 GOTO LOSS11
IF ~~ THEN REPLY @12 GOTO LOSS13
IF ~~ THEN REPLY @13 GOTO LOSS13
IF ~~ THEN REPLY @14 GOTO LOSS3
IF ~~ THEN REPLY @15 GOTO LOSS13
IF ~~ THEN REPLY @16 GOTO WIN8
END

IF ~~ THEN BEGIN LOSS13
SAY @17 = @18 
IF ~~ THEN GOTO LOSS14
END

IF ~~ THEN BEGIN LOSS14
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",7)~EXIT
END

IF ~~ THEN BEGIN WIN8
SAY @17 = @18 
IF ~~ THEN GOTO JPOT8
END


IF ~~ THEN BEGIN JPOT8
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",11)~EXIT
END




IF ~Global("SALVATORE1","GLOBAL",11)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD9

IF ~~ THEN REPLY @8 GOTO REJECT3
END


IF ~~ THEN BEGIN REJECT3
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",18)~EXIT
END




IF ~~ THEN BEGIN GOLD9
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS15
IF ~~ THEN REPLY @11 GOTO LOSS11
IF ~~ THEN REPLY @12 GOTO LOSS15
IF ~~ THEN REPLY @13 GOTO WIN9
IF ~~ THEN REPLY @14 GOTO LOSS15
IF ~~ THEN REPLY @15 GOTO LOSS3
IF ~~ THEN REPLY @16 GOTO LOSS9
END

IF ~~ THEN BEGIN LOSS15
SAY @17 = @18 
IF ~~ THEN GOTO LOSS16
END

IF ~~ THEN BEGIN LOSS16
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",3)~EXIT
END

IF ~~ THEN BEGIN WIN9
SAY @17 = @18 
IF ~~ THEN GOTO JPOT9
END


IF ~~ THEN BEGIN JPOT9
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",12)~EXIT
END

IF ~Global("SALVATORE1","GLOBAL",12)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD10

IF ~~ THEN REPLY @8 GOTO REJECT4
END


IF ~~ THEN BEGIN REJECT4
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",11)~EXIT
END




IF ~~ THEN BEGIN GOLD10
SAY @9 

IF ~~ THEN REPLY @10 GOTO WIN10
IF ~~ THEN REPLY @11 GOTO LOSS17
IF ~~ THEN REPLY @12 GOTO LOSS17
IF ~~ THEN REPLY @13 GOTO LOSS13
IF ~~ THEN REPLY @14 GOTO LOSS3
IF ~~ THEN REPLY @15 GOTO LOSS17
IF ~~ THEN REPLY @16 GOTO LOSS17
END

IF ~~ THEN BEGIN LOSS17
SAY @17 = @18 
IF ~~ THEN GOTO LOSS14
END

IF ~~ THEN BEGIN LOSS18
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",13)~EXIT
END

IF ~~ THEN BEGIN WIN10
SAY @17 = @18 
IF ~~ THEN GOTO JPOT10
END


IF ~~ THEN BEGIN JPOT10
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",13)~EXIT
END



IF ~Global("SALVATORE1","GLOBAL",13)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD11

IF ~~ THEN REPLY @8 GOTO REJECT5
END


IF ~~ THEN BEGIN REJECT5
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",14)~EXIT
END




IF ~~ THEN BEGIN GOLD11
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS19
IF ~~ THEN REPLY @11 GOTO LOSS19
IF ~~ THEN REPLY @12 GOTO LOSS19
IF ~~ THEN REPLY @13 GOTO WIN11
IF ~~ THEN REPLY @14 GOTO LOSS19
IF ~~ THEN REPLY @15 GOTO LOSS19
IF ~~ THEN REPLY @16 GOTO LOSS19
END

IF ~~ THEN BEGIN LOSS19
SAY @17 = @18 
IF ~~ THEN GOTO LOSS20
END

IF ~~ THEN BEGIN LOSS20
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",14)~EXIT
END

IF ~~ THEN BEGIN WIN11
SAY @17 = @18 
IF ~~ THEN GOTO JPOT11
END


IF ~~ THEN BEGIN JPOT11
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END



IF ~Global("SALVATORE1","GLOBAL",14)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD12

IF ~~ THEN REPLY @8 GOTO REJECT6
END


IF ~~ THEN BEGIN REJECT6
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",15)~EXIT
END




IF ~~ THEN BEGIN GOLD12
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS21
IF ~~ THEN REPLY @11 GOTO LOSS21
IF ~~ THEN REPLY @12 GOTO LOSS21
IF ~~ THEN REPLY @13 GOTO LOSS21
IF ~~ THEN REPLY @14 GOTO WIN12
IF ~~ THEN REPLY @15 GOTO LOSS21
IF ~~ THEN REPLY @16 GOTO LOSS21
END

IF ~~ THEN BEGIN LOSS21
SAY @17 = @18 
IF ~~ THEN GOTO LOSS20
END

IF ~~ THEN BEGIN LOSS22
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",15)~EXIT
END

IF ~~ THEN BEGIN WIN12
SAY @17 = @18 
IF ~~ THEN GOTO JPOT12
END


IF ~~ THEN BEGIN JPOT12
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",15)~EXIT
END




IF ~Global("SALVATORE1","GLOBAL",15)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD13

IF ~~ THEN REPLY @8 GOTO REJECT7
END


IF ~~ THEN BEGIN REJECT7
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",16)~EXIT
END




IF ~~ THEN BEGIN GOLD13
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS13
IF ~~ THEN REPLY @11 GOTO LOSS23
IF ~~ THEN REPLY @12 GOTO WIN13
IF ~~ THEN REPLY @13 GOTO LOSS3
IF ~~ THEN REPLY @14 GOTO LOSS23
IF ~~ THEN REPLY @15 GOTO LOSS23
IF ~~ THEN REPLY @16 GOTO LOSS3
END

IF ~~ THEN BEGIN LOSS23
SAY @17 = @18 
IF ~~ THEN GOTO LOSS24
END

IF ~~ THEN BEGIN LOSS24
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",16)~EXIT
END

IF ~~ THEN BEGIN WIN13
SAY @17 = @18 
IF ~~ THEN GOTO JPOT13
END


IF ~~ THEN BEGIN JPOT13
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",16)~EXIT
END





IF ~Global("SALVATORE1","GLOBAL",16)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD14

IF ~~ THEN REPLY @8 GOTO REJECT8
END


IF ~~ THEN BEGIN REJECT8
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",12)~EXIT
END




IF ~~ THEN BEGIN GOLD14
SAY @9 

IF ~~ THEN REPLY @10 GOTO WIN14
IF ~~ THEN REPLY @11 GOTO LOSS25
IF ~~ THEN REPLY @12 GOTO LOSS25
IF ~~ THEN REPLY @13 GOTO LOSS25
IF ~~ THEN REPLY @14 GOTO LOSS25
IF ~~ THEN REPLY @15 GOTO LOSS25
IF ~~ THEN REPLY @16 GOTO LOSS25
END

IF ~~ THEN BEGIN LOSS25
SAY @17 = @18 
IF ~~ THEN GOTO LOSS26
END

IF ~~ THEN BEGIN LOSS26
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",17)~EXIT
END

IF ~~ THEN BEGIN WIN14
SAY @17 = @18 
IF ~~ THEN GOTO JPOT14
END


IF ~~ THEN BEGIN JPOT14
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",15)~EXIT
END








IF ~Global("SALVATORE1","GLOBAL",17)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD15

IF ~~ THEN REPLY @8 GOTO REJECT9
END


IF ~~ THEN BEGIN REJECT9
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",14)~EXIT
END




IF ~~ THEN BEGIN GOLD15
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS27
IF ~~ THEN REPLY @11 GOTO LOSS27
IF ~~ THEN REPLY @12 GOTO LOSS27
IF ~~ THEN REPLY @13 GOTO LOSS27
IF ~~ THEN REPLY @14 GOTO LOSS27
IF ~~ THEN REPLY @15 GOTO LOSS27
IF ~~ THEN REPLY @16 GOTO LOSS27
END

IF ~~ THEN BEGIN LOSS27
SAY @17 = @18 
IF ~~ THEN GOTO LOSS28
END

IF ~~ THEN BEGIN LOSS28
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",18)~EXIT
END

IF ~~ THEN BEGIN WIN15
SAY @17 = @18 
IF ~~ THEN GOTO JPOT15
END


IF ~~ THEN BEGIN JPOT15
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",18)~EXIT
END






IF ~Global("SALVATORE1","GLOBAL",18)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD16

IF ~~ THEN REPLY @8 GOTO REJECT10
END


IF ~~ THEN BEGIN REJECT10
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",18)~EXIT
END




IF ~~ THEN BEGIN GOLD16
SAY @9 

IF ~~ THEN REPLY @10 GOTO WIN16
IF ~~ THEN REPLY @11 GOTO LOSS29
IF ~~ THEN REPLY @12 GOTO LOSS29
IF ~~ THEN REPLY @13 GOTO LOSS29
IF ~~ THEN REPLY @14 GOTO LOSS29
IF ~~ THEN REPLY @15 GOTO LOSS29
IF ~~ THEN REPLY @16 GOTO LOSS29
END

IF ~~ THEN BEGIN LOSS29
SAY @17 = @18 
IF ~~ THEN GOTO LOSS30
END

IF ~~ THEN BEGIN LOSS30
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",19)~EXIT
END

IF ~~ THEN BEGIN WIN16
SAY @17 = @18 
IF ~~ THEN GOTO JPOT16
END


IF ~~ THEN BEGIN JPOT16
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",19)~EXIT
END





IF ~Global("SALVATORE1","GLOBAL",19)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD17

IF ~~ THEN REPLY @8 GOTO REJECT11
END


IF ~~ THEN BEGIN REJECT11
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",7)~EXIT
END




IF ~~ THEN BEGIN GOLD17
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS31
IF ~~ THEN REPLY @11 GOTO WIN17
IF ~~ THEN REPLY @12 GOTO LOSS31
IF ~~ THEN REPLY @13 GOTO LOSS31
IF ~~ THEN REPLY @14 GOTO LOSS31
IF ~~ THEN REPLY @15 GOTO LOSS31
IF ~~ THEN REPLY @16 GOTO LOSS31
END

IF ~~ THEN BEGIN LOSS31
SAY @17 = @18 
IF ~~ THEN GOTO LOSS32
END

IF ~~ THEN BEGIN LOSS32
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",20)~EXIT
END

IF ~~ THEN BEGIN WIN17
SAY @17 = @18 
IF ~~ THEN GOTO JPOT17
END


IF ~~ THEN BEGIN JPOT17
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",20)~EXIT
END




IF ~Global("SALVATORE1","GLOBAL",20)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD18

IF ~~ THEN REPLY @8 GOTO NO1
END







IF ~~ THEN BEGIN GOLD18
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS33
IF ~~ THEN REPLY @11 GOTO LOSS33
IF ~~ THEN REPLY @12 GOTO LOSS33
IF ~~ THEN REPLY @13 GOTO WIN18
IF ~~ THEN REPLY @14 GOTO LOSS33
IF ~~ THEN REPLY @15 GOTO LOSS33
IF ~~ THEN REPLY @16 GOTO LOSS33
END

IF ~~ THEN BEGIN LOSS33
SAY @17 = @18 
IF ~~ THEN GOTO LOSS34
END

IF ~~ THEN BEGIN LOSS34
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",21)~EXIT
END

IF ~~ THEN BEGIN WIN18
SAY @17 = @18 
IF ~~ THEN GOTO JPOT18
END


IF ~~ THEN BEGIN JPOT18
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",19)~EXIT
END










IF ~Global("SALVATORE1","GLOBAL",21)~ THEN BEGIN GAME1
SAY @23
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD19

IF ~~ THEN REPLY @8 GOTO REJECT12
END


IF ~~ THEN BEGIN REJECT12
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",22)~EXIT
END




IF ~~ THEN BEGIN GOLD19
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS35
IF ~~ THEN REPLY @11 GOTO LOSS35
IF ~~ THEN REPLY @12 GOTO LOSS35
IF ~~ THEN REPLY @13 GOTO LOSS35
IF ~~ THEN REPLY @14 GOTO WIN19
IF ~~ THEN REPLY @15 GOTO LOSS35
IF ~~ THEN REPLY @16 GOTO LOSS35
END

IF ~~ THEN BEGIN LOSS35
SAY @17 = @18 
IF ~~ THEN GOTO LOSS36
END

IF ~~ THEN BEGIN LOSS36
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",22)~EXIT
END

IF ~~ THEN BEGIN WIN19
SAY @17 = @18 
IF ~~ THEN GOTO JPOT19
END


IF ~~ THEN BEGIN JPOT19
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",22)~EXIT
END



IF ~Global("SALVATORE1","GLOBAL",22)~ THEN BEGIN GAME1
SAY @22
IF ~~ THEN REPLY @7 DO ~TakePartyGold(25)      ~ GOTO GOLD20

IF ~~ THEN REPLY @8 GOTO REJECT13
END


IF ~~ THEN BEGIN REJECT13
SAY @24
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END




IF ~~ THEN BEGIN GOLD20
SAY @9 

IF ~~ THEN REPLY @10 GOTO LOSS37
IF ~~ THEN REPLY @11 GOTO LOSS37
IF ~~ THEN REPLY @12 GOTO LOSS37
IF ~~ THEN REPLY @13 GOTO WIN20
IF ~~ THEN REPLY @14 GOTO LOSS37
IF ~~ THEN REPLY @15 GOTO LOSS37
IF ~~ THEN REPLY @16 GOTO LOSS37
END

IF ~~ THEN BEGIN LOSS37
SAY @17 = @18 
IF ~~ THEN GOTO LOSS38
END

IF ~~ THEN BEGIN LOSS38
SAY @19
IF ~~ THEN DO ~SetGlobal("SALVATORE1","GLOBAL",7)~EXIT
END

IF ~~ THEN BEGIN WIN20
SAY @17 = @18 
IF ~~ THEN GOTO JPOT19
END


IF ~~ THEN BEGIN JPOT20
SAY @20
IF ~~ THEN DO ~GiveItemCreate("PLATNUM",PLAYER1,45,0,0)SetGlobal("SALVATORE1","GLOBAL",4)~EXIT
END