Allow no loss cancel of casino game before spin. Also change slots so you have to confirm to pull giving you a change to back away if you do not want to play.

1 files changed, 14 insertions, 4 deletions

diff --git a/npc/tulimshar-casino/casino.txt b/npc/tulimshar-casino/casino.txt
index fdce524a..245bf899 100644
--- a/npc/tulimshar-casino/casino.txt
+++ b/npc/tulimshar-casino/casino.txt
@@ -71,7 +71,10 @@ new_8-1.gat,134,23,0	script	Valdo	117,{
 new_8-1.gat,37,65,0	script	Slot1	127,{
 	mes "Pull the lever...";
 	next;
-	
+	menu "Pull",L_Play,"Maybe later",-;
+	close;
+
+L_Play:
 	if(countitem(503) < 1) goto L_NoCoin;
 	delitem 503,1;
 	set @Temp1,rand(7);
@@ -100,7 +103,10 @@ L_NoCoin:
 new_8-1.gat,39,65,0	script	Slot2	127,{
 	mes "Pull the lever...";
 	next;
-	
+	menu "Pull",L_Play,"Maybe later",-;
+	close;
+
+L_Play:
 	if(countitem(503) < 1) goto L_NoCoin;
 	delitem 503,1;
 	set @Temp1,rand(7);
@@ -129,7 +135,10 @@ L_NoCoin:
 new_8-1.gat,41,65,0	script	Slot3	127,{
 	mes "Pull the lever...";
 	next;
-	
+	menu "Pull",L_Play,"Maybe later",-;
+	close;
+
+L_Play:
 	if(countitem(503) < 1) goto L_NoCoin;
 	delitem 503,1;
 	set @Temp1,rand(7);
@@ -242,9 +251,9 @@ L_b100:
 	
 L_Check:
 	if(countitem(503) < @bet) goto L_NoCoin;
-	delitem 503,@bet;		
 	menu "Choose a color",-,"Choose a number",L_Number;	
 	menu "Black",-,"Red",-;
+	delitem 503,@bet;		
     set @color,rand(2);
 	if(@color == 1) goto L_Lost;
 	mes "You won!";
@@ -372,6 +381,7 @@ L36:
 	goto L_CheckNumber;
 	
 L_CheckNumber:
+	delitem 503,@bet;		
 	set @roulette,rand(38);
 	if (@roulette == 37) mes "We got a 00";
 	if (@roulette < 37) mes "We got a " + @roulette;