diff --git a/Bot/Whitelist.fs b/Bot/Whitelist.fs index a3cc862..4dd9a28 100644 --- a/Bot/Whitelist.fs +++ b/Bot/Whitelist.fs @@ -20,25 +20,20 @@ let sendInitialEmbed (ctx : IDiscordContext) = let channel = ctx.GetGuild().GetChannel(GuildEnvironment.channelWhitelist) let builder = DiscordMessageBuilder() let embed = DiscordEmbedBuilder() - embed.ImageUrl <- "https://s1.gifyu.com/images/whitelist-image-2.gif" + embed.ImageUrl <- "https://s8.gifyu.com/images/ezgif.com-gif-maker-28812274030e36e4b1.gif" embed.Title <- "Degenz Game Whitelist" embed.Color <- DiscordColor.White embed.Description <- """ In **Beautopia ©** you BUY Whitelist with 💰 $GBT... -__To earn $GBT You Can:__ +**__To earn $GBT You Can:__** 1️⃣ Recruit other Degenz into the server in #🙋|invite 2️⃣ Be helpful & chat in #💬|general-chat to level up! 3️⃣ Complete Quests inside #🕹|quests """ - let! wl = DbService.getStoreItemBySymbol "WHITELIST" - let! wlOG = DbService.getStoreItemBySymbol "WHITEOG" - embed.AddField("1x Whitelist", $"Price `{Inventory.getBuyPrice wl.Item} $GBT`", true) |> ignore - embed.AddField("1x OG Whitelist", $"Price `{Inventory.getBuyPrice wlOG.Item} $GBT`", true) |> ignore builder.AddEmbed embed |> ignore - let btn1 = DiscordButtonComponent(ButtonStyle.Success, $"Buy-WHITELIST-WHITELIST", $"Buy Whitelist") :> DiscordComponent - let btn2 = DiscordButtonComponent(ButtonStyle.Success, $"Buy-WHITEOG-WHITELIST", $"Buy OG Whitelist") :> DiscordComponent - builder.AddComponents [| btn1 ; btn2 |] |> ignore + let btn1 = DiscordButtonComponent(ButtonStyle.Success, $"GimmeWhitelist", $"Buy Whitelist") :> DiscordComponent + builder.AddComponents [| btn1 |] |> ignore do! GuildEnvironment.botClientRecruit.Value.SendMessageAsync(channel, builder) |> Async.AwaitTask @@ -56,6 +51,7 @@ let grantWhitelistRole (ctx : IDiscordContext) = let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) = let ctx = DiscordEventContext event :> IDiscordContext match event.Id with + | id when id.StartsWith("GimmeWhitelist") -> Store.buy "WHITELIST" None ctx | id when id.StartsWith("Buy") -> task { let id = ctx.GetInteractionId()