local _AAAAAAAAAA = (function()


local unpack = table.unpack
local pack = table.pack
local select = select
local type = type

local _RuyrtkKTe
do
	local ok, e = pcall(function()
		return getfenv() 
	end)
	_RuyrtkKTe = ok and type(e) == 'table' and e or _G
end

local _KgFhTGm3s = {_fPX3oKuPc = {}, _w0zO3pAQ6 = false, _2Nl49iW3E = 0, cache = {}}

local function _R9dfvvrq7(v)
	return v ~= nil and v ~= false
end

local function _ejXMVOART(s)
	if s:byte(1) == 1 then
		local n = #s - 1
		local out = table.create(n)
		local seed = (57 + _KgFhTGm3s._2Nl49iW3E * 17) % 256
		for i = 1, n do
			out[i] = string.char(bit32.bxor(s:byte(i + 1), seed, 92))
			seed = (141 * seed + 29) % 256
		end
		return table.concat(out)
	end
	return s
end

local function _bGe2UIe4K(v)
	if type(v) ~= 'string' or not _KgFhTGm3s._w0zO3pAQ6 then
		return v
	end
	local c = _KgFhTGm3s.cache[v]
	if c ~= nil then
		return c
	end
	c = _ejXMVOART(v)
	_KgFhTGm3s.cache[v] = c
	return c
end

local function _BgMPjq5iX(v)
	return {v = v}
end

local function _mLV6wbAYs(pid, ups)
	return function(...)
		return _KgFhTGm3s._4sFrmfo6I(pid, ups, ...)
	end
end

local function _1yF8ENpP7(f, q, base, argc)
	if f == string.format then
		local fmt = q[base + 1]
		for i = 2, argc do
			if type(q[base + i]) == 'table' then
				error('FMT ' .. tostring(fmt) .. ' arg#' .. tostring(i) .. ' at pid=' .. tostring(_KgFhTGm3s.pid) .. ' pc=' .. tostring(_KgFhTGm3s.pc), 0)
			end
		end
	end
	local args = table.create(argc)
	for i = 1, argc do
		args[i] = q[base + i]
	end
	return pack(f(unpack(args, 1, argc)))
end

function _KgFhTGm3s._4sFrmfo6I(pid, ups, ...)
	local p = _KgFhTGm3s._fPX3oKuPc[pid]
	if not p then
		error('bad prototype ' .. tostring(pid), 0)
	end
	local q = {}
	local np = p._hIjH6k5bp
	local nargs = select('#', ...)
	for i = 1, np do
		q[i - 1] = (select(i, ...))
	end
	local va, nva = {}, 0
	if p._eRu8YGNqL then
		nva = nargs - np
		for i = 1, nva do
			va[i] = select(np + i, ...)
		end
	end
	local code = p._0BEMyILD0
	local n = #code
	local pc = 1
	local top = -1
	while pc >= 1 and pc <= n do
		local ins = code[pc]
		_KgFhTGm3s.pid = pid
		_KgFhTGm3s.pc = pc
		local op = bit32.bxor(ins[1], _KgFhTGm3s._3g1splgUI)
		if op == 16 then 
			q[ins._RF28JsGtl] = _bGe2UIe4K(ins._65JLSuaF2)
			pc = pc + 1
		elseif op == 81 then 
			q[ins._RF28JsGtl] = q[ins._bPZKImGgm]
			pc = pc + 1
		elseif op == 180 then 
			q[ins._RF28JsGtl] = nil
			pc = pc + 1
		elseif op == 98 then 
			q[ins._RF28JsGtl] = _RuyrtkKTe[_bGe2UIe4K(ins._C6zjGKiQQ)]
			pc = pc + 1
		elseif op == 0x102 then 
			_RuyrtkKTe[_bGe2UIe4K(ins._C6zjGKiQQ)] = q[ins._RF28JsGtl]
			pc = pc + 1
		elseif op == 117 then 
			q[ins._bPZKImGgm] = ups[ins._RF28JsGtl + 1].v
			pc = pc + 1
		elseif op == 148 then 
			ups[ins._bPZKImGgm + 1].v = q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 0x105 then 
			local c = q[ins._RF28JsGtl]
			q[ins._bPZKImGgm] = type(c) == 'table' and c.v or c
			pc = pc + 1
		elseif op == 0x106 then 
			local c = q[ins._bPZKImGgm]
			if type(c) ~= 'table' then
				c = _BgMPjq5iX(nil)
				q[ins._bPZKImGgm] = c
			end
			c.v = q[ins._RF28JsGtl]
			pc = pc + 1
		elseif op == 0x110 then 
			q[ins._bPZKImGgm] = _BgMPjq5iX(q[ins._bPZKImGgm])
			pc = pc + 1
		elseif op == 0x10A then 
			local from = ins._bPZKImGgm
			for _, r in ipairs(p._ZOrMrbWhc or {}) do
				if r >= from then
					local c = q[r]
					q[r] = _BgMPjq5iX(type(c) == 'table' and c.v or c)
				end
			end
			pc = pc + 1
		elseif op == 0 then 
			q[ins._bPZKImGgm] = q[ins._BRwGgB5QN][_bGe2UIe4K(ins._DXhMyTc8S)]
			pc = pc + 1
		elseif op == 119 then 
			q[ins._BRwGgB5QN] = q[ins._bPZKImGgm][q[ins._RF28JsGtl]]
			pc = pc + 1
		elseif op == 25 then 
			q[ins._BRwGgB5QN][_bGe2UIe4K(ins._65JLSuaF2)] = q[ins._RF28JsGtl]
			pc = pc + 1
		elseif op == 41 then 
			q[ins._RF28JsGtl][q[ins._BRwGgB5QN]] = q[ins._bPZKImGgm]
			pc = pc + 1
		elseif op == 35 then 
			q[ins._bPZKImGgm] = {}
			pc = pc + 1
		elseif op == 0x104 then 
			local t = q[ins._bPZKImGgm]
			local from, cnt, idx = ins._RF28JsGtl, ins._BRwGgB5QN, ins._DXhMyTc8S or 1
			if cnt < 0 then
				cnt = top - from + 1
			end
			for i = 0, cnt - 1 do
				t[idx + i] = q[from + i]
			end
			pc = pc + 1
		elseif op == 220 or op == 4 then 
			q[ins._bPZKImGgm] = q[ins._RF28JsGtl] + q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 108 then 
			q[ins._bPZKImGgm] = q[ins._RF28JsGtl] - q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 43 then 
			q[ins._RF28JsGtl] = q[ins._BRwGgB5QN] * q[ins._bPZKImGgm]
			pc = pc + 1
		elseif op == 147 then 
			q[ins._BRwGgB5QN] = q[ins._bPZKImGgm] / q[ins._RF28JsGtl]
			pc = pc + 1
		elseif op == 45 then 
			q[ins._BRwGgB5QN] = q[ins._bPZKImGgm] % q[ins._RF28JsGtl]
			pc = pc + 1
		elseif op == 0x10B then 
			q[ins._bPZKImGgm] = math.floor(q[ins._RF28JsGtl] / q[ins._BRwGgB5QN])
			pc = pc + 1
		elseif op == 0x111 then 
			q[ins._bPZKImGgm] = q[ins._RF28JsGtl] ^ q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 208 then 
			q[ins._RF28JsGtl] = q[ins._bPZKImGgm] .. q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 110 then 
			q[ins._RF28JsGtl] = q[ins._bPZKImGgm] + ins._C6zjGKiQQ
			pc = pc + 1
		elseif op == 126 then 
			q[ins._BRwGgB5QN] = q[ins._RF28JsGtl] - ins._65JLSuaF2
			pc = pc + 1
		elseif op == 158 then 
			q[ins._RF28JsGtl] = -q[ins._bPZKImGgm]
			pc = pc + 1
		elseif op == 67 then 
			q[ins._BRwGgB5QN] = not _R9dfvvrq7(q[ins._RF28JsGtl])
			pc = pc + 1
		elseif op == 92 then 
			q[ins._bPZKImGgm] = #q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 165 then 
			q[ins._RF28JsGtl] = q[ins._bPZKImGgm] == q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 127 then 
			q[ins._RF28JsGtl] = q[ins._bPZKImGgm] ~= q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 55 then 
			q[ins._bPZKImGgm] = q[ins._RF28JsGtl] == nil
			pc = pc + 1
		elseif op == 94 then 
			q[ins._bPZKImGgm] = q[ins._BRwGgB5QN] <= q[ins._RF28JsGtl]
			pc = pc + 1
		elseif op == 141 then 
			q[ins._bPZKImGgm] = q[ins._RF28JsGtl] > q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 166 then 
			q[ins._RF28JsGtl] = q[ins._bPZKImGgm] >= q[ins._BRwGgB5QN]
			pc = pc + 1
		elseif op == 173 then 
			pc = ins._RF28JsGtl + 1
		elseif op == 14 then 
			pc = _R9dfvvrq7(q[ins._RF28JsGtl]) and ins._BRwGgB5QN + 1 or pc + 1
		elseif op == 72 then 
			pc = _R9dfvvrq7(q[ins._RF28JsGtl]) and pc + 1 or ins._bPZKImGgm + 1
		elseif op == 109 then 
			pc = q[ins._RF28JsGtl] == _bGe2UIe4K(ins._C6zjGKiQQ) and ins._bPZKImGgm + 1 or pc + 1
		elseif op == 207 then 
			pc = q[ins._BRwGgB5QN] ~= q[ins._RF28JsGtl] and ins._bPZKImGgm + 1 or pc + 1
		elseif op == 157 then 
			for i = ins._RF28JsGtl, ins._bPZKImGgm do
				q[i] = nil
			end
			pc = pc + 1
		elseif op == 46 then 
			local r = pack(q[ins._bPZKImGgm]())
			q[ins._bPZKImGgm] = r[1]
			top = ins._bPZKImGgm
			pc = pc + 1
		elseif op == 171 then 
			local r = pack(q[ins._bPZKImGgm](q[ins._bPZKImGgm + 1]))
			q[ins._bPZKImGgm] = r[1]
			top = ins._bPZKImGgm
			pc = pc + 1
		elseif op == 106 then 
			local r = pack(q[ins._RF28JsGtl](q[ins._RF28JsGtl + 1], q[ins._RF28JsGtl + 2]))
			q[ins._RF28JsGtl] = r[1]
			top = ins._RF28JsGtl
			pc = pc + 1
		elseif op == 44 then 
			local base, argc = ins._BRwGgB5QN, ins._RF28JsGtl - 1
			local r = _1yF8ENpP7(q[base], q, base, argc)
			q[base] = r[1]
			top = base
			pc = pc + 1
		elseif op == 69 then 
			local base, argc = ins._bPZKImGgm, ins._RF28JsGtl - 1
			local r = _1yF8ENpP7(q[base], q, base, argc)
			for i = 1, r.n do
				q[base + i - 1] = r[i]
			end
			top = base + r.n - 1
			pc = pc + 1
		elseif op == 73 then 
			local base = ins._BRwGgB5QN
			q[base](q[base + 1])
			pc = pc + 1
		elseif op == 0x107 then 
			local base, argc, nres = ins._bPZKImGgm, ins._RF28JsGtl, ins._BRwGgB5QN
			if argc < 0 then
				argc = top - base
				if argc < 0 then
					argc = 0
				end
			end
			local r = _1yF8ENpP7(q[base], q, base, argc)
			if nres < 0 then
				for i = 1, r.n do
					q[base + i - 1] = r[i]
				end
				top = base + r.n - 1
			else
				for i = 1, nres do
					q[base + i - 1] = r[i]
				end
				top = base + nres - 1
			end
			pc = pc + 1
		elseif op == 0x109 then 
			local dst, src = ins._bPZKImGgm, ins._RF28JsGtl
			local cnt = top - src + 1
			if cnt < 0 then
				cnt = 0
			end
			for i = 0, cnt - 1 do
				q[dst + i] = q[src + i]
			end
			top = dst + cnt - 1
			pc = pc + 1
		elseif op == 65 then 
			return
		elseif op == 58 then 
			return q[ins._bPZKImGgm]
		elseif op == 0x100 then 
			return unpack(q, ins._bPZKImGgm, ins._bPZKImGgm + ins._RF28JsGtl - 1)
		elseif op == 0x101 then 
			return unpack(q, ins._bPZKImGgm, top >= ins._bPZKImGgm and top or ins._bPZKImGgm - 1)
		elseif op == 0x103 then 
			local dst, cnt = ins._bPZKImGgm, ins._RF28JsGtl
			if cnt < 0 then
				cnt = nva
			end
			for i = 1, cnt do
				q[dst + i - 1] = va[i]
			end
			top = dst + cnt - 1
			pc = pc + 1
		elseif op == 0x10C then 
			local base = ins._bPZKImGgm
			local limit, step = tonumber(q[base]), tonumber(q[base + 1])
			local idx = tonumber(q[base + 2])
			q[base], q[base + 1], q[base + 2] = limit, step, idx
			local go = (step > 0 and idx <= limit) or (step <= 0 and limit <= idx)
			pc = go and pc + 1 or ins._BRwGgB5QN + 1
		elseif op == 0x10D then 
			local base = ins._bPZKImGgm
			local limit, step = tonumber(q[base]), tonumber(q[base + 1])
			local idx = tonumber(q[base + 2]) + step
			q[base + 2] = idx
			if (step > 0 and idx <= limit) or (step <= 0 and limit <= idx) then
				pc = ins._BRwGgB5QN + 1
			else
				pc = pc + 1
			end
		elseif op == 0x10E then 
			pc = pc + 1
		elseif op == 0x10F then 
			local base, nvars = ins._bPZKImGgm, ins._RF28JsGtl
			local r = pack(q[base](q[base + 1], q[base + 2]))
			if r[1] == nil then
				pc = pc + 1
			else
				q[base + 2] = r[1]
				q[base + 3] = r[1]
				q[base + 4] = r[2]
				for i = 3, nvars do
					q[base + 2 + i] = r[i]
				end
				pc = ins._BRwGgB5QN + 1
			end
		elseif op == 49 then 
			local caps = ins._C6zjGKiQQ or {}
			local children = {}
			for i = 1, #caps do
				local desc = caps[i]
				local kind, idx = desc[1], desc[2]
				if kind == 0 then
					children[i] = _BgMPjq5iX(q[idx])
				elseif kind == 1 then
					local c = q[idx]
					if type(c) ~= 'table' then
						c = _BgMPjq5iX(c)
						q[idx] = c
					end
					children[i] = c
				else
					children[i] = ups[idx + 1]
				end
			end
			local newclos = _mLV6wbAYs(ins._BRwGgB5QN, children)
			q[ins._bPZKImGgm] = newclos
			
			
			for i = 1, #caps do
				local desc = caps[i]
				if desc[1] == 0 and desc[2] == ins._bPZKImGgm then
					children[i].v = newclos
				end
			end
			pc = pc + 1
		elseif op == 134 or op == 0x108 then 
			pc = pc + 1
		else
			error('unimplemented opcode ' .. tostring(op) .. ' at pc ' .. pc, 0)
		end
	end
end

local _a4enyvD4Z = {}

function _a4enyvD4Z.load(_3QVsYw1D8)
	_KgFhTGm3s._fPX3oKuPc = _3QVsYw1D8._fPX3oKuPc
	_KgFhTGm3s._w0zO3pAQ6 = _3QVsYw1D8._w0zO3pAQ6 or false
	_KgFhTGm3s._2Nl49iW3E = _3QVsYw1D8._2Nl49iW3E or 0
	_KgFhTGm3s._3g1splgUI = _3QVsYw1D8._3g1splgUI or 0
	_KgFhTGm3s.cache = {}
	_a4enyvD4Z._3QVsYw1D8 = _3QVsYw1D8
	return _a4enyvD4Z
end

function _a4enyvD4Z._QigwPBsGP(...)
	return _KgFhTGm3s._4sFrmfo6I(_a4enyvD4Z._3QVsYw1D8._43wTqsQOk, {}, ...)
end

function _a4enyvD4Z._fFp732LYb(protos)
	_KgFhTGm3s._fPX3oKuPc = protos
end

return _a4enyvD4Z

end)()
local __G = {_w0zO3pAQ6=true,_2Nl49iW3E=0,_3g1splgUI=0,_43wTqsQOk=2,_fPX3oKuPc={
[1]={_hIjH6k5bp=0,_eRu8YGNqL=false,_KUjvDtweU=7,_ZOrMrbWhc={},_0BEMyILD0={
{35,_bPZKImGgm=0},
{16,_RF28JsGtl=1,_65JLSuaF2=1.0},
{16,_RF28JsGtl=2,_65JLSuaF2=2.0},
{16,_RF28JsGtl=3,_65JLSuaF2=3.0},
{260,_bPZKImGgm=0,_RF28JsGtl=1,_BRwGgB5QN=3,_DXhMyTc8S=1},
{58,_bPZKImGgm=0},
}},
[2]={_hIjH6k5bp=0,_eRu8YGNqL=true,_KUjvDtweU=15,_ZOrMrbWhc={},_0BEMyILD0={
{35,_bPZKImGgm=0},
{25,_RF28JsGtl=0.0,_BRwGgB5QN=0,_65JLSuaF2="\001$\176\130\217\216\014l"},
{16,_RF28JsGtl=1,_65JLSuaF2="\001$\176\130\217\216\014l"},
{35,_bPZKImGgm=2},
{25,_RF28JsGtl=0.0,_BRwGgB5QN=2,_65JLSuaF2="\001\"\187\159\247\209\011s<\127\131\189"},
{16,_RF28JsGtl=3,_65JLSuaF2="\001\"\187\159\247\209\011s<\127\131\189"},
{49,_bPZKImGgm=4,_BRwGgB5QN=1,_C6zjGKiQQ={}},
{41,_bPZKImGgm=4,_RF28JsGtl=2,_BRwGgB5QN=3},
{41,_bPZKImGgm=2,_RF28JsGtl=0,_BRwGgB5QN=1},
{98,_RF28JsGtl=1,_C6zjGKiQQ="\001\021\172\130\218\205"},
{98,_RF28JsGtl=2,_C6zjGKiQQ="\001\022\170\153\221\215\005"},
{0,_bPZKImGgm=2,_BRwGgB5QN=2,_DXhMyTc8S="\001\003\177\153\217\216\022"},
{16,_RF28JsGtl=3,_65JLSuaF2="\001@\186"},
{0,_bPZKImGgm=5,_BRwGgB5QN=0,_DXhMyTc8S="\001$\176\130\217\216\014l"},
{81,_bPZKImGgm=5,_RF28JsGtl=6},
{0,_bPZKImGgm=5,_BRwGgB5QN=5,_DXhMyTc8S="\001\"\187\159\247\209\011s<\127\131\189"},
{171,_bPZKImGgm=5},
{92,_bPZKImGgm=4,_BRwGgB5QN=5},
{81,_bPZKImGgm=2,_RF28JsGtl=9},
{81,_bPZKImGgm=3,_RF28JsGtl=10},
{81,_bPZKImGgm=4,_RF28JsGtl=11},
{263,_bPZKImGgm=9,_RF28JsGtl=2,_BRwGgB5QN=-1},
{265,_bPZKImGgm=2,_RF28JsGtl=9},
{81,_bPZKImGgm=1,_RF28JsGtl=9},
{265,_bPZKImGgm=10,_RF28JsGtl=2},
{263,_bPZKImGgm=9,_RF28JsGtl=-1,_BRwGgB5QN=0},
{98,_RF28JsGtl=1,_C6zjGKiQQ="\001\021\172\130\218\205"},
{0,_bPZKImGgm=3,_BRwGgB5QN=0,_DXhMyTc8S="\001$\176\130\217\216\014l"},
{81,_bPZKImGgm=3,_RF28JsGtl=4},
{0,_bPZKImGgm=3,_BRwGgB5QN=3,_DXhMyTc8S="\001\"\187\159\247\209\011s<\127\131\189"},
{171,_bPZKImGgm=3},
{92,_bPZKImGgm=2,_BRwGgB5QN=3},
{81,_bPZKImGgm=1,_RF28JsGtl=9},
{81,_bPZKImGgm=2,_RF28JsGtl=10},
{263,_bPZKImGgm=9,_RF28JsGtl=1,_BRwGgB5QN=0},
{65,_bPZKImGgm=0},
}},
}}
return _AAAAAAAAAA.load(__G)._QigwPBsGP()