Подписывайтесь на наш Telegram и не пропускайте важные новости! Перейти

LUA скрипт [sk33t] Lua loader сурс

Начинающий
Начинающий
Статус
Оффлайн
Регистрация
28 Янв 2026
Сообщения
18
Реакции
4
Сурс навайбкоденного луа лоадера. Требуется вставить свою ссылку на репозиторий и подкоректировать названия репо, его автора и так далее. Имеет величайшие луасенс логи
lua loader src:
Expand Collapse Copy
local http = require("gamesense/http")
local vector = require("vector")
local pui = require('gamesense/pui')

local owner = "Zoriu626"
local repo = "Lua-loader"
local branch = "main"

local list_url = string.format("https://raw.githubusercontent.com/%s/%s/%s/scripts_list.json", owner, repo, branch)
local raw_url = string.format("https://raw.githubusercontent.com/%s/%s/%s/", owner, repo, branch)

local menu_r, menu_g, menu_b = client.random_int(1, 255), client.random_int(1, 255), client.random_int(1, 255)

local js = panorama.open()
local steam_name = js.MyPersonaAPI.GetName()

local notify = (function()
    local b = vector
    local c = function(d, b, c) return d + (b - d) * c end
    local e = function() return b(client.screen_size()) end
    local f = function(d, ...)
        local c = { ... }
        local c = table.concat(c, "")
        return b(renderer.measure_text(d, c))
    end
    local g = { notifications = { bottom = {} }, max = { bottom = 6 } }
    g.__index = g
    g.new_bottom = function(...) table.insert(g.notifications.bottom,
        { started = false, instance = setmetatable(
            { active = false, timeout = 5, color = { ["r"] = menu_r, ["g"] = menu_g, ["b"] = menu_b, a = 0 }, x = e().x /
            2, y = e().y, text = ... }, g) }) end
    function g:handler()
        local d = 0
        local b = 0
        for d, b in pairs(g.notifications.bottom) do
            if not b.instance.active and b.started then
                table.remove(g.notifications.bottom, d)
            end
        end
        for d = 1, #g.notifications.bottom do
            if g.notifications.bottom[d].instance.active then
                b = b + 1
            end
        end
        for c, e in pairs(g.notifications.bottom) do
            if c > g.max.bottom then return end
            if e.instance.active then
                e.instance:render_bottom(d, b)
                d = d + 1
            end
            if not e.started then
                e.instance:start()
                e.started = true
            end
        end
    end
    function g:start()
        self.active = true
        self.delay = globals.realtime() + self.timeout
    end
    function g:get_text()
        local d = ""
        for b, b in pairs(self.text) do
            local c = f("", b[1])
            local c, e, f = 255, 255, 255
            if b[2] then c, e, f = menu_r, menu_g, menu_b end
            d = d .. ("\a%02x%02x%02x%02x%s"):format(c, e, f, self.color.a, b[1])
        end
        return d
    end
    local h = (function()
        local d = {}
        d.rec = function(d, b, c, e, f, g, h, i, j)
            j = math.min(d / 2, b / 2, j)
            renderer.rectangle(d, b + j, c, e - j * 2, f, g, h, i)
            renderer.rectangle(d + j, b, c - j * 2, j, f, g, h, i)
            renderer.rectangle(d + j, b + e - j, c - j * 2, j, f, g, h, i)
            renderer.circle(d + j, b + j, f, g, h, i, j, 180, .25)
            renderer.circle(d - j + c, b + j, f, g, h, i, j, 90, .25)
            renderer.circle(d - j + c, b - j + e, f, g, h, i, j, 0, .25)
            renderer.circle(d + j, b - j + e, f, g, h, i, j, -90, .25)
        end
        d.rec_outline = function(d, b, c, e, f, g, h, i, j, k)
            j = math.min(c / 2, e / 2, j)
            if j == 1 then
                renderer.rectangle(d, b, c, k, f, g, h, i)
                renderer.rectangle(d, b + e - k, c, k, f, g, h, i)
            else
                renderer.rectangle(d + j, b, c - j * 2, k, f, g, h, i)
                renderer.rectangle(d + j, b + e - k, c - j * 2, k, f, g, h, i)
                renderer.rectangle(d, b + j, k, e - j * 2, f, g, h, i)
                renderer.rectangle(d + c - k, b + j, k, e - j * 2, f, g, h, i)
                renderer.circle_outline(d + j, b + j, f, g, h, i, j, 180, .25, k)
                renderer.circle_outline(d + j, b + e - j, f, g, h, i, j, 90, .25, k)
                renderer.circle_outline(d + c - j, b + j, f, g, h, i, j, -90, .25, k)
                renderer.circle_outline(d + c - j, b + e - j, f, g, h, i, j, 0, .25, k)
            end
        end
        d.glow_module_notify = function(b, c, e, f, g, h, i, j, k, l, m, n, o, p, p)
            local q = 1
            local r = 1
            if p then d.rec(b, c, e, f, i, j, k, l, h) end
            for i = 0, g do
                local j = l / 2 * (i / g) ^ 3
                d.rec_outline(b + (i - g - r) * q, c + (i - g - r) * q, e - (i - g - r) * q * 2, f - (i - g - r) * q * 2, m, n, o, j / 1.5, h + q * (g - i + r), q)
            end
        end
        return d
    end)()
    function g:render_bottom(g, i)
        local e = e()
        local j = 6
        local k = "     " .. self:get_text()
        local f = f("", k)
        local l = 10
        local m = 5
        local n = 0 + j + f.x
        local n, o = n + m * 2, 12 + 10 + 1
        local p, q = self.x - n / 2, math.ceil(self.y - 40 + .4)
        local r = globals.frametime()
        if globals.realtime() < self.delay then
            self.y = c(self.y, e.y - 45 - (i - g) * o * 1.4, r * 7)
            self.color.a = c(self.color.a, 255, r * 2)
        else
            self.y = c(self.y, self.y - 10, r * 15)
            self.color.a = c(self.color.a, 0, r * 20)
            if self.color.a <= 1 then self.active = false end
        end
        local c, e, g, i = self.color.r, self.color.g, self.color.b, self.color.a
        h.glow_module_notify(p, q, n, o, 9, l, 25, 25, 25, i, menu_r, menu_g, menu_b, i, true)
        local h = m
        h = h + 0 + j
        renderer.text(p + h - 1, q + o / 2 - f.y / 2, menu_r, menu_g, menu_b, i, "b", nil, "LL")
        renderer.text(p + h, q + o / 2 - f.y / 2, c, e, g, i, "", nil, k)
    end
    client.set_event_callback("paint_ui", function() g:handler() end)
    return g
end)()

