LUA скрипт QunionTeleport leak

BE GODLESS
Забаненный
Забаненный
Статус
Оффлайн
Регистрация
2 Сен 2021
Сообщения
72
Реакции
27
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Lua + WEB (Возможно будут проблемы с датой, хуй знает почему)
DW:
 

Вложения

1. Кто создатель?
2. Воркает на аризоне?
 
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Ого, телепорт(курд)
 
Ты можно подумать успел так быстро его загрузить и настроить? Или ты проверку подписки вырезал?
Код:
Expand Collapse Copy
-- Check license
function check_license()
    local result, playerid = sampGetPlayerIdByCharHandle(playerPed)
    local name = sampGetPlayerNickname(playerid)
    local ip, port = sampGetCurrentServerAddress()
    local response = requests.get("https://quniondev.ru/SAMP/teleport/auth.php?key="..key.v.."&hwid="..getHWID().."&nick="..name.."&server="..ip..":"..port.."&ip="..useripaddress)
    print("https://quniondev.ru/SAMP/teleport/auth.php?key="..key.v.."&hwid="..getHWID().."&nick="..name.."&server="..ip..":"..port.."&ip="..useripaddress)
    local match = response.text:match("(.*)")
    local match_date = response.text:match("%d+.%d+.%d+")
    if key.v == "" then
        msg("Ключ не введён")
        activated = false
    else
        if not match:find("error_banned") then -- Если блокировка отсутсвует
            if not match:find("error_log") then -- Если логирование прошло успешно
                if not match:find("error_key") then -- Если ключ есть в бд
                    if not match:find("error_hwid") then -- Если привязка совпала
                        if not match:find("error_time") then -- Если сервер не ответил что ключ истек.
                            license_text = "Окончание лицензии: " ..col1.. "" ..match_date --  Выводим кол-во дней до конца лицензии
                            activated = true
                        else
                            msg("Срок действия лицензии истек.")
                            activated = false
                        end
                    else
                        msg("Ошибка привязки.")
                        activated = false
                    end
                else
                    msg("Ключа нет в бд")
                    activated = false
                end
            else
                msg("Ошибка логирования")
                activated = false
            end
        else
            activated = false
            return
        end
    end

    if activated then
        main_window_state.v = false
        imgui.ShowCursor = false
        license = true
    else
        license = false
        main_window_state.v = true
    end
end
Как такое чудо то вырезать можно?
 
Код:
Expand Collapse Copy
-- Check license
function check_license()
    local result, playerid = sampGetPlayerIdByCharHandle(playerPed)
    local name = sampGetPlayerNickname(playerid)
    local ip, port = sampGetCurrentServerAddress()
    local response = requests.get("https://quniondev.ru/SAMP/teleport/auth.php?key="..key.v.."&hwid="..getHWID().."&nick="..name.."&server="..ip..":"..port.."&ip="..useripaddress)
    print("https://quniondev.ru/SAMP/teleport/auth.php?key="..key.v.."&hwid="..getHWID().."&nick="..name.."&server="..ip..":"..port.."&ip="..useripaddress)
    local match = response.text:match("(.*)")
    local match_date = response.text:match("%d+.%d+.%d+")
    if key.v == "" then
        msg("Ключ не введён")
        activated = false
    else
        if not match:find("error_banned") then -- Если блокировка отсутсвует
            if not match:find("error_log") then -- Если логирование прошло успешно
                if not match:find("error_key") then -- Если ключ есть в бд
                    if not match:find("error_hwid") then -- Если привязка совпала
                        if not match:find("error_time") then -- Если сервер не ответил что ключ истек.
                            license_text = "Окончание лицензии: " ..col1.. "" ..match_date --  Выводим кол-во дней до конца лицензии
                            activated = true
                        else
                            msg("Срок действия лицензии истек.")
                            activated = false
                        end
                    else
                        msg("Ошибка привязки.")
                        activated = false
                    end
                else
                    msg("Ключа нет в бд")
                    activated = false
                end
            else
                msg("Ошибка логирования")
                activated = false
            end
        else
            activated = false
            return
        end
    end

    if activated then
        main_window_state.v = false
        imgui.ShowCursor = false
        license = true
    else
        license = false
        main_window_state.v = true
    end
end
Как такое чудо то вырезать можно?
Такой шикарный код будет грех вырезатьб
 
Назад
Сверху Снизу