As specing is taking his sweet time, expand Roulette with Corners

1 files changed, 114 insertions, 8 deletions

diff --git a/npc/003-9/gambler.txt b/npc/003-9/gambler.txt
index 1255b7a9f..bb7e12b3c 100644
--- a/npc/003-9/gambler.txt
+++ b/npc/003-9/gambler.txt
@@ -207,7 +207,7 @@ L_Select:
         rif(is_staff() && .@bet <= 500, "Number (1->35)"),
         rif(is_staff(), "Tuple (1->17)"),
         rif(is_staff(), "Row (1->11)"),
-        rif(is_staff(), "Four group (1->8)"),
+        "Corner (1->8)",
         "Group of 12 (1->2)",
         "Column (1->2)",
         "Odd/Even, Red/Black, Group of 18 (1->1)";
@@ -228,6 +228,11 @@ L_Select:
             "column b",
             "column c";
         .@wat = 99+@menu;
+    } else if (@menu == 4) {
+        setskin "roulette_corner";
+        select
+            "012:023:1245:2356:4578:5689:781011:891112:10111314:11121415:13141617:14151718:16171920:17182021:19202223:20212324:22232526:23242627:25262829:26272930:28293132:29303233:31323435:32333536";
+        .@wat = 199 + @menu;
     } else {
         setskin "roulette_number";
     }
@@ -251,19 +256,20 @@ L_Spin:
     }
     showavatar 1301+.@val;
     delitem CasinoCoins, .@bet;
+
     // Note that "0" doesn't count toward pretty much anything
     mesn;
-    mes l("You rolled a: %d %s", .roulette[.@val], (.@val % 2 ? "Red" : "Black"));
-
-    // What you bet is dealt like this
-    // 0 is broken
-    // 1~37 is single number, the number you're betting on
-    // 100~111 are the specials
-    // ...???????
+    .@c$ = (.@val % 2 ? l("Red") : l("Black"));
+    if (!.@val)
+        .@c$=l("Green");
+    mes l("You rolled a: %d %s", .roulette[.@val], .@c$);
 
     .@no = .roulette[.@val]; // The number rolled
 
     switch (.@wat) {
+    //  ..............
+    // .:: Special ::.
+    // ................
     case 100: // 1st twelve
         .@pay += (is_between(0, 12, .@no) ? .@bet*2 : 0);
         break;
@@ -309,6 +315,106 @@ L_Spin:
             .@no == 27 || .@no == 30 || .@no == 33 || .@no == 36)
             .@pay += .@bet*2;
         break;
+    //  ..............
+    // .:: Corners ::.
+    // ................
+    case 200: // 012
+        if (.@no == 0 || .@no == 1 || .@no == 2)
+            .@pay += .@bet * 8;
+        break;
+    case 201: // 023
+        if (.@no == 0 || .@no == 2 || .@no == 3)
+            .@pay += .@bet * 8;
+        break;
+    case 202: // 1245
+        if (.@no == 1 || .@no == 2 || .@no == 4 || .@no == 5)
+            .@pay += .@bet * 8;
+        break;
+    case 203: // 2356
+        if (.@no == 2 || .@no == 3 || .@no == 5 || .@no == 6)
+            .@pay += .@bet * 8;
+        break;
+    case 204: // 4578
+        if (.@no == 4 || .@no == 5 || .@no == 7 || .@no == 8)
+            .@pay += .@bet * 8;
+        break;
+    case 205: // 5689
+        if (.@no == 5 || .@no == 6 || .@no == 8 || .@no == 9)
+            .@pay += .@bet * 8;
+        break;
+    case 206: // 781011
+        if (.@no == 7 || .@no == 8 || .@no == 10 || .@no == 11)
+            .@pay += .@bet * 8;
+        break;
+    case 207: // 891112
+        if (.@no == 8 || .@no == 9 || .@no == 11 || .@no == 12)
+            .@pay += .@bet * 8;
+        break;
+    case 208: // 10111314
+        if (.@no == 10 || .@no == 11 || .@no == 13 || .@no == 14)
+            .@pay += .@bet * 8;
+        break;
+    case 209: // 11121415
+        if (.@no == 11 || .@no == 12 || .@no == 14 || .@no == 15)
+            .@pay += .@bet * 8;
+        break;
+    case 210: // 13141617
+        if (.@no == 13 || .@no == 14 || .@no == 16 || .@no == 17)
+            .@pay += .@bet * 8;
+        break;
+    case 211: // 14151718
+        if (.@no == 14 || .@no == 15 || .@no == 17 || .@no == 18)
+            .@pay += .@bet * 8;
+        break;
+    case 212: // 16171920
+        if (.@no == 16 || .@no == 17 || .@no == 19 || .@no == 20)
+            .@pay += .@bet * 8;
+        break;
+    case 213: // 17182021
+        if (.@no == 17 || .@no == 18 || .@no == 20 || .@no == 21)
+            .@pay += .@bet * 8;
+        break;
+    case 214: // 19202223
+        if (.@no == 19 || .@no == 20 || .@no == 22 || .@no == 23)
+            .@pay += .@bet * 8;
+        break;
+    case 215: // 20212324
+        if (.@no == 20 || .@no == 21 || .@no == 23 || .@no == 24)
+            .@pay += .@bet * 8;
+        break;
+    case 216: // 22232526
+        if (.@no == 22 || .@no == 23 || .@no == 25 || .@no == 26)
+            .@pay += .@bet * 8;
+        break;
+    case 217: // 23242627
+        if (.@no == 23 || .@no == 24 || .@no == 26 || .@no == 27)
+            .@pay += .@bet * 8;
+        break;
+    case 218: // 25262829
+        if (.@no == 25 || .@no == 26 || .@no == 28 || .@no == 29)
+            .@pay += .@bet * 8;
+        break;
+    case 219: // 26272930
+        if (.@no == 26 || .@no == 27 || .@no == 29 || .@no == 30)
+            .@pay += .@bet * 8;
+        break;
+    case 220: // 28293132
+        if (.@no == 28 || .@no == 29 || .@no == 31 || .@no == 32)
+            .@pay += .@bet * 8;
+        break;
+    case 221: // 29303233
+        if (.@no == 29 || .@no == 30 || .@no == 32 || .@no == 33)
+            .@pay += .@bet * 8;
+        break;
+    case 222: // 31323435
+        if (.@no == 31 || .@no == 32 || .@no == 34 || .@no == 35)
+            .@pay += .@bet * 8;
+        break;
+    case 223: // 32333536
+        if (.@no == 32 || .@no == 33 || .@no == 35 || .@no == 36)
+            .@pay += .@bet * 8;
+        break;
+
     }
 
     if (.@pay) {