Change scope, and let you spin 100 times in a row if you got the money to burn.

Viva las vegas

1 files changed, 17 insertions, 6 deletions

diff --git a/npc/031-4/slots.txt b/npc/031-4/slots.txt
index 6ce158bee..b1330a606 100644
--- a/npc/031-4/slots.txt
+++ b/npc/031-4/slots.txt
@@ -99,6 +99,7 @@ L_Menu:
     menu
         rif(countitem(CasinoCoins) >= 1, l("Spin!")), L_Spin,
         rif(countitem(CasinoCoins) >= 10, l("Spin 10 times!")), L_Spin10,
+        rif(countitem(CasinoCoins) >= 100, l("Spin 100 times!")), L_Spin100,
         l("Prizes"), L_Info,
         l("Leave"), -;
     close;
@@ -133,15 +134,25 @@ L_Spin10:
     next;
     goto L_Menu;
 
+L_Spin100:
+    freeloop(true);
+    for (.@i=0;.@i < 100;.@i++) {
+        spin();
+        dnext;
+    }
+    freeloop(false);
+    next;
+    goto L_Menu;
+
 function spin {
     mesc l("Spinning...");
     dnext;
     delitem CasinoCoins, 1;
-    .@a=rand2(20-(.@stack/100));
-    .@b=rand2(20-(.@stack/100));
-    .@c=rand2(20-(.@stack/100));
-    .@d=rand2(20-(.@stack/100));
-    .@e=rand2(20-(.@stack/100));
+    .@a=rand2(20-(@sfcasino/100));
+    .@b=rand2(20-(@sfcasino/100));
+    .@c=rand2(20-(@sfcasino/100));
+    .@d=rand2(20-(@sfcasino/100));
+    .@e=rand2(20-(@sfcasino/100));
     symbol(.@a);
     symbol(.@b);
     symbol(.@c);
@@ -162,7 +173,7 @@ function spin {
 
     // Randomness correction, but always keep the "7" in the list
     // (Should be 1200 but we used 1000 instead to keep the odds against you)
-    .@stack=min(1000, .@stack+1);
+    @sfcasino=min(1000, @sfcasino+1);
 
     mes "";
     mesn;