notify.new_bottom({ { "Hello " }, { steam_name .. ", ", true }, { "welcome to lua loader" } })

local function read_json_file(filename)
    local content = readfile(filename)
    if content then
        local status, decoded = pcall(json.parse, content)
        if status then
            return decoded
        end
    end
    return nil
end

local script_names = {}
local script_statuses = {}
local formatted_scripts = {}

local group = pui.group('lua', 'b')
local script_list = group:listbox('Lua List', { "Loading scripts..." })
local info_label = group:label("\af5f125FF\u{F071}\r Double-click on a script to load or unload it")

local function list_scripts()
    http.get(list_url, function(success, response)
        if not success or response.status ~= 200 then
            script_list:update({ "Failed to connect to GitHub" })
            return
        end

        local status, decoded_data = pcall(json.parse, response.body)
       
        if not status then
            script_list:update({ "Error: Broken JSON on GitHub" })
            return
        end

        if decoded_data and decoded_data.luas then
            script_names = decoded_data.luas
            local active_luas = read_json_file("luas.json") or {}

            formatted_scripts = {}
            for _, script_name in ipairs(script_names) do
                local is_active = active_luas[script_name] or false
                script_statuses[script_name] = is_active
               
                local circle_prefix = is_active and "\u{25C9}" or "\u{25CB}"
                table.insert(formatted_scripts, "\a" .. string.format("%02x%02x%02x%02x", menu_r, menu_g, menu_b, 255) .. circle_prefix .. "\abfbdbdFF " .. script_name)
            end
            script_list:update(formatted_scripts)
        end
    end)
end

local function load_selected_script(script_name)
    local file_with_ext = script_name .. ".lua"

    http.get(raw_url .. file_with_ext, function(success, response)
        if not success or response.status ~= 200 then
            notify.new_bottom({ { "Failed to download " }, { script_name, true } })
            return
        end

        local lua_src = load(response.body)
        if not lua_src then
            notify.new_bottom({ { "Syntax error in " }, { script_name, true } })
            return
        end

        local active_luas = read_json_file("luas.json") or {}
        active_luas[script_name] = true
        writefile("luas.json", json.stringify(active_luas))

        script_statuses[script_name] = true

        for i, script_text in ipairs(formatted_scripts) do
            if script_text:match(script_name) then
                formatted_scripts[i] = "\a" .. string.format("%02x%02x%02x%02x", menu_r, menu_g, menu_b, 255) .. "\u{25C9} \abfbdbdFF " .. script_name
                script_list:update(formatted_scripts)
                break
            end
        end

        notify.new_bottom({ { "Successfully loaded " }, { script_name .. "! ", true } })
        lua_src()
    end)
end

local function unload_selected_script(script_name)
    local active_luas = read_json_file("luas.json") or {}
    active_luas[script_name] = nil
    writefile("luas.json", json.stringify(active_luas))

    script_statuses[script_name] = false
    client.reload_active_scripts()
end

local last_click_time = 0
local last_click_index = -1

local function list_clicks()
    local listitem = (script_list:get() + 1)
    if not listitem or listitem <= 0 then return end

    local cur_time = globals.curtime()
    if last_click_index == listitem and last_click_time + 0.5 > cur_time then
        local selected_item = script_names[listitem]
        if not selected_item then return end

        if not script_statuses[selected_item] then
            load_selected_script(selected_item)
        else
            unload_selected_script(selected_item)
        end

        last_click_index = -1
    else
        last_click_index = listitem
        last_click_time = cur_time
    end
end

local function load_autoload_scripts()
    local active_luas = read_json_file("luas.json") or {}
    for script_name, is_active in pairs(active_luas) do
        if is_active then
            load_selected_script(script_name)
        end
    end
end

list_scripts()
load_autoload_scripts()

script_list:set_callback(function()
    list_clicks()
end)
1778607823001.png
 
как я понял это фри лоадер смысл его дампить если этот лоадер сделан для тех кто не хочет иметь дохуя луашек в корне
и это вроде паста скриптлик лоадера
 
probably out of context but what is that lua in the right corner?
Пожалуйста, авторизуйтесь для просмотра ссылки.
My custom Lua with a rendered Skeet menu, I might post it on the forum later
как я понял это фри лоадер смысл его дампить если этот лоадер сделан для тех кто не хочет иметь дохуя луашек в корне
и это вроде паста скриптлик лоадера
Лоадер фри, и да - это паста скриптлик лоадера. Просто сурс выложил, возможно кому-то за базу пойдёт напастить что либо
 
Назад
Сверху Снизу