Project: Mojo | Inf Mana

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

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