DemmyDemon

--- Transforms a table of tables into a possibly Markdown-formatted table
---@param tbl table The table to be sorted
---@param sorted boolean? If true, the resulting table will be very naïvely sorted.
---@param skipDivider boolean? If true, a divider line is omitted. This line is required for Markdown!
---@return table lines Table of strings containing the lines of the table. Just iterate and print.
function FormatTable(tbl, sorted, skipDivider)

    local width = {} -- Stores the width of each column.
    local maxIndex = 0 -- Stores the highest number of columns seen for a row
    local lines = {} -- Will store the actual output

DemmyDemon

if IsDuplicityVersion() then
    local calls = {}

    ---Define a server-side call that a client can use to run code on the server.
    ---@param name string The uniquely identifying name of this call.
    ---@param code function The function to run when this call is made
    ---@return table eventData The event data associated with the event that was registered to handle this call.
    function DefineServerCall(name, code)
        local finalName = string.format("%s:RPC:%s", GetCurrentResourceName(), name)
        if calls[finalName] then

DemmyDemon

local function handler(request, response)

    local key = GetConvar("playerLocationKey", "")
    if key ~= "" then
        if request.headers.Authorization == nil or request.headers.Authorization ~= "Bearer " .. key then
            response.writeHead(403, {["Content-Type"] = "text/plain"})
            response.send("Invalid Bearer Token")
            return
        end
    end

DemmyDemon

AddEventHandler('playerConnecting', function(playerName, setKickReason, deferrals)
    -- First, a local copy of source, so it doesn't get lost while deferring.
    local source = source
    
    -- Actually defer the connection
    deferrals.defer()
    -- Wait a tick, so the deferral happens.
    Citizen.Wait(0)

    -- Tell the client what we're doing, in case it stalls at this point, somehow.

DemmyDemon

-- This code is ANCIENT, and probably contains natives that have been renamed.
-- It also contains references to functions not provided here.
-- Either way, it should illustrate how to orbit a camera around a target Ped.

function moveCamera()
    if IsEntityAPed(targetPed) then
        local targetCoords = nil

        if IsPedInAnyVehicle(targetPed,false) then
            local vehicle = GetVehiclePedIsIn(targetPed,false)

DemmyDemon

DefineNightCallback('editor-save-json', function(source, jsonString)
    if IsPlayerAceAllowed(source, 'admin') then
        local data = json.decode(jsonString)
        if data and data.name then
            local name = string.lower(data.name)
            name = name:gsub("[^a-z.]", "_")
            name = name .. '.json'
            local saved = SaveResourceFile(GetCurrentResourceName(), 'areas/'..name, jsonString, -1)
            if saved then
                tellplayer(source,'Saved!', 'Area saved as', name)

DemmyDemon

local dumpsterModels = {
    218085040,
}

function Frob(dumpster)
end

function MaybeFrob(candidate)
    if not DoesEntityExist(candidate) then return end
    local model = GetEntityModel(candidate)

DemmyDemon

-- Here we list our ped models we want to cycle through.
local pedCycle = {
    "s_m_y_fireman_01",
    "s_m_y_hwaycop_01",
    "s_m_y_marine_03",
    "s_m_y_swat_01",
    "s_m_m_fibsec_01",
     "s_m_m_paramedic_01",
    "s_f_y_scrubs_01",
    "g_m_m_chicold_01",

DemmyDemon

local maxDistance = 1.0
local IsNear = false

AddEventHandler('near-atm-distance', function(distance)
    maxDistance = distance
end)

Citizen.CreateThread(function()
    while true do
        Citizen.Wait(0)

DemmyDemon

RegisterNetEvent('night-tools:superman')
AddEventHandler ('night-tools:superman', function()
    serverlog('is flying!')

    SetPlayerParachutePackTintIndex(PlayerId(),3)
    SetPlayerParachuteTintIndex(PlayerId(),6)

    Citizen.CreateThread(function()
        GiveWeaponToPed(PlayerPedId(),`GADGET_PARACHUTE`,1,false,true)