This script plain up and stopped working even

[Noah71581]

even with a new discord bot the script is out of date i believe and needs an update reset tokens god knows how many times and re made the bot

[Noah71581]

local token = "Bot " .. (Config.DiscordToken or "")

local pairs = pairs
local tostring = tostring
local encode = json.encode
local decode = json.decode

local _GetIdentifiersTable = GetIdentifiersTable
local _PerformHttpRequest = PerformHttpRequest
local _Wait = Citizen.Wait

local GuildID = tostring(Config.GuildID or "")
local DiscordRoles = Config.DiscordRoles or {}

local DEBUG = true

local function DebugLog(message)
if DEBUG then
Log("^3[DEBUG]^7 " .. tostring(message))
end
end

local function DiscordRequest(endpoint, method, jsondata)
local response = nil
local body = ""

if jsondata and next(jsondata) ~= nil then
    body = encode(jsondata)
end

DebugLog(("DiscordRequest -> %s %s"):format(tostring(method), tostring(endpoint)))

_PerformHttpRequest("https://discord.com/api/" .. endpoint, function(codeResponse, dataResponse, headersResponse)
    response = {
        code = codeResponse,
        data = dataResponse,
        headers = headersResponse
    }
end, method, body, {
    ["Content-Type"] = "application/json",
    ["Authorization"] = token
})

local timeout = 0
while response == nil do
    timeout = timeout + 1
    if timeout >= 10000 then
        Log("^1Discord API request timed out for endpoint: ^7" .. tostring(endpoint))
        return {
            code = 0,
            data = "Request timed out.",
            headers = {}
        }
    end
    _Wait(0)
end

DebugLog(("DiscordResponse <- %s | %s"):format(tostring(response.code), tostring(endpoint)))

return response

end

local function GetDiscordIdentifier(user)
local identifiers = _GetIdentifiersTable(user)
if not identifiers or not identifiers.discord then
DebugLog(("Player %s has no Discord identifier."):format(tostring(user)))
return nil
end

local discordId = tostring(identifiers.discord):gsub("discord:", "")
if discordId == "" then
    DebugLog(("Player %s has an empty Discord identifier after cleanup."):format(tostring(user)))
    return nil
end

return discordId

end

local function GetGuildMemberData(user)
local discordId = GetDiscordIdentifier(user)
if not discordId then
return false, "No Discord identifier found for player."
end

if GuildID == "" then
    return false, "Config.GuildID is empty."
end

if tostring(Config.DiscordToken or "") == "" then
    return false, "Config.DiscordToken is empty."
end

local endpoint = ("guilds/%s/members/%s"):format(GuildID, discordId)
local result = DiscordRequest(endpoint, "GET", {})

if result.code ~= 200 then
    local errText = result.data or ("HTTP " .. tostring(result.code))
    DebugLog(("Member lookup failed for discord ID %s | Code: %s | Response: %s"):format(
        tostring(discordId),
        tostring(result.code),
        tostring(errText)
    ))
    return false, errText
end

local ok, data = pcall(decode, result.data or "{}")
if not ok or type(data) ~= "table" then
    DebugLog(("Failed to decode member response for discord ID %s. Raw: %s"):format(
        tostring(discordId),
        tostring(result.data)
    ))
    return false, "Failed to decode Discord member response."
end

DebugLog(("Member lookup success for discord ID %s."):format(tostring(discordId)))
return data, nil

end

local function ResolveRoleInput(role)
local roleStr = tostring(role or "")

if roleStr == "" then
    return nil
end

if DiscordRoles[roleStr] then
    return tostring(DiscordRoles[roleStr]), "mapped_key"
end

if roleStr:match("^%d+$") then
    return roleStr, "raw_id"
end

for key, value in pairs(DiscordRoles) do
    if tostring(value) == roleStr then
        return tostring(value), "mapped_value"
    end
end

return nil

end

function isInGuild(user)
local memberData, err = GetGuildMemberData(user)
if not memberData then
DebugLog(("isInGuild returned false for player %s | %s"):format(tostring(user), tostring(err)))
return false
end

return true

end

function getRoles(user)
local memberData, err = GetGuildMemberData(user)
if not memberData then
DebugLog(("getRoles failed for player %s | %s"):format(tostring(user), tostring(err)))
return {}
end

if type(memberData.roles) ~= "table" then
    DebugLog(("getRoles found no roles table for player %s"):format(tostring(user)))
    return {}
end

DebugLog(("getRoles returned %s role(s) for player %s"):format(tostring(#memberData.roles), tostring(user)))
return memberData.roles

end

function isRolePresent(user, role)
local memberData, err = GetGuildMemberData(user)
if not memberData then
DebugLog(("isRolePresent failed for player %s | %s"):format(tostring(user), tostring(err)))
return false
end

if type(memberData.roles) ~= "table" then
    DebugLog(("isRolePresent found no roles table for player %s"):format(tostring(user)))
    return false
end

local resolvedRole, resolveType = ResolveRoleInput(role)
if not resolvedRole then
    DebugLog(("isRolePresent could not resolve role input '%s'"):format(tostring(role)))
    return false
end

DebugLog(("isRolePresent checking role '%s' resolved as '%s' (%s)"):format(
    tostring(role),
    tostring(resolvedRole),
    tostring(resolveType)
))

for _, v in pairs(memberData.roles) do
    if tostring(v) == resolvedRole then
        DebugLog(("Role '%s' was found for player %s"):format(tostring(role), tostring(user)))
        return true
    end
end

DebugLog(("Role '%s' was NOT found for player %s"):format(tostring(role), tostring(user)))
return false

end

Citizen.CreateThread(function()
if GuildID == "" then
Log("^1GuildID is empty in sv_config.lua.")
return
end

if tostring(Config.DiscordToken or "") == "" then
    Log("^1DiscordToken is empty in sv_config.lua.")
    return
end

Log("Checking Discord guild connection...")

local guild = DiscordRequest("guilds/" .. GuildID, "GET", {})

if guild.code ~= 200 then
    Log("^1An error has occurred with your guild information.")
    Log("^1HTTP Code: ^7" .. tostring(guild.code))
    Log("^1Response: ^7" .. tostring(guild.data))
    Log("^1Check these:")
    Log("^1- Bot token is valid")
    Log("^1- Bot is invited to the Discord server")
    Log("^1- Guild ID is correct")
    Log("^1- Server Members Intent is enabled on the bot")
    return
end

local ok, data = pcall(decode, guild.data or "{}")
if not ok or type(data) ~= "table" then
    Log("^1Guild response was received but could not be decoded.")
    Log("^1Raw response: ^7" .. tostring(guild.data))
    return
end

Log("Permission guild was set to: " .. tostring(data.name or "Unknown") .. " (ID: " .. tostring(data.id or "Unknown") .. ")")

end)

not sure why it seperates my code but this is how i fixed it