Site 002 | GodMode

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

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