20 lines
704 B
Forth
20 lines
704 B
Forth
[<Microsoft.FSharp.Core.RequireQualifiedAccess>]
|
|
module Degenz.GuildEnvironment
|
|
|
|
open System
|
|
open dotenv.net
|
|
|
|
DotEnv.Load(DotEnvOptions(probeForEnv = true, probeLevelsToSearch = 5, 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"
|