Land of the Rising Sun | Auto Block

--[[
    Made by Megumu#8008
    <3
]]
_G.Key = ""

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