![Sir Meme Hub | [16 GAMES] [$14.99 LIFETIME] | FARM/AIM/ESP](https://scriptblox.com/images/sb/-1-1791044877945.webp)
Key Required VerifiedUniversal
Lua Script•550 lines (15919 chars)
-- Decompiler will be improved soon!
-- Decompiled with Konstant V2.1, a fast Luau decompiler made in Luau by plusgiant5 (https://discord.gg/wyButjTMhM)
-- Decompiled on 2025-01-24 06:36:15
-- Luau version 6, Types version 3
-- Time taken: 0.016482 seconds
return (function(arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9, arg10, arg11, arg12, arg13, arg14, arg15, arg16, arg17, arg18, arg19, arg20, arg21, arg22, arg23, arg24, arg25, arg26, arg27, arg28, arg29, arg30, arg31, arg32, arg33, arg34, arg35) -- Line 3
-- KONSTANTERROR: [0] 1. Error Block 1 start (CF ANALYSIS FAILED)
local const_number_3 = 70
-- KONSTANTERROR: [0] 1. Error Block 1 end (CF ANALYSIS FAILED)
-- KONSTANTERROR: [181] 160. Error Block 48 start (CF ANALYSIS FAILED)
-- KONSTANTERROR: [181] 160. Error Block 48 end (CF ANALYSIS FAILED)
-- KONSTANTERROR: [7] 7. Error Block 630 start (CF ANALYSIS FAILED)
-- KONSTANTWARNING: Failed to evaluate expression, replaced with nil [181.10438]
-- KONSTANTWARNING: Failed to evaluate expression, replaced with nil [181.40]
if const_number_3 <= nil then
-- KONSTANTERROR: Expression was reused, decompilation is incorrect
if const_number_3 <= nil then
-- KONSTANTWARNING: GOTO [185] #164
end
-- KONSTANTWARNING: GOTO [14] #12
end
-- KONSTANTERROR: [7] 7. Error Block 630 end (CF ANALYSIS FAILED)
end)(2, bit32.lrotate, 15, string.pack, setfenv, string, bit32.band, 14, bit32.bor, 4165, 1, {
w = bit32.band;
i = string.sub;
B = bit32.rshift;
_ = bit32.bxor;
t = bit32.bor;
f = bit32.bnot;
J = bit32.lshift;
m = table.move;
s = bit32.countlz;
E = string.match;
o = table.create;
q = bit32.countrz;
Z = bit32.rrotate;
b = bit32.lrotate;
}, getfenv, bit32.rshift, nil, bit32, coroutine, 3, string.gsub, string.char, bit32.bxor, select, bit32.bnot, 5, 6, setmetatable, 4, string.unpack, 3, 1, next, tostring, function(...) -- Line 3
...[...] = nil
end, {function() -- Line 3
return function(arg1, arg2, arg3) -- Line 3
if not arg3 then
local var10 = #arg1 + 1
arg1[var10] = arg2
else
for i_12 = #arg1, var10, -1 do
arg1[i_12 + 1] = arg1[i_12]
end
-- KONSTANTERROR: Expression was reused, decompilation is incorrect
arg1[var10] = arg2
end
end
end, function() -- Line 3
return function(arg1, arg2) -- Line 3
for _, v in arg1 do
if v == arg2 then
return true
end
end
end
end, function() -- Line 3
return function(arg1) -- Line 3
return arg1 - arg1 % 1
end
end, function(arg1) -- Line 3
local _0_upvr_3 = arg1[0]
return function(arg1_2) -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_3 (readonly)
]]
local var21_upvw = arg1_2 % 2147483647
return function(arg1_3, arg2) -- Line 3
--[[ Upvalues[2]:
[1]: var21_upvw (read and write)
[2]: _0_upvr_3 (copied, readonly)
]]
var21_upvw = (16807 * var21_upvw + 0) % 2147483647
if not arg1_3 then
return var21_upvw / 2147483647
end
if not arg2 then
if arg1_3 == 0 then
return var21_upvw
end
return _0_upvr_3(1 + var21_upvw % arg1_3)
end
return _0_upvr_3(arg1_3 + var21_upvw % (arg2 - arg1_3 + 1))
end
end
end, function(arg1) -- Line 3
local _0_upvr_21 = arg1[0]
return function(arg1_4, arg2) -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_21 (readonly)
]]
local var25 = arg2 or 1
if not arg1_4[var25] then return end
return arg1_4[var25], _0_upvr_21[1][_0_upvr_21[3]](arg1_4, var25 + 1)
end
end, function() -- Line 3
return function(arg1, arg2) -- Line 3
-- KONSTANTWARNING: Variable analysis failed. Output will have some incorrect variable assignments
local var32
if var32 == 0 then
var32 = ""
return var32
end
var32 = arg1[1]
for i_2 = 2, #arg1 do
var32 = var32..(arg2 or "")..arg1[i_2]
end
return var32
end
end, function(arg1) -- Line 3
local _0_upvr_12 = arg1[0]
local _1_upvr_10 = arg1[1]
return function(...) -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_12 (readonly)
[2]: _1_upvr_10 (readonly)
]]
local args_list = {...}
local module_3 = {}
for i_3 = 1, #args_list do
module_3[i_3] = _0_upvr_12[args_list[i_3]]
end
return _1_upvr_10(module_3)
end
end, function(arg1) -- Line 3
local _0_upvr_22 = arg1[0]
local _1_upvr_6 = arg1[1]
local _2_upvr_8 = arg1[2]
local _3_upvr_4 = arg1[3]
return function(arg1_5, arg2, arg3, arg4) -- Line 3
--[[ Upvalues[4]:
[1]: _0_upvr_22 (readonly)
[2]: _1_upvr_6 (readonly)
[3]: _2_upvr_8 (readonly)
[4]: _3_upvr_4 (readonly)
]]
-- KONSTANTWARNING: Variable analysis failed. Output will have some incorrect variable assignments
-- KONSTANTERROR: [0] 1. Error Block 32 start (CF ANALYSIS FAILED)
local var63 = arg2 or 1
local var64 = arg3 or var63
local var65
if _0_upvr_22[arg1_5] then
for i_4 = var63, var64 do
var65 = #{}
var65 = _0_upvr_22[arg1_5][i_4]
;({})[var65 + 1] = var65
local var67
end
return _1_upvr_6[1][_1_upvr_6[3]](var67)
end
local tbl_10 = {}
local tbl_4 = {}
local const_number_2 = 1
-- KONSTANTERROR: [0] 1. Error Block 32 end (CF ANALYSIS FAILED)
-- KONSTANTERROR: [64] 59. Error Block 28 start (CF ANALYSIS FAILED)
if not var65 then
tbl_10[#tbl_10 + 1] = 255
if var63 <= const_number_2 and const_number_2 <= var64 then
tbl_4[#tbl_4 + 1] = 255
end
end
-- KONSTANTERROR: [64] 59. Error Block 28 end (CF ANALYSIS FAILED)
-- KONSTANTERROR: [35] 33. Error Block 6 start (CF ANALYSIS FAILED)
-- KONSTANTERROR: [35] 33. Error Block 6 end (CF ANALYSIS FAILED)
end
end, function(arg1) -- Line 3
local _0_upvr_5 = arg1[0]
local _1_upvr_16 = arg1[1]
local _2_upvr_9 = arg1[2]
local _3_upvr_5 = arg1[3]
return function(arg1_6, arg2, arg3, arg4) -- Line 3
--[[ Upvalues[4]:
[1]: _0_upvr_5 (readonly)
[2]: _1_upvr_16 (readonly)
[3]: _2_upvr_9 (readonly)
[4]: _3_upvr_5 (readonly)
]]
-- KONSTANTWARNING: Variable analysis failed. Output will have some incorrect variable assignments
-- KONSTANTERROR: [0] 1. Error Block 35 start (CF ANALYSIS FAILED)
local var93 = arg2 or 1
local var94 = arg3
if not var94 then
var94 = #arg1_6
end
local var95 = var94
if _0_upvr_5[arg1_6] then
local tbl_8 = {}
for i_5 = var93, var95 do
tbl_8[#tbl_8 + 1] = _1_upvr_16[_0_upvr_5[arg1_6][i_5]]
local var97
end
return _2_upvr_9(var97)
end
local tbl = {}
local tbl_7 = {}
local const_number = 1
-- KONSTANTERROR: [0] 1. Error Block 35 end (CF ANALYSIS FAILED)
-- KONSTANTERROR: [67] 62. Error Block 30 start (CF ANALYSIS FAILED)
-- KONSTANTERROR: Expression was reused, decompilation is incorrect
if not _1_upvr_16[_0_upvr_5[arg1_6][i_5]] then
tbl[#tbl + 1] = 255
if var93 <= const_number and const_number <= var95 then
tbl_7[#tbl_7 + 1] = _1_upvr_16[255]
end
end
-- KONSTANTERROR: [67] 62. Error Block 30 end (CF ANALYSIS FAILED)
-- KONSTANTERROR: [36] 34. Error Block 8 start (CF ANALYSIS FAILED)
-- KONSTANTERROR: [36] 34. Error Block 8 end (CF ANALYSIS FAILED)
end
end, function(arg1) -- Line 3
local _0_upvr_20 = arg1[0]
local _1_upvr_15 = arg1[1]
return function(arg1_7, arg2) -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_20 (readonly)
[2]: _1_upvr_15 (readonly)
]]
local var105 = arg2 or ','
local module = {}
local len_2 = #var105
local len = #arg1_7
local const_number_7 = 1
local var110
while const_number_7 <= len do
if const_number_7 + len_2 - 1 <= len and _0_upvr_20(arg1_7, const_number_7, const_number_7 + len_2 - 1) == var105 then
_1_upvr_15(module, _0_upvr_20(arg1_7, var110, const_number_7 - 1))
var110 = const_number_7 + len_2
else
end
end
if var110 <= len then
_1_upvr_15(module, _0_upvr_20(arg1_7, var110, len))
end
return module
end
end, function(arg1) -- Line 3
local _0_upvr_19 = arg1[0]
local _1_upvr_11 = arg1[1]
return function(arg1_8) -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_19 (readonly)
[2]: _1_upvr_11 (readonly)
]]
local var119 = 0
for i_6, v_2 in pairs({_0_upvr_19(arg1_8, 1, #arg1_8, true)}) do
var119 += _1_upvr_11[v_2] * 16 ^ (#arg1_8 - i_6)
end
return var119
end
end, function(arg1) -- Line 3
local _0_upvr_10 = arg1[0]
local _1_upvr = arg1[1]
local _2_upvr_7 = arg1[2]
local _3_upvr = arg1[3]
local _4_upvr_3 = arg1[4]
return function(arg1_9, arg2) -- Line 3
--[[ Upvalues[5]:
[1]: _0_upvr_10 (readonly)
[2]: _1_upvr (readonly)
[3]: _2_upvr_7 (readonly)
[4]: _3_upvr (readonly)
[5]: _4_upvr_3 (readonly)
]]
arg1_9 = _0_upvr_10(arg1_9)
local var131
if not arg2 or arg2 == 10 then
return var131..""
end
local module_2 = {}
local var133 = ""
if var131 < 0 then
var133 = '-'
var131 = -var131
end
repeat
local var134 = var131 % arg2 + 1
var131 = _0_upvr_10(var131 / arg2)
_1_upvr(module_2, 1, _2_upvr_7(_3_upvr, var134, var134))
until var131 == 0
return var133.._4_upvr_3(module_2)
end
end, function(arg1) -- Line 3
local _0_upvr_18 = arg1[0]
local _1_upvr_3 = arg1[1]
return function(arg1_10) -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_18 (readonly)
[2]: _1_upvr_3 (readonly)
]]
local var141 = ""
for i_7 = 1, #arg1_10 do
local _0_upvr_18_result1 = _0_upvr_18(_1_upvr_3(arg1_10, i_7), 36)
var141 = var141..(#_0_upvr_18_result1).._0_upvr_18_result1
end
return var141
end
end, function(arg1) -- Line 3
local _0_upvr = arg1[0]
local _1_upvr_14 = arg1[1]
return function(arg1_11) -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr (readonly)
[2]: _1_upvr_14 (readonly)
]]
local const_number_4 = 1
local var148
while const_number_4 <= #arg1_11 do
var148 = var148.._1_upvr_14(tonumber(_0_upvr(arg1_11, const_number_4 + 1, const_number_4 + _0_upvr(arg1_11, const_number_4, const_number_4)), 36))
end
return var148
end
end, function(arg1) -- Line 3
local _0_upvr_17 = arg1[0]
local _1_upvr_7 = arg1[1]
local _2_upvr_5 = arg1[2]
local _3_upvr_3 = arg1[3]
local _4_upvr_2 = arg1[4]
return function() -- Line 3
--[[ Upvalues[5]:
[1]: _0_upvr_17 (readonly)
[2]: _1_upvr_7 (readonly)
[3]: _2_upvr_5 (readonly)
[4]: _3_upvr_3 (readonly)
[5]: _4_upvr_2 (readonly)
]]
_0_upvr_17(_1_upvr_7[_2_upvr_5[1][_2_upvr_5[3]]("$ENC_26622W26F22T26Y")], function(arg1_12, arg2, arg3) -- Line 3
--[[ Upvalues[2]:
[1]: _3_upvr_3 (copied, readonly)
[2]: _4_upvr_2 (copied, readonly)
]]
if arg1_12 == _3_upvr_3 and not arg3 then
_4_upvr_2()
end
end)
end
end, function(arg1) -- Line 3
local _0_upvr_23 = arg1[0]
return function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_23 (readonly)
]]
return {function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_23 (copied, readonly)
]]
return _0_upvr_23[{}]
end, function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_23 (copied, readonly)
]]
return _0_upvr_23:___()
end, function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_23 (copied, readonly)
]]
_0_upvr_23[""] = ""
end}
end
end, function(arg1) -- Line 3
local _0_upvr_15 = arg1[0]
local _1_upvr_13 = arg1[1]
local _2_upvr_4 = arg1[2]
return function() -- Line 3
--[[ Upvalues[3]:
[1]: _0_upvr_15 (readonly)
[2]: _1_upvr_13 (readonly)
[3]: _2_upvr_4 (readonly)
]]
for _, v_3 in _0_upvr_15[1][_0_upvr_15[3]] do
_1_upvr_13(_2_upvr_4, ({xpcall(v_3, function() -- Line 3
return debug.info(2, 'f')
end)})[2])
end
end
end, function(arg1) -- Line 3
local _0_upvr_14 = arg1[0]
local _1_upvr_18 = arg1[1]
local _2_upvr_3 = arg1[2]
return function() -- Line 3
--[[ Upvalues[3]:
[1]: _0_upvr_14 (readonly)
[2]: _1_upvr_18 (readonly)
[3]: _2_upvr_3 (readonly)
]]
_0_upvr_14[1][_0_upvr_14[3]] = _1_upvr_18:Invoke(_2_upvr_3)
end
end, function(arg1) -- Line 3
local _0_upvr_13 = arg1[0]
local _1_upvr_17 = arg1[1]
local _2_upvr_6 = arg1[2]
return function() -- Line 3
--[[ Upvalues[3]:
[1]: _0_upvr_13 (readonly)
[2]: _1_upvr_17 (readonly)
[3]: _2_upvr_6 (readonly)
]]
xpcall(function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_13 (copied, readonly)
]]
return _0_upvr_13[{}]
end, function() -- Line 3
--[[ Upvalues[2]:
[1]: _1_upvr_17 (copied, readonly)
[2]: _2_upvr_6 (copied, readonly)
]]
if pcall(getfenv, _1_upvr_17) then
_2_upvr_6[1][_2_upvr_6[3]] = true
end
end)
end
end, function(arg1) -- Line 3
local _0_upvr_2 = arg1[0]
return function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_2 (readonly)
]]
return ({xpcall(_0_upvr_2, function() -- Line 3
return debug.info(2, 'f')
end)})[2]
end
end, function(arg1) -- Line 3
local _0_upvr_11 = arg1[0]
local _1_upvr_8 = arg1[1]
local _2_upvr_2 = arg1[2]
return function() -- Line 3
--[[ Upvalues[3]:
[1]: _0_upvr_11 (readonly)
[2]: _1_upvr_8 (readonly)
[3]: _2_upvr_2 (readonly)
]]
xpcall(function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_11 (copied, readonly)
]]
return getfenv()[_0_upvr_11[1][_0_upvr_11[3]]("$ENC_27023F26W233")]:SendMessage("sam i am, green eggs and ham.")
end, function() -- Line 3
--[[ Upvalues[2]:
[1]: _1_upvr_8 (copied, readonly)
[2]: _2_upvr_2 (copied, readonly)
]]
if pcall(getfenv, _1_upvr_8) then
_2_upvr_2[1][_2_upvr_2[3]] = true
end
end)
end
end, function(arg1) -- Line 3
local _0_upvr_4 = arg1[0]
return function() -- Line 3
--[[ Upvalues[1]:
[1]: _0_upvr_4 (readonly)
]]
_0_upvr_4:getmemoryUsageMbForTag(Enum.DeveloperMemoryTag.LuaHeap)
end
end, function(arg1) -- Line 3
local _0_upvr_9 = arg1[0]
local _1_upvr_12 = arg1[1]
return function() -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_9 (readonly)
[2]: _1_upvr_12 (readonly)
]]
_0_upvr_9:FireServer(_1_upvr_12)
end
end, function(arg1) -- Line 3
local _0_upvr_8 = arg1[0]
local _1_upvr_5 = arg1[1]
return function() -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_8 (readonly)
[2]: _1_upvr_5 (readonly)
]]
for i_9 = 9, 25 do
if not pcall(getfenv, i_9) then
_0_upvr_8[1][_0_upvr_8[3]] = i_9
return
end
local func = debug.info(i_9 + 1, 'f')
if type(func) == "function" then
_1_upvr_5(func)
end
end
end
end, function(arg1) -- Line 3
local _0_upvr_7 = arg1[0]
local _1_upvr_2 = arg1[1]
return function() -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_7 (readonly)
[2]: _1_upvr_2 (readonly)
]]
for i_10 = 2, 15 do
local pcall_result1, pcall_result2_2 = pcall(getfenv, i_10)
if pcall_result1 and pcall_result2_2.hookfunction then
_0_upvr_7[1][_0_upvr_7[3]] = true
return
end
if i_10 % 5 == 0 then
_1_upvr_2()
end
end
end
end, function(arg1) -- Line 3
local _0_upvr_16 = arg1[0]
local _1_upvr_9 = arg1[1]
return function() -- Line 3
--[[ Upvalues[2]:
[1]: _0_upvr_16 (readonly)
[2]: _1_upvr_9 (readonly)
]]
for i_11 = 2, 15 do
local pcall_result1_2, pcall_result2 = pcall(getfenv, i_11)
if pcall_result1_2 and pcall_result2.hookfunction then
_0_upvr_16[1][_0_upvr_16[3]] = true
return
end
if i_11 % 5 == 0 then
_1_upvr_9()
end
end
end
end, function(arg1) -- Line 3
local _0_upvr_6 = arg1[0]
local _1_upvr_4 = arg1[1]
local _2_upvr = arg1[2]
local _3_upvr_2 = arg1[3]
local _4_upvr = arg1[4]
return function() -- Line 3
--[[ Upvalues[5]:
[1]: _0_upvr_6 (readonly)
[2]: _1_upvr_4 (readonly)
[3]: _2_upvr (readonly)
[4]: _3_upvr_2 (readonly)
[5]: _4_upvr (readonly)
]]
local var227_result1 = _0_upvr_6({getfenv()[_1_upvr_4[1][_1_upvr_4[3]]("$ENC_26T23J26A23E26Y2501324L")](), _2_upvr(getfenv()[_1_upvr_4[1][_1_upvr_4[3]]("$ENC_27023F26W233")], _1_upvr_4[1][_1_upvr_4[3]]("$ENC_26023926F23325R24U1I"))}, {
[_1_upvr_4[1][_1_upvr_4[3]]("$ENC_25G21X26W22T26K25A")] = _1_upvr_4[1][_1_upvr_4[3]]("$ENC_26O230");
})
repeat
until not _3_upvr_2() and not var227_result1[1]
if not var227_result1[1] and var227_result1[2] then
_4_upvr[1][_4_upvr[3]] = true
end
end
end}, {28338, 3201080028, 1817441295, 1690759789, 3228668456, 2979517230, 2427030534, 31392141, 1230513798})(...)Features & Information
erlc anticheat decompile dump
Community Comments (6)
More Scripts for [🗺️] Emergency Response: Liberty County
KeylessUniversal
Key Required VerifiedUniversal
Keyless
done with awp bad decompiler rip Ima upload bypass soon
ok
Im currently getting the const and where it sets stuff so give me like a hour or two
got their runtime env in the nilinstances ez
hey whats your discord bro
does it work?