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

Need to give the player their weapons from the dojo

Browse Source
This commit is contained in:
Joseph Ferano 2022-05-06 22:24:15 +07:00
parent 8c33e109b0
commit 49f716bff7
2 changed files with 4 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Bot/Games/Trainer.fs
View File

@ -215,6 +215,10 @@ let handleArsenal (ctx : IDiscordContext) = PlayerInteractions.executePlayerActi
Bank = player.Bank + CurrencyGift Bank = player.Bank + CurrencyGift
} }
do! DbService.updatePlayer updatedPlayer |> Async.Ignore do! DbService.updatePlayer updatedPlayer |> Async.Ignore
if player.Inventory |> List.exists (fun i -> i.Id = hackItem.Id) |> not then
do! DbService.addToPlayerInventory player.DiscordId hackItem |> Async.Ignore
if player.Inventory |> List.exists (fun i -> i.Id = shieldItem.Id) |> not then
do! DbService.addToPlayerInventory player.DiscordId shieldItem |> Async.Ignore
try try
do! ShieldEvents () @ [ HackEvent () ] do! ShieldEvents () @ [ HackEvent () ]
|> List.map (DbService.addPlayerEvent player.DiscordId) |> List.map (DbService.addPlayerEvent player.DiscordId)
@ -238,8 +242,6 @@ let handleArsenal (ctx : IDiscordContext) = PlayerInteractions.executePlayerActi
let role = ctx.GetGuild().GetRole(GuildEnvironment.roleHacker) let role = ctx.GetGuild().GetRole(GuildEnvironment.roleHacker)
do! ctx.GetDiscordMember().GrantRoleAsync(role) |> Async.AwaitTask do! ctx.GetDiscordMember().GrantRoleAsync(role) |> Async.AwaitTask
// do! InviteTracker.acceptInvite ctx player |> Async.AwaitTask
do! Async.Sleep 1000 do! Async.Sleep 1000
do! sendFollowUpMessage ctx $"Now get out of there and go hack other Degenz in the <#{GuildEnvironment.channelBattle}> channel!" do! sendFollowUpMessage ctx $"Now get out of there and go hack other Degenz in the <#{GuildEnvironment.channelBattle}> channel!"

8
Bot/InviteTracker.fs
View File

@ -286,31 +286,23 @@ let private processNewUser (eventArgs : GuildMemberAddEventArgs) =
let acceptInvite (guild : DiscordGuild) discordId memberName = let acceptInvite (guild : DiscordGuild) discordId memberName =
task { task {
printfn "1"
match! checkInviteAccepted discordId with match! checkInviteAccepted discordId with
| false -> | false ->
printfn "2"
let! _ = markInvitedAccepted discordId |> Async.Ignore let! _ = markInvitedAccepted discordId |> Async.Ignore
printfn "3"
try try
let! invite = getInviteFromInvitedUser discordId let! invite = getInviteFromInvitedUser discordId
printfn "4"
let! player = DbService.tryFindPlayer invite.Inviter let! player = DbService.tryFindPlayer invite.Inviter
printfn "5"
match player with match player with
| Some player -> | Some player ->
do! DbService.updatePlayerCurrency InviteRewardAmount player.DiscordId |> Async.Ignore do! DbService.updatePlayerCurrency InviteRewardAmount player.DiscordId |> Async.Ignore
printfn "6"
do! match GuildEnvironment.botClientRecruit with do! match GuildEnvironment.botClientRecruit with
| Some recruitBot -> async { | Some recruitBot -> async {
printfn "7"
let builder = DiscordMessageBuilder() let builder = DiscordMessageBuilder()
builder.WithContent($"{memberName} was recruited and is now a Degen. <@{player.DiscordId}> just earned {InviteRewardAmount} 💰$GBT for their efforts!") |> ignore builder.WithContent($"{memberName} was recruited and is now a Degen. <@{player.DiscordId}> just earned {InviteRewardAmount} 💰$GBT for their efforts!") |> ignore
let channel = guild.GetChannel(GuildEnvironment.channelEventsHackerBattle) let channel = guild.GetChannel(GuildEnvironment.channelEventsHackerBattle)
do! recruitBot.SendMessageAsync(channel, builder) do! recruitBot.SendMessageAsync(channel, builder)
|> Async.AwaitTask |> Async.AwaitTask
|> Async.Ignore |> Async.Ignore
printfn "8"
} }
| None -> async.Return() | None -> async.Return()
do! Analytics.invitedUserAccepted invite.Code player.DiscordId discordId player.Name memberName do! Analytics.invitedUserAccepted invite.Code player.DiscordId discordId player.Name memberName