From 181980e395f66b5ff7c2da54afb56f39e0ee4579 Mon Sep 17 00:00:00 2001
From: Joseph Ferano <joseph@ferano.io>
Date: Thu, 21 Apr 2022 15:02:10 +0700
Subject: [PATCH] Copy

---
 Bot/Games/SlotMachine.fs | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/Bot/Games/SlotMachine.fs b/Bot/Games/SlotMachine.fs
index 24e5aa5..96eef8a 100644
--- a/Bot/Games/SlotMachine.fs
+++ b/Bot/Games/SlotMachine.fs
@@ -277,8 +277,10 @@ let spin multiplier (ctx : IDiscordContext) =
                 embed.Color <- DiscordColor.Green
                 embed.Description <- $"You WIN `💰` **{prizeWithMultiplier}** GBT 🎉"
                 embed.AddField("Bet", $"{playAmount}", true) |> ignore
+                embed.AddField("Jackpot Rake", $"{multiplier}", true) |> ignore
                 embed.AddField("Prize", $"{prizeWithMultiplier}", true) |> ignore
                 addGBTField embed prizeWithMultiplier
+                do! incrementJackpot multiplier |> Async.Ignore
                 return "WON" , prizeWithMultiplier
             | Some (Jackpot) ->
                 let! jackpot = getJackpotAmount ()
@@ -295,6 +297,7 @@ let spin multiplier (ctx : IDiscordContext) =
                 embed.Description <- $"You LOST `💰` **{playAmount}** $GBT 😭"
                 embed.Color <- DiscordColor.Red
                 embed.AddField("Bet", $"{playAmount}", true) |> ignore
+                embed.AddField("Jackpot Rake", $"{multiplier}", true) |> ignore
                 addGBTField embed -playAmount
                 return "LOST" , 0<GBT>
         }
@@ -374,7 +377,7 @@ let sendEmbed channel (message : DiscordMessage option) = async {
     let embed = DiscordEmbedBuilder()
     embed.Title <- "Degenz Slot Machine"
     embed.ImageUrl <- "https://s7.gifyu.com/images/ezgif.com-gif-maker-268ecb6e4d28bd55a0.gif"
-    embed.Description <- "Want to try your luck? When you lose the Jackpot goes up!"
+    embed.Description <- "Try Your Hand at a Game of SLOTS!\nEvery Spin Adds to The JACKPOT!\nGood luck Degenz ✊"
     let! jackpot = getJackpotAmount ()
     embed.Title <- $"CURRENT JACKPOT: `{jackpot} 💰 $GBT`"
 
@@ -404,7 +407,7 @@ let sendEmbedWithLoop (channel : DiscordChannel) =
             | [] -> sendEmbed channel None
             | msg::_ -> async.Return (Some msg)
         while true do
-            do! Async.Sleep 60000
+            do! Async.Sleep 10000
             do! sendEmbed channel (message) |> Async.Ignore
     } |> Async.Start