JosephFerano/discord-bot-game
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Armory

Browse Source
This commit is contained in:
Joseph Ferano 2022-06-20 23:28:07 +07:00
parent 8e15299b57
commit 387fc239a6
1 changed files with 27 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
Bot/Games/Store.fs
View File

@ -438,24 +438,33 @@ let handleJpegEvents _ (event : ComponentInteractionCreateEventArgs) =
let handleStoreEvents _ (event : ComponentInteractionCreateEventArgs) = let handleStoreEvents _ (event : ComponentInteractionCreateEventArgs) =
let ctx = DiscordEventContext event :> IDiscordContext let ctx = DiscordEventContext event :> IDiscordContext
let id = ctx.GetInteractionId() task {
let itemId = id.Split("-").[1] let builder = DiscordInteractionResponseBuilder()
let storeId = id.Split("-").[2] builder.IsEphemeral <- true
match id with builder.Content <- $"🚀 __Mint Date:__ June 20th 6:30 UTC <t:1655749800:R>"
| id when id.StartsWith("Buy") -> handleBuyItem (fun _ -> Task.CompletedTask) ctx itemId do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
| id when id.StartsWith("Sell") -> handleSell ctx itemId } : Task
| id when id.StartsWith("ShowHacks") -> buy storeId (Some ItemType.Hack) ctx
| id when id.StartsWith("ShowShields") -> buy storeId (Some ItemType.Shield) ctx //let handleStoreEvents _ (event : ComponentInteractionCreateEventArgs) =
| _ -> // let ctx = DiscordEventContext event :> IDiscordContext
task { // let id = ctx.GetInteractionId()
let builder = DiscordInteractionResponseBuilder() // let itemId = id.Split("-").[1]
builder.IsEphemeral <- true // let storeId = id.Split("-").[2]
builder.Content <- $"Incorrect Action identifier {id}" // match id with
do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask // | id when id.StartsWith("Buy") -> handleBuyItem (fun _ -> Task.CompletedTask) ctx itemId
} // | id when id.StartsWith("Sell") -> handleSell ctx itemId
|> Async.AwaitTask // | id when id.StartsWith("ShowHacks") -> buy storeId (Some ItemType.Hack) ctx
|> Async.Start // | id when id.StartsWith("ShowShields") -> buy storeId (Some ItemType.Shield) ctx
Task.CompletedTask // | _ ->
// task {
// let builder = DiscordInteractionResponseBuilder()
// builder.IsEphemeral <- true
// builder.Content <- $"Incorrect Action identifier {id}"
// do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
// }
// |> Async.AwaitTask
// |> Async.Start
// Task.CompletedTask
let sendBackalleyEmbed (ctx : IDiscordContext) = let sendBackalleyEmbed (ctx : IDiscordContext) =
async { async {