F# discord bot

bot.fs

open System.Threading.Tasks

open DSharpPlus

let discord =
   new DiscordClient(
      new DiscordConfiguration(
         Token = "xxxx",  //Token goes here
         TokenType = TokenType.Bot,
         Intents = DiscordIntents.AllUnprivileged
      )
   )


discord.ConnectAsync() |> Async.AwaitTask |> Async.RunSynchronously

discord.add_MessageCreated (
   fun _c e ->
      task {
         if e.Message.Content.StartsWith("!ping") then
            do! e.Message.RespondAsync("Pong!") :> Task
      }
)

Task.Delay(-1) |> Async.AwaitTask |> Async.RunSynchronously