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

Accept invite if Degen

Browse Source
This commit is contained in:
Joseph Ferano 2022-05-06 19:23:56 +07:00
parent faa45a49f7
commit a60f12c15e
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Bot/Bot.fs
View File

@ -74,7 +74,7 @@ storeBot.add_ComponentInteractionCreated(AsyncEventHandler(Store.handleStoreEven
//stealBot.add_ComponentInteractionCreated(AsyncEventHandler(Thief.handleStealButton)) //stealBot.add_ComponentInteractionCreated(AsyncEventHandler(Thief.handleStealButton))
inviterBot.add_GuildMemberAdded(AsyncEventHandler(InviteTracker.handleGuildMemberAdded)) inviterBot.add_GuildMemberAdded(AsyncEventHandler(InviteTracker.handleGuildMemberAdded))
inviterBot.add_ComponentInteractionCreated(AsyncEventHandler(InviteTracker.handleButtonEvent)) inviterBot.add_ComponentInteractionCreated(AsyncEventHandler(InviteTracker.handleButtonEvent))
inviterBot.add_GuildMemberUpdated(AsyncEventHandler(InviteTracker.handleRoleAssigned)) inviterBot.add_GuildMemberUpdated(AsyncEventHandler(InviteTracker.handleMemberUpdated))
slotsBot.add_ComponentInteractionCreated(AsyncEventHandler(SlotMachine.handleButton)) slotsBot.add_ComponentInteractionCreated(AsyncEventHandler(SlotMachine.handleButton))
slotsBot.add_GuildDownloadCompleted(AsyncEventHandler(SlotMachine.handleGuildDownloadCompleted)) slotsBot.add_GuildDownloadCompleted(AsyncEventHandler(SlotMachine.handleGuildDownloadCompleted))
slotsBot.add_MessageCreated(AsyncEventHandler(SlotMachine.handleMessageCreated)) slotsBot.add_MessageCreated(AsyncEventHandler(SlotMachine.handleMessageCreated))

7
Bot/InviteTracker.fs
View File

@ -559,7 +559,7 @@ let handleCreateInvite (ctx : IDiscordContext) =
do! Analytics.recruitLinkButton code user.Id user.Username (ctx.GetChannel()) do! Analytics.recruitLinkButton code user.Id user.Username (ctx.GetChannel())
} :> Task } :> Task
let handleRoleAssigned (client : DiscordClient) (event : GuildMemberUpdateEventArgs) = let handleMemberUpdated (client : DiscordClient) (event : GuildMemberUpdateEventArgs) =
let addedRole (rolesBefore : DiscordRole seq) (rolesAfter : DiscordRole seq) = let addedRole (rolesBefore : DiscordRole seq) (rolesAfter : DiscordRole seq) =
rolesAfter |> Seq.filter ((fun role -> rolesBefore |> Seq.exists (fun r -> role.Id = r.Id)) >> not) rolesAfter |> Seq.filter ((fun role -> rolesBefore |> Seq.exists (fun r -> role.Id = r.Id)) >> not)
task { task {
@ -567,8 +567,9 @@ let handleRoleAssigned (client : DiscordClient) (event : GuildMemberUpdateEventA
match symmetricDifference with match symmetricDifference with
| [] -> () | [] -> ()
| role::_ -> | role::_ ->
let (_,guild) = client.Guilds.TryGetValue(GuildEnvironment.guildId) if role.Name = "Degen" then
do! acceptInvite guild event.Member.Id event.Member.Username |> Async.AwaitTask let (_,guild) = client.Guilds.TryGetValue(GuildEnvironment.guildId)
do! acceptInvite guild event.Member.Id event.Member.Username |> Async.AwaitTask
return () return ()
} :> Task } :> Task