Arcane Legacy | Donate

--[[
	Made by Megumu#8008
	<3
	Gives 100k to each player in the server
]]

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