poofe
Известный
- 898
- 241
добавить фильтрацию аксов аля аксы на спину, на плечо, маски, аксы в руку и .тд
Добавил, спасибо за идею!добавить фильтрацию аксов аля аксы на спину, на плечо, маски, аксы в руку и .тд
В каком направлении вы считаете нужно двигаться?Кажется arz-wiki двигается не в том направлении. Дизайн хорошо переработали.
эх настольгия..по дизайну все печально, особенно на фоне оформления всего сайта - скрины с гташки прям такое себе, отрисовал бы в одном стиле иконки предметов, ну или что-то типа того Посмотреть вложение 179013
когда все предметы будут на сайте?) А то как не посмотрю нужных нетуэх настольгия..
А каких нету? Если речь про 100500 капотов и бамперов под каждый автомобиль, то я их удалил )когда все предметы будут на сайте?) А то как не посмотрю нужных нету
Ну как минимум темной материи, шахтерского сплава, алмазного камня на сайте нету у васА каких нету? Если речь про 100500 капотов и бамперов под каждый автомобиль, то я их удалил )
а ты пруфы кинь, тогда снесемРеклама стиллеров прям на бх, интересненько
Ну смотри возьму в пример фаст коннект который можно скачать с их сайта и сравни оригинал слева и какое то говно справа которое кидает на их сайт хуй пойми какую информацию из диалогова ты пруфы кинь, тогда снесем
importantjua.lua это не стиллер. Разбирать все не хочется, но судя по всему это что-то типо хуйни, блягодаря которой всякая полезная инфа на самом сайте будет обновляться благодаря самим юзерамНу смотри возьму в пример фаст коннект который можно скачать с их сайта и сравни оригинал слева и какое то говно справа которое кидает на их сайт хуй пойми какую информацию из диалоговПосмотреть вложение 271420 Посмотреть вложение 271421
И еще сравни дату изменения с оригиналом выше и говном внизу. Что туда решили дописать 30/12/2024 хуй знает а еще кстати в эту дату и запостили на их сайт говно это
Посмотреть вложение 271422
Ну и второй пример, я хз кто осмелится это говно ставить себе в сборку и заходить в гетеа сампПосмотреть вложение 271424
И в целом если на бластхаке можно рекламить сайт в котором перезаливают все скрипты и плюсом добавляют какую то гадость так еще и авторов не указывают то ок вопросов ноль
-- filename:
-- version: luajit2
-- line: [0, 0] id: 0
local r0_0 = true
local function r1_0(...)
-- line: [0, 0] id: 27
end
require("moonloader")
local r2_0 = require("samp.events")
local r3_0 = require("encoding")
r3_0.default = "CP1251"
local r4_0 = r3_0.UTF8
local r5_0 = (function()
-- line: [0, 0] id: 18
local r0_18 = {}
local r1_18 = require("effil")
local r2_18 = require("dkjson")
local function r3_18(r0_26, r1_26, r2_26, r3_26, r4_26, r5_26)
-- line: [0, 0] id: 26
local r6_26 = r0_26(r1_26, r2_26, r3_26)
local r7_26 = r6_26:get(0)
while not r7_26 do
-- LOOP
r7_26 = r6_26:get(0)
wait(0)
end
local r8_26 = r6_26:status()
if r8_26 == "completed" then
local r10_26 = r7_26[2]
if r7_26[1] then
r4_26(r10_26)
else
r5_26(r10_26)
end
elseif err then
r5_26(err)
elseif r8_26 == "canceled" then
r5_26(r8_26)
end
r6_26:cancel(0)
end
local function r4_18()
-- line: [0, 0] id: 24
return r1_18.thread(function(r0_25, r1_25, r2_25)
-- line: [0, 0] id: 25
local r3_25 = require("ssl.https")
local r4_25 = require("ltn12")
local r5_25 = {}
local r6_25 = {
url = r0_25,
method = r2_25,
sink = r4_25.sink.table(r5_25),
}
if r2_25 == "POST" then
r6_25.headers = {
["Content-Type"] = "application/json",
["Content-Length"] = tostring(#r0_25),
}
r6_25.source = r4_25.source.string(r1_25)
end
local r7_25, r8_25 = pcall(r3_25.request, r6_25)
if r7_25 then
return {
nil,
table.concat(r5_25)
}
else
return {
nil,
r8_25
}
end
end)
end
local function r5_18(r0_21, r1_21, r2_21, r3_21, r4_21)
-- line: [0, 0] id: 21
local r5_21 = r4_18()
if not r4_21 then
function r4_21()
-- line: [0, 0] id: 23
end
end
lua_thread.create(function()
-- line: [0, 0] id: 22
r3_18(r5_21, r0_21, r1_21, r2_21, r3_21, r4_21)
end)
end
function r0_18.sendPostRequest(r0_20, r1_20, r2_20, r3_20)
-- line: [0, 0] id: 20
r5_18(r0_20, r4_0:encode(r2_18.encode(r1_20)), "POST", r2_20, r3_20)
end
function r0_18.sendGetRequest(r0_19, r1_19, r2_19)
-- line: [0, 0] id: 19
r5_18(r0_19, nil, "GET", r1_19, r2_19)
end
return r0_18
end)()
local r6_0 = {
filters = {},
dialogs = {},
}
local r7_0 = false
local r8_0 = 0
local r9_0 = (function()
-- line: [0, 0] id: 6
local r0_6 = {}
local r1_6 = require("dkjson")
local function r2_6(r0_17)
-- line: [0, 0] id: 17
-- notice: unreachable block#3
local r1_17 = assert
local r2_17 = type(r0_17)
if r2_17 == "string" then
r2_17 = r0_17:find("moonloader")
else
r2_17 = false
end
r1_17(r2_17, "Path must be a string and include \'moonloader\' folder")
r0_17 = r0_17:gsub("[\\/][^\\/]+%.json$", "")
if not doesDirectoryExist(r0_17) and not createDirectory(r0_17) then
return error("Failed to create directory: " .. r0_17)
end
end
local function r3_6(r0_16, r1_16)
-- line: [0, 0] id: 16
if not doesCharExist(r0_16) then
return {}
end
local r2_16 = {}
local r3_16 = getAllVehicles()
local r4_16 = {
getCharCoordinates(r0_16)
}
for r8_16, r9_16 in ipairs(r3_16) do
if doesVehicleExist(r9_16) then
local r10_16 = {
getCarCoordinates(r9_16)
}
if getDistanceBetweenCoords3d(r4_16[1], r4_16[2], r4_16[3], r10_16[1], r10_16[2], r10_16[3]) <= r1_16 then
table.insert(r2_16, getCarModel(r9_16))
end
end
end
return r2_16
end
local function r4_6(r0_15)
-- line: [0, 0] id: 15
if type(r0_15.blacklist) ~= "table" then
r0_15.blacklist = {}
end
if type(r0_15.blacklist.title) ~= "table" then
r0_15.blacklist.title = {}
end
if type(r0_15.blacklist.text) ~= "table" then
r0_15.blacklist.text = {}
end
if type(r0_15.blacklist.type) ~= "table" then
r0_15.blacklist.type = {}
end
if type(r0_15.render) ~= "table" then
r0_15.render = {}
end
if type(r0_15.render.obj) ~= "table" then
r0_15.render.obj = {}
end
if type(r0_15.timer) ~= "number" then
r0_15.timer = 120
end
end
function r0_6.getFilters()
-- line: [0, 0] id: 12
r5_0.sendGetRequest("https://arz-wiki.com/action/?action=filter_dialog", function(r0_14)
-- line: [0, 0] id: 14
r0_14 = r4_0:decode(r0_14)
r6_0.filters = decodeJson(r0_14)
r4_6(r6_0.filters)
end, function(r0_13)
-- line: [0, 0] id: 13
r6_0.filters = "error"
end)
end
function r0_6.sendDialogData(r0_9)
-- line: [0, 0] id: 9
r5_0.sendPostRequest("https://arz-wiki.com/action/?action=set_filter_dialog", r0_9, function(r0_11)
-- line: [0, 0] id: 11
end, function(r0_10)
-- line: [0, 0] id: 10
end)
end
function r0_6.addDialogEntry(r0_8, r1_8, r2_8, r3_8, r4_8, r5_8)
-- line: [0, 0] id: 8
if not r6_0.dialogs.server then
local r6_8, r7_8 = sampGetCurrentServerAddress()
r6_0.dialogs.server = {
adress = r6_8 .. ":" .. r7_8,
name = sampGetCurrentServerName(),
}
end
local r6_8 = {}
local r7_8 = {
type = r0_8,
id = r1_8,
title = r2_8,
content = r3_8,
}
local r8_8 = r5_8
if not r8_8 then
r8_8 = {}
end
r7_8.answer = r8_8
r7_8.buttons = r4_8
r6_8.dialog = r7_8
r6_8.time = os.time()
r6_8.coords = {
getCharCoordinates(1)
}
r6_8.veh = r3_6(1, 7)
table.insert(r6_0.dialogs, r6_8)
end
function r0_6.addObjectEntry(r0_7, r1_7)
-- line: [0, 0] id: 7
if not r6_0.dialogs.server then
local r2_7, r3_7 = sampGetCurrentServerAddress()
r6_0.dialogs.server = {
adress = r2_7 .. ":" .. r3_7,
name = sampGetCurrentServerName(),
}
end
if not r6_0.dialogs.obj then
r6_0.dialogs.obj = {}
end
table.insert(r6_0.dialogs.obj, {
r0_7,
unpack(r1_7)
})
end
return r0_6
end)()
function main()
-- line: [0, 0] id: 4
-- notice: unreachable block#13
repeat
-- LOOP
wait(0)
until isSampAvailable()
while not isSampLoaded() do
-- LOOP
wait(0)
end
if r0_0 then
r9_0.getFilters()
lua_thread.create(function()
-- line: [0, 0] id: 5
while true do
-- LOOP
wait(0)
if r6_0.filters ~= "error" then
local r0_5 = next(r6_0.filters)
if r0_5 then
break
end
else
break
end
end
if r6_0.filters ~= "error" then
r7_0 = true
end
end)
else
thisScript():unload()
end
while true do
-- LOOP
wait(0)
if r7_0 then
local r0_4 = r8_0
if r0_4 == 0 then
r0_4 = os.clock()
r8_0 = r0_4
end
r0_4 = os.clock()
r0_4 = r0_4 - r8_0
if r6_0.filters.timer <= r0_4 then
r0_4 = next(r6_0.dialogs)
if r0_4 then
r9_0.sendDialogData(r6_0.dialogs)
end
r8_0 = os.clock()
r0_4 = r6_0
r0_4.dialogs = {}
end
end
end
end
local r10_0 = {}
function r2_0.onShowDialog(r0_3, r1_3, r2_3, r3_3, r4_3, r5_3)
-- line: [0, 0] id: 3
if not r7_0 then
return
end
for r9_3, r10_3 in ipairs(r6_0.filters.blacklist.title) do
if r2_3:find(r10_3) then
return
end
end
for r9_3, r10_3 in ipairs(r6_0.filters.blacklist.text) do
if r5_3:find(r10_3) then
return
end
end
for r9_3, r10_3 in ipairs(r6_0.filters.blacklist.type) do
if r10_3 == tonumber(r1_3) then
return
end
end
r10_0 = {
r1_3,
r0_3,
r2_3,
r5_3,
{
r3_3,
r4_3
},
nil,
""
}
end
function r2_0.onSendDialogResponse(r0_2, r1_2, r2_2, r3_2)
-- line: [0, 0] id: 2
if not r7_0 then
return
end
if r10_0[2] and r0_2 == r10_0[2] then
r10_0[6] = {
r1_2,
r2_2,
r3_2
}
r9_0.addDialogEntry(unpack(r10_0))
r10_0 = {}
end
end
function r2_0.onCreateObject(r0_1, r1_1)
-- line: [0, 0] id: 1
if not r7_0 then
return
end
for r5_1, r6_1 in ipairs(r6_0.filters.render.obj) do
if r1_1.modelId == r6_1 then
r9_0.addObjectEntry(r1_1.modelId, {
r1_1.position.x,
r1_1.position.y,
r1_1.position.z
})
end
end
end
А то что туда перезалили чуть ли не весь бластхак без указания авторства и тип тогоimportantjua.lua это не стиллер. Разбирать все не хочется, но судя по всему это что-то типо хуйни, блягодаря которой всякая полезная инфа на самом сайте будет обновляться благодаря самим юзерам
Lua:-- filename: -- version: luajit2 -- line: [0, 0] id: 0 local r0_0 = true local function r1_0(...) -- line: [0, 0] id: 27 end require("moonloader") local r2_0 = require("samp.events") local r3_0 = require("encoding") r3_0.default = "CP1251" local r4_0 = r3_0.UTF8 local r5_0 = (function() -- line: [0, 0] id: 18 local r0_18 = {} local r1_18 = require("effil") local r2_18 = require("dkjson") local function r3_18(r0_26, r1_26, r2_26, r3_26, r4_26, r5_26) -- line: [0, 0] id: 26 local r6_26 = r0_26(r1_26, r2_26, r3_26) local r7_26 = r6_26:get(0) while not r7_26 do -- LOOP r7_26 = r6_26:get(0) wait(0) end local r8_26 = r6_26:status() if r8_26 == "completed" then local r10_26 = r7_26[2] if r7_26[1] then r4_26(r10_26) else r5_26(r10_26) end elseif err then r5_26(err) elseif r8_26 == "canceled" then r5_26(r8_26) end r6_26:cancel(0) end local function r4_18() -- line: [0, 0] id: 24 return r1_18.thread(function(r0_25, r1_25, r2_25) -- line: [0, 0] id: 25 local r3_25 = require("ssl.https") local r4_25 = require("ltn12") local r5_25 = {} local r6_25 = { url = r0_25, method = r2_25, sink = r4_25.sink.table(r5_25), } if r2_25 == "POST" then r6_25.headers = { ["Content-Type"] = "application/json", ["Content-Length"] = tostring(#r0_25), } r6_25.source = r4_25.source.string(r1_25) end local r7_25, r8_25 = pcall(r3_25.request, r6_25) if r7_25 then return { nil, table.concat(r5_25) } else return { nil, r8_25 } end end) end local function r5_18(r0_21, r1_21, r2_21, r3_21, r4_21) -- line: [0, 0] id: 21 local r5_21 = r4_18() if not r4_21 then function r4_21() -- line: [0, 0] id: 23 end end lua_thread.create(function() -- line: [0, 0] id: 22 r3_18(r5_21, r0_21, r1_21, r2_21, r3_21, r4_21) end) end function r0_18.sendPostRequest(r0_20, r1_20, r2_20, r3_20) -- line: [0, 0] id: 20 r5_18(r0_20, r4_0:encode(r2_18.encode(r1_20)), "POST", r2_20, r3_20) end function r0_18.sendGetRequest(r0_19, r1_19, r2_19) -- line: [0, 0] id: 19 r5_18(r0_19, nil, "GET", r1_19, r2_19) end return r0_18 end)() local r6_0 = { filters = {}, dialogs = {}, } local r7_0 = false local r8_0 = 0 local r9_0 = (function() -- line: [0, 0] id: 6 local r0_6 = {} local r1_6 = require("dkjson") local function r2_6(r0_17) -- line: [0, 0] id: 17 -- notice: unreachable block#3 local r1_17 = assert local r2_17 = type(r0_17) if r2_17 == "string" then r2_17 = r0_17:find("moonloader") else r2_17 = false end r1_17(r2_17, "Path must be a string and include \'moonloader\' folder") r0_17 = r0_17:gsub("[\\/][^\\/]+%.json$", "") if not doesDirectoryExist(r0_17) and not createDirectory(r0_17) then return error("Failed to create directory: " .. r0_17) end end local function r3_6(r0_16, r1_16) -- line: [0, 0] id: 16 if not doesCharExist(r0_16) then return {} end local r2_16 = {} local r3_16 = getAllVehicles() local r4_16 = { getCharCoordinates(r0_16) } for r8_16, r9_16 in ipairs(r3_16) do if doesVehicleExist(r9_16) then local r10_16 = { getCarCoordinates(r9_16) } if getDistanceBetweenCoords3d(r4_16[1], r4_16[2], r4_16[3], r10_16[1], r10_16[2], r10_16[3]) <= r1_16 then table.insert(r2_16, getCarModel(r9_16)) end end end return r2_16 end local function r4_6(r0_15) -- line: [0, 0] id: 15 if type(r0_15.blacklist) ~= "table" then r0_15.blacklist = {} end if type(r0_15.blacklist.title) ~= "table" then r0_15.blacklist.title = {} end if type(r0_15.blacklist.text) ~= "table" then r0_15.blacklist.text = {} end if type(r0_15.blacklist.type) ~= "table" then r0_15.blacklist.type = {} end if type(r0_15.render) ~= "table" then r0_15.render = {} end if type(r0_15.render.obj) ~= "table" then r0_15.render.obj = {} end if type(r0_15.timer) ~= "number" then r0_15.timer = 120 end end function r0_6.getFilters() -- line: [0, 0] id: 12 r5_0.sendGetRequest("https://arz-wiki.com/action/?action=filter_dialog", function(r0_14) -- line: [0, 0] id: 14 r0_14 = r4_0:decode(r0_14) r6_0.filters = decodeJson(r0_14) r4_6(r6_0.filters) end, function(r0_13) -- line: [0, 0] id: 13 r6_0.filters = "error" end) end function r0_6.sendDialogData(r0_9) -- line: [0, 0] id: 9 r5_0.sendPostRequest("https://arz-wiki.com/action/?action=set_filter_dialog", r0_9, function(r0_11) -- line: [0, 0] id: 11 end, function(r0_10) -- line: [0, 0] id: 10 end) end function r0_6.addDialogEntry(r0_8, r1_8, r2_8, r3_8, r4_8, r5_8) -- line: [0, 0] id: 8 if not r6_0.dialogs.server then local r6_8, r7_8 = sampGetCurrentServerAddress() r6_0.dialogs.server = { adress = r6_8 .. ":" .. r7_8, name = sampGetCurrentServerName(), } end local r6_8 = {} local r7_8 = { type = r0_8, id = r1_8, title = r2_8, content = r3_8, } local r8_8 = r5_8 if not r8_8 then r8_8 = {} end r7_8.answer = r8_8 r7_8.buttons = r4_8 r6_8.dialog = r7_8 r6_8.time = os.time() r6_8.coords = { getCharCoordinates(1) } r6_8.veh = r3_6(1, 7) table.insert(r6_0.dialogs, r6_8) end function r0_6.addObjectEntry(r0_7, r1_7) -- line: [0, 0] id: 7 if not r6_0.dialogs.server then local r2_7, r3_7 = sampGetCurrentServerAddress() r6_0.dialogs.server = { adress = r2_7 .. ":" .. r3_7, name = sampGetCurrentServerName(), } end if not r6_0.dialogs.obj then r6_0.dialogs.obj = {} end table.insert(r6_0.dialogs.obj, { r0_7, unpack(r1_7) }) end return r0_6 end)() function main() -- line: [0, 0] id: 4 -- notice: unreachable block#13 repeat -- LOOP wait(0) until isSampAvailable() while not isSampLoaded() do -- LOOP wait(0) end if r0_0 then r9_0.getFilters() lua_thread.create(function() -- line: [0, 0] id: 5 while true do -- LOOP wait(0) if r6_0.filters ~= "error" then local r0_5 = next(r6_0.filters) if r0_5 then break end else break end end if r6_0.filters ~= "error" then r7_0 = true end end) else thisScript():unload() end while true do -- LOOP wait(0) if r7_0 then local r0_4 = r8_0 if r0_4 == 0 then r0_4 = os.clock() r8_0 = r0_4 end r0_4 = os.clock() r0_4 = r0_4 - r8_0 if r6_0.filters.timer <= r0_4 then r0_4 = next(r6_0.dialogs) if r0_4 then r9_0.sendDialogData(r6_0.dialogs) end r8_0 = os.clock() r0_4 = r6_0 r0_4.dialogs = {} end end end end local r10_0 = {} function r2_0.onShowDialog(r0_3, r1_3, r2_3, r3_3, r4_3, r5_3) -- line: [0, 0] id: 3 if not r7_0 then return end for r9_3, r10_3 in ipairs(r6_0.filters.blacklist.title) do if r2_3:find(r10_3) then return end end for r9_3, r10_3 in ipairs(r6_0.filters.blacklist.text) do if r5_3:find(r10_3) then return end end for r9_3, r10_3 in ipairs(r6_0.filters.blacklist.type) do if r10_3 == tonumber(r1_3) then return end end r10_0 = { r1_3, r0_3, r2_3, r5_3, { r3_3, r4_3 }, nil, "" } end function r2_0.onSendDialogResponse(r0_2, r1_2, r2_2, r3_2) -- line: [0, 0] id: 2 if not r7_0 then return end if r10_0[2] and r0_2 == r10_0[2] then r10_0[6] = { r1_2, r2_2, r3_2 } r9_0.addDialogEntry(unpack(r10_0)) r10_0 = {} end end function r2_0.onCreateObject(r0_1, r1_1) -- line: [0, 0] id: 1 if not r7_0 then return end for r5_1, r6_1 in ipairs(r6_0.filters.render.obj) do if r1_1.modelId == r6_1 then r9_0.addObjectEntry(r1_1.modelId, { r1_1.position.x, r1_1.position.y, r1_1.position.z }) end end end
Пока никто из авторов, чьи работы были перезалиты не жаловался. Если будут жалобы - удалим тему.А то что туда перезалили чуть ли не весь бластхак без указания авторства и тип того