Clover Online | Any Grimoire

--[[
    Made by Megumu
    <3
]]

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