21 lines
805 B
Forth
21 lines
805 B
Forth
[<Microsoft.FSharp.Core.RequireQualifiedAccess>]
|
|
module Degenz.GuildEnvironment
|
|
|
|
open System
|
|
open dotenv.net
|
|
|
|
DotEnv.Load(DotEnvOptions(envFilePaths = [ "../../../../stag.env" ], overwriteExistingVars = false))
|
|
//DotEnv.Load(DotEnvOptions(envFilePaths = [ "../../../../prod.env" ], overwriteExistingVars = false))
|
|
|
|
let getVar str = Environment.GetEnvironmentVariable(str)
|
|
let getId str = getVar str |> uint64
|
|
|
|
let guildId = getId "DISCORD_GUILD"
|
|
let tokenPlayerInteractions = getVar "TOKEN_PLAYER_INTERACTIONS"
|
|
let tokenHackerBattle = getVar "TOKEN_HACKER_BATTLE"
|
|
let tokenStore = getVar "TOKEN_STORE"
|
|
let channelEventsHackerBattle = getId "CHANNEL_EVENTS_HACKER_BATTLE"
|
|
let channelTraining = getId "CHANNEL_TRAINING"
|
|
let botHackerBattle = getId "BOT_HACKER_BATTLE"
|
|
let roleTrainee = getId "ROLE_TRAINEE"
|