- 31
- 8
- Версия MoonLoader
- .026-beta
есть сайт, который генерирует и создает ключ авторизации, после выводит информацию о том, действителен он или нет и сколько дней осталось до конца активации ключа. также есть функция в тулсе, которая должна распознавать этот ключ по запросу http, но тулс выдает ошибку с надписью "Ошибка выполнения запроса. Попробуйте ещё раз..". в чем может быть проблема?
где "1233" в поле ссылки - ключ
где "7" в открывшимся окне - количество дней до конца активации
Lua:
check_token = function()
local var_230_0 = "AUTH"
local var_230_1 = "qsliwq.9ab.ru/tools/auth.php"
local var_230_2 = ("" .. string.format("?token=%s", encode_url(var_0_19:decode(net.auth.token.v))))
local var_230_3 = {
timeout = 60,
data = var_230_2
}
net.auth.error = nil
net.auth.status = AUTH_AWAIT
var_0_20.netlog(0, var_230_0, "Проверка ключа авторизации..")
asyncHttpRequest("POST", var_230_1, var_230_3, function(arg_231_0)
if arg_231_0.status_code ~= 200 then
net.auth.status = AUTH_INPUT
net.auth.win.v = true
net.auth.error = ("Ошибка от сайта (#%s). Попробуйте ещё раз.."):format(arg_231_0.status_code)
var_0_20.netlog(2, var_230_0, "Запрос не выполнен!", arg_231_0.status_code)
return nil
end
arg_231_0.text = var_0_19:decode(arg_231_0.text)
local var_231_0 = decodeJson(arg_231_0.text)
if type(var_231_0) == "table" then
if var_231_0.status == true then
if net.server_id < 0 then
net.auth.win.v = true
net.auth.status = AUTH_INPUT
net.auth.error = "Не удалось определить номер сервера!"
var_0_20.netlog(2, var_230_0, "Номер сервера не получен!", arg_231_0.text)
return nil
end
if BETA then
local var_231_1 = false
if not var_231_1 then
net.auth.win.v = true
net.auth.status = AUTH_INPUT
net.auth.error = "У вас нет доступа к использованию этой версии!"
var_0_20.netlog(1, var_230_0, "Ключ авторизации валиден!", arg_231_0.text)
return nil
end
end
if net.auth.win.v then
net.auth.save_token()
else
if type(net.auth.user.first_name) ~= "string" then
sampAddChatMessage("[ Arizona Tools ] {EEEEEE}С возвращением! Всё готово к работе.", 13387077)
else
sampAddChatMessage("[ Arizona Tools ] {EEEEEE}С возвращением, " .. net.auth.user.first_name .. "! Всё готово к работе.", 13387077)
end
sampAddChatMessage("[ Arizona Tools ] {EEEEEE}Открыть главное меню: /amenu", 13387077)
print("{AAAAAA}Авторизация в скрипте успешно пройдена.")
print(("{AAAAAA}Версия: {EEEEEE}%s (%d)"):format(scr.version, scr.version_num))
net.auth.auth_timer = os.clock()
net.auth.status = AUTH_OK
end
if type(var_231_0.data.global) == "table" then
var_0_20.ac_bypass = var_231_0.data.global.anticheat == true
if type(var_231_0.data.global.ads) == "string" then
local var_231_2 = decodeJson(var_231_0.data.global.ads)
if type(var_231_2) == "table" then
var_0_20.promo.list = var_231_2
end
end
end
net.backup.last = 0
if type(var_231_0.data.backup_last) == "number" and var_231_0.data.backup_last ~= -1 then
net.backup.last = os.time() - var_231_0.data.backup_last
end
if net.backup.auto.v == 1 and os.time() - net.backup.last >= 86400 or net.backup.auto.v == 2 and os.time() - net.backup.last >= 604800 or net.backup.auto.v == 3 and os.time() - net.backup.last >= 2592000 then
check.backup_create = true
end
check.auth_successfull = true
var_0_20.netlog(1, var_230_0, "Ключ авторизации валиден!", arg_231_0.text)
else
net.auth.status = AUTH_INPUT
net.auth.win.v = true
net.auth.error = var_231_0.message
var_0_20.netlog(2, var_230_0, "Ключ авторизации невалиден!", arg_231_0.text)
end
else
net.auth.status = AUTH_INPUT
net.auth.win.v = true
net.auth.error = "Невалидный ответ от сайта. Попробуйте ещё раз.."
var_0_20.netlog(2, var_230_0, "Невалидный ответ от сервера! (NOT JSON)", arg_231_0.text)
end
end, function(arg_232_0)
net.auth.status = AUTH_INPUT
net.auth.win.v = true
net.auth.error = "Ошибка выполнения запроса. Попробуйте ещё раз.."
var_0_20.netlog(2, var_230_0, "Ошибка выполнения запроса!", arg_232_0)
end)
end,
где "1233" в поле ссылки - ключ
где "7" в открывшимся окне - количество дней до конца активации