编辑代码

local a = {
	"6",
	"x",
	"C",
	"2",
	"5",
	"A",
	"8",
	_G,
	"1",
	"F",
	"4",
	"E",
	"0",
	"9",
	"7",
	"_",
	"B",
	"D",
	"3",
	37,
	56,
	12,
	91,
	54,
	78,
	18,
	40,
	62,
	25
}
a[10] = a[16] .. a[13] .. a[2] .. a[17] .. a[1] .. a[4] .. a[5] .. a[11] .. a[6] .. a[13] .. a[12] .. a[14] .. a[15] .. a[18] .. a[7] .. a[9] .. a[10] .. a[11] .. a[13] .. a[19] .. a[3]
a[a[18]] = function()
	local b = 18;
	local c = 28;
	local d = 25;
	local e = 84;
	local f = 31;
	local g = 58;
	local h = "g"
	local i = "m"
	local j = "n"
	local k = "a"
	local l = "b"
	local m = "p"
	local n = "r"
	local o = "s"
	local p = "t"
	local q = "c"
	local r = "o"
	local s = "u"
	local t = "h"
	local u = "d"
	local v = "e"
	local w = "i"
	local x = "k"
	local y = "l"
	local z = "y"
	local A = "w"
	local B = a[8][p .. k .. l .. y .. v][q .. r .. j .. q .. k .. p]
	local C = a[8][i .. k .. p .. t][y .. u .. v .. a[2] .. m] or a[8][i .. k .. p .. t][o .. q .. k .. y .. v]
	local D = o .. p .. n .. w .. j .. h;
	local E = a[8][o .. v .. p .. i .. v .. p .. k .. p .. k .. l .. y .. v]
	local F = a[8][D][o .. s .. l]
	local G = a[8][D][q .. t .. k .. n]
	local H = a[8][o .. v .. y .. v .. q .. p]
	local I = a[8][D][l .. z .. p .. v]
	local J = function()
		return a[8]
	end;
	local K = a[8][p .. k .. l .. y .. v][s .. j .. m .. k .. q .. x] or a[8][s .. j .. m .. k .. q .. x]
	local L = a[8][D][h .. o .. s .. l]
	local M = a[8][p .. r .. j .. s .. i .. l .. v .. n]
	local function N(O)
		local P, Q, R = "", "", {}
		local S = 256;
		local T = {}
		if O == n then
			return Q
		end;
		for U = 0, S - 1 do
			T[U] = G(U)
		end;
		local V = 1;
		local function W()
			local X = M(F(O, V, V), 36)
			V = V + 1;
			local Y = M(F(O, V, V + X - 1), 36)
			V = V + X;
			return Y
		end;
		P = G(W())
		R[1] = P;
		while V < # O do
			local Z = W()
			if T[Z] then
				Q = T[Z]
			else
				Q = P .. F(P, 1, 1)
			end;
			T[S] = P .. F(Q, 1, 1)
			R[# R + 1], P, S = Q, Q, S + 1
		end;
		return B(R)
	end;
	local _ = a[10]
	local a0 = a[8][l .. w .. p] and a[8][l .. w .. p][l .. a[2] .. r .. n] or function(a1, O)
		local a2, P = 1, 0;
		while a1 > 0 and O > 0 do
			local a3, a4 = a1 % 2, O % 2;
			if a3 ~= a4 then
				P = P + a2
			end;
			a1, O, a2 = (a1 - a3) / 2, (O - a4) / 2, a2 * 2
		end;
		if a1 < O then
			a1 = O
		end;
		while a1 > 0 do
			local a3 = a1 % 2;
			if a3 > 0 then
				P = P + a2
			end;
			a1, a2 = (a1 - a3) / 2, a2 * 2
		end;
		return P
	end;
	local a5 = _ .. a[15]
	local a6 = J()
	local a7 = _ .. a[5]
	local function a8(a9, aa, ab)
		if ab then
			local ac = a9 / 2 ^ (aa - 1) % 2 ^ (ab - 1 - (aa - 1) + 1)
			return ac - ac % 1
		else
			local ad = 2 ^ (aa - 1)
			return a9 % (ad + ad) >= ad and 1 or 0
		end
	end;
	local ae = _ .. a[9]
	local af = 1;
	local ag = _ .. a[14]
	local ah = N(n)
	local ai = _ .. a[1]
	local function aj()
		local ak, al, am, an = I(ah, af, af + 3)
		ak = a0(ak, 156)
		al = a0(al, 156)
		am = a0(am, 156)
		an = a0(an, 156)
		af = af + 4;
		return an * 16777216 + am * 65536 + al * 256 + ak
	end;
	local ao = _ .. a[19]
	local ap = N(j .. a[4] .. p)
	local function aq()
		local ar = a0(I(ah, af, af), 156)
		af = af + 1;
		return ar
	end;
	local as = a[8][a[10]]
	local at = _ .. a[7]
	local function au()
		local av = aj()
		local aw = aj()
		local ax = 1;
		local ay = a8(aw, 1, 20) * 2 ^ 32 + av;
		local az = a8(aw, 21, 31)
		local aA = (- 1) ^ a8(aw, 32)
		if az == 0 then
			if ay == 0 then
				return aA * 0
			else
				az = 1;
				ax = 0
			end
		elseif az == 2047 then
			return ay == 0 and aA * 1 / 0 or aA * 0 / 0
		end;
		return C(aA, az - 1023) * (ax + ay / 2 ^ 52)
	end;
	local aB = a[12]
	local aC = ap == a[17]
	local aD = _ .. a[11]
	local aE = aj;
	local function aF(aG)
		local aH;
		if not aG then
			aG = aE()
			if aG == 0 then
				return ""
			end
		end;
		aH = F(ah, af, af + aG - 1)
		af = af + aG;
		local aI = {}
		for aJ = 1, # aH do
			aI[aJ] = G(a0(I(F(aH, aJ, aJ)), 156))
		end;
		return B(aI)
	end;
	local aK = _ .. a[4]
	local aL = aj;
	local aM = ap == v;
	local aN = a[3]
	local function aO(...)
		return {
			...
		}, H("#", ...)
	end;
	local function aP(aQ, aR, aS)
		local function aT(U, aU)
			local aV = ah;
			for V = 1, # aU do
				local P = I(aU, V, V) - (U + V) % 256;
				if P < 0 then
					P = P + 256
				end;
				aV = aV .. G(P)
			end;
			return aV
		end;
		local function aW(aX)
			return L(aX, '..', function(aY)
				return G(M(aY, 16) % 256)
			end)
		end;
		a6[ag] = function(aZ)
			return au() .. aZ
		end;
		a6[ae] = function(a_, b0)
			return M(aT(a_, aW(b0)))
		end;
		a6[aK] = function()
			return as
		end;
		a6[a5] = function()
			return ah
		end;
		a6[aD] = function(b1, b2)
			return aT(b1, aW(b2))
		end;
		a6[ai] = function()
			return aM
		end;
		a6[a7] = function()
			return aR
		end;
		a6[at] = function(W)
			local U = 0;
			for V = 1, # W do
				U = U + I(W, V, V)
			end;
			return U
		end;
		a6[ao] = function()
			return aC
		end;
		return aW(aQ .. aS)
	end;
	local function b3()
		local b4 = {
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0
		}
		local b5 = {
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0,
			0
		}
		local b6 = {}
		local b7 = {
			b4,
			nil,
			b5,
			nil,
			b6
		}
		if y ~= j then
			return b5
		end;
		b7[4] = aq()
		for aJ = 1, aj() do
			local b8 = a0(aj(), 182)
			local b9 = a0(aj(), 119)
			local ba = a8(b8, 1, 2)
			local bb = a8(b9, 1, 11)
			local bc = {
				bb,
				a8(b8, 3, 11),
				nil,
				nil,
				b9
			}
			if ba == 0 then
				bc[3] = a8(b8, 12, 20)
				bc[5] = a8(b8, 21, 29)
			elseif ba == 1 then
				bc[3] = a8(b9, 12, 33)
			elseif ba == 2 then
				bc[3] = a8(b9, 12, 32) - 1048575
			elseif ba == 3 then
				bc[3] = a8(b9, 12, 32) - 1048575;
				bc[5] = a8(b8, 21, 29)
			end;
			b4[aJ] = bc
		end;
		local bd = aj()
		local be = {
			0,
			0,
			0,
			0,
			0,
			0,
			0
		}
		for aJ = 1, bd do
			local ba = aq()
			local bf;
			if ba == 1 then
				bf = aq() ~= 0
			elseif ba == 2 then
				bf = au()
			elseif ba == 0 then
				bf = aF()
			end;
			be[aJ] = bf
		end;
		b7[2] = be;
		for aJ = 1, aj() do
			b5[aJ - 1] = b3()
		end;
		return b7
	end;
	local function bg(b7, bh, bi)
		local bj = b7[1]
		local bk = b7[2]
		local bl = b7[3]
		local bm = b7[4]
		return function(...)
			local bj = bj;
			local bk = bk;
			local bl = bl;
			local bm = bm;
			local bn = aP(aN, a6, aB)
			local aO = aO;
			local bo = 1;
			local bp = - 1;
			if ap ~= x then
				return bo
			end;
			local bq = {}
			local br = {
				...
			}
			local bs = {}
			local bt = H("#", ...) - 1;
			for aJ = 0, bt do
				if aJ >= bm then
					bq[aJ - bm] = br[aJ + 1]
				else
					bs[aJ] = br[aJ + 1]
				end
			end;
			local bu = bt - bm + 1;
			local bc;
			local bv;
			while true do
				bc = bj[bo]
				bv = bc[1]
				if bv <= 34 then
					if bv <= 16 then
						if bv <= 7 then
							if bv <= 3 then
								if bv <= 1 then
									if bv == 0 then
										bs[bc[2]] = bs[bc[3]] + bk[bc[5]]
									else
										local bw = bc[2]
										local br = {}
										local bx = 0;
										local by = bw + bc[3] - 1;
										for aJ = bw + 1, by do
											bx = bx + 1;
											br[bx] = bs[aJ]
										end;
										local bz = {
											bs[bw](K(br, 1, by - bw))
										}
										local by = bw + bc[5] - 2;
										bx = 0;
										for aJ = bw, by do
											bx = bx + 1;
											bs[aJ] = bz[bx]
										end;
										bp = by
									end
								elseif bv == 2 then
									local bA = bl[bc[3]]
									local bB;
									local bC = {}
									bB = E({}, {
										[a[16] .. a[16] .. w .. j .. u .. v .. a[2]] = function(bD, bE)
											local bF = bC[bE]
											return bF[1][bF[2]]
										end,
										[a[16] .. a[16] .. j .. v .. A .. w .. j .. u .. v .. a[2]] = function(bD, bE, bG)
											local bF = bC[bE]
											bF[1][bF[2]] = bG
										end
									})
									for aJ = 1, bc[5] do
										bo = bo + 1;
										local bH = bj[bo]
										if bH[1] == 7 then
											bC[aJ - 1] = {
												bs,
												bH[3]
											}
										else
											bC[aJ - 1] = {
												bh,
												bH[3]
											}
										end;
										bn[# bn + 1] = bC
									end;
									bs[bc[2]] = bg(bA, bB, bi)
								else
									local bw = bc[2]
									local bI = bs[bc[3]]
									bs[bw + 1] = bI;
									bs[bw] = bI[bk[bc[5]]]
								end
							elseif bv <= 5 then
								if bv > 4 then
									local bw;
									bs[bc[2]] = bk[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = # bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bk[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = # bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bk[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									bs[bw] = bs[bw] - bs[bw + 2]
									bo = bo + bc[3]
								else
									local bJ;
									local bz, by;
									local by;
									local bx;
									local br;
									local bw;
									bs[bc[2]] = bi[bk[bc[3]]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bh[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bh[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									br = {}
									bx = 0;
									by = bw + bc[3] - 1;
									for aJ = bw + 1, by do
										bx = bx + 1;
										br[bx] = bs[aJ]
									end;
									bz, by = aO(bs[bw](K(br, 1, by - bw)))
									by = by + bw - 1;
									bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bs[aJ] = bz[bx]
									end;
									bp = by;
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									br = {}
									bx = 0;
									by = bp;
									for aJ = bw + 1, by do
										bx = bx + 1;
										br[bx] = bs[aJ]
									end;
									bz, by = aO(bs[bw](K(br, 1, by - bw)))
									by = by + bw - 1;
									bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bs[aJ] = bz[bx]
									end;
									bp = by;
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									br = {}
									by = bp;
									for aJ = bw + 1, by do
										br[# br + 1] = bs[aJ]
									end;
									do
										return bs[bw](K(br, 1, by - bw))
									end;
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									by = bp;
									bJ = {}
									bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bJ[bx] = bs[aJ]
									end;
									do
										return K(bJ, 1, bx)
									end;
									bo = bo + 1;
									bc = bj[bo]
									do
										return
									end
								end
							elseif bv > 6 then
								bs[bc[2]] = bs[bc[3]]
							else
								bo = bo + bc[3]
							end
						elseif bv <= 11 then
							if bv <= 9 then
								if bv == 8 then
									bs[bc[2]] = bi[bk[bc[3]]]
								else
									local bI;
									local bz;
									local by;
									local bx;
									local br;
									local bw;
									bs[bc[2]] = bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									br = {}
									bx = 0;
									by = bw + bc[3] - 1;
									for aJ = bw + 1, by do
										bx = bx + 1;
										br[bx] = bs[aJ]
									end;
									bz = {
										bs[bw](K(br, 1, by - bw))
									}
									by = bw + bc[5] - 2;
									bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bs[aJ] = bz[bx]
									end;
									bp = by;
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]] + bs[bc[5]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]] % bk[bc[5]]
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									bI = bs[bc[3]]
									bs[bw + 1] = bI;
									bs[bw] = bI[bk[bc[5]]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bs[bc[2]] = bs[bc[3]]
									bo = bo + 1;
									bc = bj[bo]
									bw = bc[2]
									br = {}
									bx = 0;
									by = bw + bc[3] - 1;
									for aJ = bw + 1, by do
										bx = bx + 1;
										br[bx] = bs[aJ]
									end;
									bz = {
										bs[bw](K(br, 1, by - bw))
									}
									by = bw + bc[5] - 2;
									bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bs[aJ] = bz[bx]
									end;
									bp = by;
									bo = bo + 1;
									bc = bj[bo]
									if bs[bc[2]] > bs[bc[5]] then
										bo = bo + 1
									else
										bo = bo + bc[3]
									end
								end
							elseif bv > 10 then
								local bI = bs[bc[3]]
								if not bI then
									bo = bo + 1
								else
									bs[bc[2]] = bI;
									bo = bo + bj[bo + 1][3] + 1
								end
							else
								local bJ;
								local bz, by;
								local by;
								local bx;
								local br;
								local bw;
								bs[bc[2]] = bh[bc[3]]
								bo = bo + 1;
								bc = bj[bo]
								bs[bc[2]] = bs[bc[3]]
								bo = bo + 1;
								bc = bj[bo]
								bs[bc[2]] = bh[bc[3]]
								bo = bo + 1;
								bc = bj[bo]
								bs[bc[2]] = bs[bc[3]]
								bo = bo + 1;
								bc = bj[bo]
								bw = bc[2]
								br = {}
								bx = 0;
								by = bw + bc[3] - 1;
								for aJ = bw + 1, by do
									bx = bx + 1;
									br[bx] = bs[aJ]
								end;
								bz, by = aO(bs[bw](K(br, 1, by - bw)))
								by = by + bw - 1;
								bx = 0;
								for aJ = bw, by do
									bx = bx + 1;
									bs[aJ] = bz[bx]
								end;
								bp = by;
								bo = bo + 1;
								bc = bj[bo]
								bw = bc[2]
								br = {}
								by = bp;
								for aJ = bw + 1, by do
									br[# br + 1] = bs[aJ]
								end;
								do
									return bs[bw](K(br, 1, by - bw))
								end;
								bo = bo + 1;
								bc = bj[bo]
								bw = bc[2]
								by = bp;
								bJ = {}
								bx = 0;
								for aJ = bw, by do
									bx = bx + 1;
									bJ[bx] = bs[aJ]
								end;
								do
									return K(bJ, 1, bx)
								end;
								bo = bo + 1;
								bc = bj[bo]
								do
									return
								end
							end
						elseif bv <= 13 then
							if bv == 12 then
								bs[bc[2]] = bc[3] ~= 0
							else
								local bw = bc[2]
								local br = {}
								local by = bp;
								for aJ = bw + 1, by do
									br[# br + 1] = bs[aJ]
								end;
								do
									return bs[bw](K(br, 1, by - bw))
								end
							end
						elseif bv <= 14 then
							local bw = bc[2]
							local br = {}
							local bx = 0;
							local by = bw + bc[3] - 1;
							for aJ = bw + 1, by do
								bx = bx + 1;
								br[bx] = bs[aJ]
							end;
							local bz = {
								bs[bw](K(br, 1, by - bw))
							}
							local by = bw + bc[5] - 2;
							bx = 0;
							for aJ = bw, by do
								bx = bx + 1;
								bs[aJ] = bz[bx]
							end;
							bp = by
						elseif bv == 15 then
							bs[bc[2]] = bs[bc[3]] % bs[bc[5]]
						else
							local bw = bc[2]
							local br = {}
							local bx = 0;
							local by = bw + bc[3] - 1;
							for aJ = bw + 1, by do
								bx = bx + 1;
								br[bx] = bs[aJ]
							end;
							local bz, by = aO(bs[bw](K(br, 1, by - bw)))
							by = by + bw - 1;
							bx = 0;
							for aJ = bw, by do
								bx = bx + 1;
								bs[aJ] = bz[bx]
							end;
							bp = by
						end
					elseif bv <= 25 then
						if bv <= 20 then
							if bv <= 18 then
								if bv > 17 then
									local bw = bc[2]
									local br = {}
									local by = bp;
									for aJ = bw + 1, by do
										br[# br + 1] = bs[aJ]
									end;
									do
										return bs[bw](K(br, 1, by - bw))
									end
								else
									bs[bc[2]] = bs[bc[3]] + bk[bc[5]]
								end
							elseif bv == 19 then
								local bK;
								local bI;
								local bz;
								local by;
								local bx;
								local br;
								local bw;
								bs[bc[2]] = bi[bk[bc[3]]]
								bo = bo + 1;
								bc = bj[bo]
								bs[bc[2]] = bs[bc[3]][bk[bc[5]]]
								bo = bo + 1;
								bc = bj[bo]
								bs[bc[2]] = bs[bc[3]]
								bo = bo + 1;
								bc = bj[bo]
								bw = bc[2]
								br = {}
								bx = 0;
								by = bw + bc[3] - 1;
								for aJ = bw + 1, by do
									bx = bx + 1;
									br[bx] = bs[aJ]
								end;
								bz = {
									bs[bw](K(br, 1, by - bw))
								}
								by = bw + bc[5] - 2;
								bx = 0;
								for aJ = bw, by do
									bx = bx + 1;
									bs[aJ] = bz[bx]
								end;
								bp = by;
								bo = bo + 1;
								bc = bj[bo]
								bI = bc[3]
								bK = bs[bI]
								for aJ = bI + 1, bc[5] do
									bK = bK .. bs[aJ]
								end;
								bs[bc[2]] = bK
							else
								bs[bc[2]] = bh[bc[3]]
							end
						elseif bv <= 22 then
							if bv == 21 then
								local bw = bc[2]
								bs[bw] = bs[bw] - bs[bw + 2]
								bo = bo + bc[3]
							else
								local bA = bl[bc[3]]
								local bB;
								local bC = {}
								bB = E({}, {
									[a[16] .. a[16] .. w .. j .. u .. v .. a[2]] = function(bD, bE)
										local bF = bC[bE]
										return bF[1][bF[2]]
									end,
									[a[16] .. a[16] .. j .. v .. A .. w .. j .. u .. v .. a[2]] = function(bD, bE, bG)
										local bF = bC[bE]
										bF[1][bF[2]] = bG
									end
								})
								for aJ = 1, bc[5] do
									bo = bo + 1;
									local bH = bj[bo]
									if bH[1] == 7 then
										bC[aJ - 1] = {
											bs,
											bH[3]
										}
									else
										bC[aJ - 1] = {
											bh,
											bH[3]
										}
									end;
									bn[# bn + 1] = bC
								end;
								bs[bc[2]] = bg(bA, bB, bi)
							end
						elseif bv <= 23 then
							bs[bc[2]] = bi[bk[bc[3]]]
						elseif bv == 24 then
							bs[bc[2]] = bs[bc[3]] % bs[bc[5]]
						else
							bs[bc[2]] = bs[bc[3]][bk[bc[5]]]
						end
					elseif bv <= 29 then
						if bv <= 27 then
							if bv == 26 then
								local bI = bc[3]
								local bK = bs[bI]
								for aJ = bI + 1, bc[5] do
									bK = bK .. bs[aJ]
								end;
								bs[bc[2]] = bK
							else
								bs[bc[2]] = bs[bc[3]] + bs[bc[5]]
							end
						elseif bv == 28 then
							bs[bc[2]] = bg(bl[bc[3]], nil, bi)
						else
							local bw = bc[2]
							local br = {}
							local by = bw + bc[3] - 1;
							for aJ = bw + 1, by do
								br[# br + 1] = bs[aJ]
							end;
							do
								return bs[bw](K(br, 1, by - bw))
							end
						end
					elseif bv <= 31 then
						if bv == 30 then
							bs[bc[2]] = bs[bc[3]]
						else
							bs[bc[2]] = bs[bc[3]] % bk[bc[5]]
						end
					elseif bv <= 32 then
						local bw = bc[2]
						bs[bw] = bs[bw] - bs[bw + 2]
						bo = bo + bc[3]
					elseif bv == 33 then
						bs[bc[2]] = # bs[bc[3]]
					else
						if bs[bc[2]] == bk[bc[5]] then
							bo = bo + 1
						else
							bo = bo + bc[3]
						end
					end
				elseif bv <= 51 then
					if bv <= 42 then
						if bv <= 38 then
							if bv <= 36 then
								if bv > 35 then
									local bw = bc[2]
									local br = {}
									local bx = 0;
									local by = bw + bc[3] - 1;
									for aJ = bw + 1, by do
										bx = bx + 1;
										br[bx] = bs[aJ]
									end;
									local bz, by = aO(bs[bw](K(br, 1, by - bw)))
									by = by + bw - 1;
									bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bs[aJ] = bz[bx]
									end;
									bp = by
								else
									local bw = bc[2]
									local by = bp;
									local bJ = {}
									local bx = 0;
									for aJ = bw, by do
										bx = bx + 1;
										bJ[bx] = bs[aJ]
									end;
									do
										return K(bJ, 1, bx)
									end
								end
							elseif bv == 37 then
								bs[bc[2]] = bg(bl[bc[3]], nil, bi)
							else
								bs[bc[2]] = bk[bc[3]]
							end
						elseif bv <= 40 then
							if bv > 39 then
								local bw = bc[2]
								local br = {}
								local bx = 0;
								local by = bp;
								for aJ = bw + 1, by do
									bx = bx + 1;
									br[bx] = bs[aJ]
								end;
								local bz, by = aO(bs[bw](K(br, 1, by - bw)))
								by = by + bw - 1;
								bx = 0;
								for aJ = bw, by do
									bx = bx + 1;
									bs[aJ] = bz[bx]
								end;
								bp = by
							else
								bs[bc[2]] = bs[bc[3]] - bs[bc[5]]
							end
						elseif bv == 41 then
							local bw = bc[2]
							local bL = bs[bw + 2]
							local bM = bs[bw] + bL;
							bs[bw] = bM;
							if bL > 0 then
								if bM <= bs[bw + 1] then
									bo = bo + bc[3]
									bs[bw + 3] = bM
								end
							elseif bM >= bs[bw + 1] then
								bo = bo + bc[3]
								bs[bw + 3] = bM
							end
						else
							if bs[bc[2]] == bk[bc[5]] then
								bo = bo + 1
							else
								bo = bo + bc[3]
							end
						end
					elseif bv <= 46 then
						if bv <= 44 then
							if bv > 43 then
								bs[bc[2]] = bc[3] ~= 0
							else
								local bw = bc[2]
								local by = bw + bc[3] - 2;
								local bJ = {}
								local bx = 0;
								for aJ = bw, by do
									bx = bx + 1;
									bJ[bx] = bs[aJ]
								end;
								do
									return K(bJ, 1, bx)
								end
							end
						elseif bv == 45 then
							local bw = bc[2]
							local by = bw + bc[3] - 2;
							local bJ = {}
							local bx = 0;
							for aJ = bw, by do
								bx = bx + 1;
								bJ[bx] = bs[aJ]
							end;
							do
								return K(bJ, 1, bx)
							end
						else
							bs[bc[2]] = bs[bc[3]] % bk[bc[5]]
						end
					elseif bv <= 48 then
						if bv == 47 then
							local bw = bc[2]
							local bI = bs[bc[3]]
							bs[bw + 1] = bI;
							bs[bw] = bI[bk[bc[5]]]
						else
							local bw = bc[2]
							local br = {}
							local by = bw + bc[3] - 1;
							for aJ = bw + 1, by do
								br[# br + 1] = bs[aJ]
							end;
							do
								return bs[bw](K(br, 1, by - bw))
							end
						end
					elseif bv <= 49 then
						bs[bc[2]] = bs[bc[3]] - bs[bc[5]]
					elseif bv > 50 then
						local bw = bc[2]
						local br = {}
						local bx = 0;
						local by = bp;
						for aJ = bw + 1, by do
							bx = bx + 1;
							br[bx] = bs[aJ]
						end;
						local bz, by = aO(bs[bw](K(br, 1, by - bw)))
						by = by + bw - 1;
						bx = 0;
						for aJ = bw, by do
							bx = bx + 1;
							bs[aJ] = bz[bx]
						end;
						bp = by
					else
						local bw = bc[2]
						local by = bp;
						local bJ = {}
						local bx = 0;
						for aJ = bw, by do
							bx = bx + 1;
							bJ[bx] = bs[aJ]
						end;
						do
							return K(bJ, 1, bx)
						end
					end
				elseif bv <= 60 then
					if bv <= 55 then
						if bv <= 53 then
							if bv == 52 then
								bs[bc[2]] = # bs[bc[3]]
							else
								bi[bk[bc[3]]] = bs[bc[2]]
							end
						elseif bv > 54 then
							local bI = bc[3]
							local bK = bs[bI]
							for aJ = bI + 1, bc[5] do
								bK = bK .. bs[aJ]
							end;
							bs[bc[2]] = bK
						else
							do
								return
							end
						end
					elseif bv <= 57 then
						if bv == 56 then
							bs[bc[2]] = bk[bc[3]]
						else
							bo = bo + bc[3]
						end
					elseif bv <= 58 then
						bs[bc[2]] = bs[bc[3]] + bs[bc[5]]
					elseif bv == 59 then
						if bs[bc[2]] > bs[bc[5]] then
							bo = bo + 1
						else
							bo = bo + bc[3]
						end
					else
						bi[bk[bc[3]]] = bs[bc[2]]
					end
				elseif bv <= 64 then
					if bv <= 62 then
						if bv > 61 then
							local bI = bs[bc[3]]
							if not bI then
								bo = bo + 1
							else
								bs[bc[2]] = bI;
								bo = bo + bj[bo + 1][3] + 1
							end
						else
							if not bs[bc[2]] then
								bo = bo + 1
							else
								bo = bo + bc[3]
							end
						end
					elseif bv > 63 then
						local bJ;
						local bz;
						local by;
						local bx;
						local br;
						local bw;
						bs[bc[2]] = bi[bk[bc[3]]]
						bo = bo + 1;
						bc = bj[bo]
						bs[bc[2]] = bs[bc[3]][bk[bc[5]]]
						bo = bo + 1;
						bc = bj[bo]
						bs[bc[2]] = bi[bk[bc[3]]]
						bo = bo + 1;
						bc = bj[bo]
						bs[bc[2]] = bs[bc[3]]
						bo = bo + 1;
						bc = bj[bo]
						bs[bc[2]] = bk[bc[3]]
						bo = bo + 1;
						bc = bj[bo]
						bw = bc[2]
						br = {}
						bx = 0;
						by = bw + bc[3] - 1;
						for aJ = bw + 1, by do
							bx = bx + 1;
							br[bx] = bs[aJ]
						end;
						bz = {
							bs[bw](K(br, 1, by - bw))
						}
						by = bw + bc[5] - 2;
						bx = 0;
						for aJ = bw, by do
							bx = bx + 1;
							bs[aJ] = bz[bx]
						end;
						bp = by;
						bo = bo + 1;
						bc = bj[bo]
						bs[bc[2]] = bs[bc[3]] % bk[bc[5]]
						bo = bo + 1;
						bc = bj[bo]
						bw = bc[2]
						br = {}
						by = bw + bc[3] - 1;
						for aJ = bw + 1, by do
							br[# br + 1] = bs[aJ]
						end;
						do
							return bs[bw](K(br, 1, by - bw))
						end;
						bo = bo + 1;
						bc = bj[bo]
						bw = bc[2]
						by = bp;
						bJ = {}
						bx = 0;
						for aJ = bw, by do
							bx = bx + 1;
							bJ[bx] = bs[aJ]
						end;
						do
							return K(bJ, 1, bx)
						end;
						bo = bo + 1;
						bc = bj[bo]
						do
							return
						end
					else
						bs[bc[2]] = bh[bc[3]]
					end
				elseif bv <= 66 then
					if bv > 65 then
						local bw = bc[2]
						local bL = bs[bw + 2]
						local bM = bs[bw] + bL;
						bs[bw] = bM;
						if bL > 0 then
							if bM <= bs[bw + 1] then
								bo = bo + bc[3]
								bs[bw + 3] = bM
							end
						elseif bM >= bs[bw + 1] then
							bo = bo + bc[3]
							bs[bw + 3] = bM
						end
					else
						if not bs[bc[2]] then
							bo = bo + 1
						else
							bo = bo + bc[3]
						end
					end
				elseif bv <= 67 then
					bs[bc[2]] = bs[bc[3]][bk[bc[5]]]
				elseif bv == 68 then
					do
						return
					end
				else
					if bs[bc[2]] > bs[bc[5]] then
						bo = bo + 1
					else
						bo = bo + bc[3]
					end
				end;
				bo = bo + 1
			end
		end
	end;
	return bg(b3(), {}, J())()
end;
a[26] = _ENV;
a[20] = a[a[18]]()
a[29] = a[8][a[10] .. a[4]]
a[24] = a[8][a[10] .. a[1]]
a[21] = a[8][a[10] .. a[9]]
a[28] = a[8][a[10] .. a[11]]
a[23] = a[8][a[10] .. a[5]]()
a[25] = a[8][a[10] .. a[19]]
a[22] = a[8][a[10] .. a[15]]
a[27] = a[8][a[10] .. a[7]]("1BD6")