More mint messages

This commit is contained in:
Joseph Ferano 2022-06-20 23:16:06 +07:00
parent befcdf6e5e
commit 8e15299b57
2 changed files with 45 additions and 27 deletions

View File

@ -280,20 +280,29 @@ let arsenal (ctx : IDiscordContext) =
})
let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) =
let eventCtx = DiscordEventContext event :> IDiscordContext
match event.Id with
| id when id.StartsWith("Attack") -> handleAttack eventCtx
| id when id.StartsWith("Defend") -> handleDefense eventCtx
| id when id.StartsWith("Trainer") -> Trainer.handleButtonEvent eventCtx |> Async.StartAsTask :> Task
| id when id.StartsWith("Steal") -> Thief.handleSteal eventCtx
| id when id.StartsWith("RPS") -> RockPaperScissors.handleRPS eventCtx
| _ ->
let ctx = DiscordEventContext event :> IDiscordContext
task {
let builder = DiscordInteractionResponseBuilder()
builder.IsEphemeral <- true
builder.Content <- $"Incorrect Action identifier {eventCtx.GetInteractionId()}"
do! eventCtx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
}
builder.Content <- $"🚀 __Mint Date:__ June 20th 6:30 UTC <t:1655749800:R>"
do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
} : Task
//let handleButtonEvent _ (event : ComponentInteractionCreateEventArgs) =
// let eventCtx = DiscordEventContext event :> IDiscordContext
// match event.Id with
// | id when id.StartsWith("Attack") -> handleAttack eventCtx
// | id when id.StartsWith("Defend") -> handleDefense eventCtx
// | id when id.StartsWith("Trainer") -> Trainer.handleButtonEvent eventCtx |> Async.StartAsTask :> Task
// | id when id.StartsWith("Steal") -> Thief.handleSteal eventCtx
// | id when id.StartsWith("RPS") -> RockPaperScissors.handleRPS eventCtx
// | _ ->
// task {
// let builder = DiscordInteractionResponseBuilder()
// builder.IsEphemeral <- true
// builder.Content <- $"Incorrect Action identifier {eventCtx.GetInteractionId()}"
// do! eventCtx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
// }
let handleMessageCreated _ (event : MessageCreateEventArgs) =
task {

View File

@ -320,19 +320,28 @@ let spin multiplier (ctx : IDiscordContext) =
})
let handleButton _ (event : ComponentInteractionCreateEventArgs) =
let ctx = DiscordEventContext event
match event.Id with
| "spin-1x" -> spin 1 ctx
| "spin-2x" -> spin 2 ctx
| "spin-3x" -> spin 3 ctx
| "prizes" -> handlePrizeTable ctx
| _ ->
printfn "Wrong Spin ID"
Task.CompletedTask
|> Async.AwaitTask
|> Async.Start
Task.CompletedTask
let ctx = DiscordEventContext event :> IDiscordContext
task {
let builder = DiscordInteractionResponseBuilder()
builder.IsEphemeral <- true
builder.Content <- $"🚀 __Mint Date:__ June 20th 6:30 UTC <t:1655749800:R>"
do! ctx.Respond(InteractionResponseType.ChannelMessageWithSource, builder) |> Async.AwaitTask
} : Task
//let handleButton _ (event : ComponentInteractionCreateEventArgs) =
// let ctx = DiscordEventContext event
// match event.Id with
// | "spin-1x" -> spin 1 ctx
// | "spin-2x" -> spin 2 ctx
// | "spin-3x" -> spin 3 ctx
// | "prizes" -> handlePrizeTable ctx
// | _ ->
// printfn "Wrong Spin ID"
// Task.CompletedTask
// |> Async.AwaitTask
// |> Async.Start
// Task.CompletedTask
//
let handleMessageCreated _ (event : MessageCreateEventArgs) =
task {
if event.Channel.Id = GuildEnvironment.channelSlots && event.Author.Id <> GuildEnvironment.botClientSlots.Value.CurrentUser.Id then