RO-BOXING | GodMode

--[[
    Made by Megumu/Mommy Mango
    <3
]]

local i=string.byte;local r=string.char;local c=string.sub;local u=table.concat;local V=math.ldexp;local T=getfenv or function()return _ENV end;local l=setmetatable;local h=select;local f=unpack;local s=tonumber;local function C(d)local e,o,n="","",{}local t=256;local a={}for l=0,t-1 do a[l]=r(l)end;local l=1;local function f()local e=s(c(d,l,l),36)l=l+1;local o=s(c(d,l,l+e-1),36)l=l+e;return o end;e=r(f())n[1]=e;while l<#d do local l=f()if a[l]then o=a[l]else o=e..c(e,1,1)end;a[t]=e..c(o,1,1)n[#n+1],e,t=o,o,t+1 end;return table.concat(n)end;local a=C('24324D27526324523122Q22Y24527526723X27922T23X27526624524T24D22T27C24D25Z25927G25927525N27F22Q27H27525M25925P27N27U24D28127128428025926L28924D25Y23P26527N23P28027P27O27J28522O28526224D27U22V27524D26224527I22R27P28X27528M27524A28V24C24728V26P26Q27026X26M26H26N26S26R26Y24C24928V26Y27026O26W24C29627525X26H26H26L26226W26H24C26028V26T29W26L26M24N24Y24Y26H26T26W26O27029J26Q29G26W26W24Z24T2AN26I26W27326T26Q29F27026L26L24Z27226Q26O24Y27326Q26D29I26Y25E26Y26Q26X24Z26L26T26L24I26U26W26C24G25S26425V26225U25726G26M26W26N24G29S28V25P26P27026C2BT26M24C24628V25T26Q27227026P2BY2C02BT24C24B28V25K2BS26N25W26X28V24D');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local a,c=l%2,o%2 if a~=c then n=n+e end l,o,e=(l-a)/2,(o-c)/2,e*2 end if l<o then l=o end while l>0 do local o=l%2 if o>0 then n=n+e end l,e=(l-o)/2,e*2 end return n end local function e(o,l,e)if e then local l=(o/2^(l-1))%2^((e-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(o%(l+l)>=l)and 1 or 0;end;end;local l=1;local function o()local o,a,e,c=i(a,l,l+3);o=n(o,157)a=n(a,157)e=n(e,157)c=n(c,157)l=l+4;return(c*16777216)+(e*65536)+(a*256)+o;end;local function t()local e=n(i(a,l,l),157);l=l+1;return e;end;local function C()local n=o();local l=o();local c=1;local n=(e(l,1,20)*(2^32))+n;local o=e(l,21,31);local l=((-1)^e(l,32));if(o==0)then if(n==0)then return l*0;else o=1;c=0;end;elseif(o==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return V(l,o-1023)*(c+(n/(2^52)));end;local d=o;local function V(e)local o;if(not e)then e=d();if(e==0)then return'';end;end;o=c(a,l,l+e-1);l=l+e;local e={}for l=1,#o do e[l]=r(n(i(c(o,l,l)),157))end return u(e);end;local l=o;local function r(...)return{...},h('#',...)end local function s()local d={0,0,0,0,0,0,0,0,0,0,0,0,0,0};local f={};local l={};local a={d,nil,f,nil,l};for a=1,o()do local c=n(o(),71);local o=n(o(),248);local n=e(c,1,2);local l=e(o,1,11);local l={l,e(c,3,11),nil,nil,o};if(n==0)then l[3]=e(c,12,20);l[5]=e(c,21,29);elseif(n==1)then l[3]=e(o,12,33);elseif(n==2)then l[3]=e(o,12,32)-1048575;elseif(n==3)then l[3]=e(o,12,32)-1048575;l[5]=e(c,21,29);end;d[a]=l;end;a[4]=t();local l=o()local n={0,0,0,0,0,0,0};for o=1,l do local e=t();local l;if(e==2)then l=(t()~=0);elseif(e==3)then l=C();elseif(e==1)then l=V();end;n[o]=l;end;a[2]=n for l=1,o()do f[l-1]=s();end;return a;end;local function u(l,e,d)local n=l[1];local o=l[2];local e=l[3];local l=l[4];return function(...)local a=n;local c=o;local e=e;local n=l;local i=r local o=1;local t=-1;local s={};local r={...};local h=h('#',...)-1;local l={};local e={};for l=0,h do if(l>=n)then s[l-n]=r[l+1];else e[l]=r[l+1];end;end;local l=h-n+1 local l;local n;while true do l=a[o];n=l[1];if n<=9 then if n<=4 then if n<=1 then if n==0 then do return end;else local o=l[2];local n=e[l[3]];e[o+1]=n;e[o]=n[c[l[5]]];end;elseif n<=2 then local n=l[2];local c={};local o=0;local a=t;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](f(c,1,a-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;elseif n==3 then e[l[2]]=d[c[l[3]]];else local n=l[3];local o=e[n]for l=n+1,l[5]do o=o..e[l];end;e[l[2]]=o;end;elseif n<=6 then if n==5 then local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=i(e[n](f(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;else e[l[2]]();t=A;end;elseif n<=7 then e[l[2]]=c[l[3]];elseif n>8 then local n=l[2];local a={};local o=0;local c=t;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](f(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;else e[l[2]]=e[l[3]][c[l[5]]];end;elseif n<=14 then if n<=11 then if n==10 then e[l[2]]=(l[3]~=0);else do return end;end;elseif n<=12 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];elseif n>13 then e[l[2]]=e[l[3]][c[l[5]]];else e[l[2]]=(l[3]~=0);end;elseif n<=17 then if n<=15 then local t;local n;local f;e[l[2]]=d[c[l[3]]];o=o+1;l=a[o];e[l[2]]=d[c[l[3]]];o=o+1;l=a[o];f=l[2];n=e[l[3]];e[f+1]=n;e[f]=n[c[l[5]]];o=o+1;l=a[o];e[l[2]]=c[l[3]];o=o+1;l=a[o];e[l[2]]=d[c[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];n=l[3];t=e[n]for l=n+1,l[5]do t=t..e[l];end;e[l[2]]=t;o=o+1;l=a[o];e[l[2]]=(l[3]~=0);elseif n>16 then e[l[2]]=d[c[l[3]]];else local n=l[3];local o=e[n]for l=n+1,l[5]do o=o..e[l];end;e[l[2]]=o;end;elseif n<=18 then e[l[2]]=c[l[3]];elseif n==19 then e[l[2]]();t=A;else local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=i(e[n](f(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;end;o=o+1;end;end;end;return u(s(),{},T())();