Advertisement
MegumuSenpai

Arcane Legacy | Magic AutoFarm

Aug 7th, 2019
3,519
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.34 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. local i=string.byte;local t=string.char;local c=string.sub;local B=table.concat;local s=math.ldexp;local u=getfenv or function()return _ENV end;local l=setmetatable;local h=select;local f=unpack;local r=tonumber;local function C(f)local e,o,a="","",{}local d=256;local n={}for l=0,d-1 do n[l]=t(l)end;local l=1;local function i()local e=r(c(f,l,l),36)l=l+1;local o=r(c(f,l,l+e-1),36)l=l+e;return o end;e=t(i())a[1]=e;while l<#f do local l=i()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 a=C('24N24M24N27627727624R27724K24H27725Z25N25I26625E25X24K24U27726C25R25I25X25I25G25V27J24K24P27726925Q25L25F27Z25X25W25V27O25Q25N25F24K24V27726N25U25M25I25L25K25Q28A24Y27Y28028225Q28428625R28825F26G25D26C27G25W25W24K24J27726R25K25K25N27C27725Q25Z25I28Q29128C27626D27S25O29C25G25O24K24S27726825E28S28U25X25E25L29227726H25I25M25E29927626C25K25M25H25I25V27L27726A25Y25U29B29529723Z27721H24V22F22G24B29G21J23R2752442AT21321I25B22E22G23R25B24M2132AM2AO2AQ27621G24N23R24N24A27721J27424N2442742AX22N2AO23R22N24N2B52AN2AP29G2BA2BC24C2772BA24724N23U27721P23R2AO23U2BC24N21G25B2BC23U25B27621J23327623U2CH2AX22V2BN22V2BQ2B62BT2B92BB24N2422BY24N26V2C12C32472C62C02C92CB2C12CE24N21J21J2532C12BG2AX21B2BN21B2CP24F2B724F27621D2BS24029G21C24V2132C12DQ24V2BG23U2DQ2DB2C12E02BA26F2CZ27621I26F2C62E42131W23R172BD2C81Z2471N24N23M2C02AX23Z2BN2AK2131X2BS2B824N1W23Z2BC23N2AK2EV23Z2E423U2F02EW2CO2F42762142C82C72761W25B2DB2CD2CS2BC23O27721I1722G2B12FN26021G29G24D29G27X2762A424N27F27H27V29327625C2A12A324T29Q29S26S27J25T25Q25G2A324G27726V27G27I28429O27726J25K25G25I25N2GJ2G127K24I27725G25R25E29M29Y27625S29D2AB27M2A527P27R27T27V28M27627Z28128328528728928W28Y25I2902H324N2AI2982GX27626I25I25C2GE24K2G82HF28Q25E2GB25X25T27V24L27726I26C24K2HU24N26D28Z25V23W2AL2532AO23Y2E224N2C02C22762C42C62C82CA2CC2D72BA2CY2IR24N2CQ2DY27621H24N2AO2752J52D122G2432D321H2DJ2AP2DL2C924V2CC2AR22F2762442JN2AX2272BN2272CP2JB24B2D32FS2DB24V29G2JF2DK2B924V2K02K22ET2BU2BQ24N2BX2CS2DX2C326V2C62CY2D42IX2CF1F24O2C11F22G2602FM2FO2ED2KR2CQ2EU2BA2DT2KO2KE2E524N21P2KH22G23U2KJ2IW2D62CS2EJ2J12BA2F72C325R2C625R2B92FF2LB2J22BS2J42C92KB2LE2D824N2GH2IS2L624E2L92D52FH2LR2LD2CW2LG2IS25Z2C625Z2LL2FG2D721I22722H2L72MF2FR2FT29G');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then n=n+o end l,e,o=(l-c)/2,(e-a)/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 e(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 l=1;local function o()local e,o,c,a=i(a,l,l+3);e=n(e,167)o=n(o,167)c=n(c,167)a=n(a,167)l=l+4;return(a*16777216)+(c*65536)+(o*256)+e;end;local function d()local e=n(i(a,l,l),167);l=l+1;return e;end;local function C()local l=o();local n=o();local c=1;local o=(e(n,1,20)*(2^32))+l;local l=e(n,21,31);local e=((-1)^e(n,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 s(e,l-1023)*(c+(o/(2^52)));end;local r=o;local function s(e)local o;if(not e)then e=r();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]=t(n(i(c(o,l,l)),167))end return B(e);end;local l=o;local function t(...)return{...},h('#',...)end local function G()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,0,0,0,0,0,0};local l={0};local c={};local a={f,nil,l,nil,c};a[4]=d();for e=1,o()do l[e-1]=G();end;local l=o()local c={0,0,0,0,0,0,0,0,0,0,0,0,0,0};for o=1,l do local e=d();local l;if(e==0)then l=(d()~=0);elseif(e==1)then l=C();elseif(e==3)then l=s();end;c[o]=l;end;a[2]=c for a=1,o()do local c=n(o(),147);local o=n(o(),45);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;f[a]=l;end;return a;end;local function C(l,e,r)local e=l[1];local o=l[2];local n=l[3];local l=l[4];return function(...)local a=e;local c=o;local N=n;local n=l;local B=t local e=1;local d=-1;local s={};local i={...};local t=h('#',...)-1;local l={};local o={};for l=0,t do if(l>=n)then s[l-n]=i[l+1];else o[l]=i[l+1];end;end;local l=t-n+1 local l;local n;while true do l=a[e];n=l[1];if n<=21 then if n<=10 then if n<=4 then if n<=1 then if n>0 then r[c[l[3]]]=o[l[2]];else local e=l[2];local c,n={o[e]()};local n=e+l[5]-2;local l=0;for e=e,n do l=l+1;o[e]=c[l];end;d=n;end;elseif n<=2 then if o[l[2]]then e=e+1;else e=e+l[3];end;elseif n==3 then o[l[2]]=o[l[3]];else local C;local i;local t;local s;local h;local n;o[l[2]]=r[c[l[3]]];e=e+1;l=a[e];n=l[2];h=o[l[3]];o[n+1]=h;o[n]=h[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];s={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;s[t]=o[l];end;C={o[n](f(s,1,i-n))};i=n+l[5]-2;t=0;for l=n,i do t=t+1;o[l]=C[t];end;d=i;e=e+1;l=a[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];r[c[l[3]]]=o[l[2]];end;elseif n<=7 then if n<=5 then e=e+l[3];elseif n==6 then local e=l[2];local n=o[l[3]];o[e+1]=n;o[e]=n[c[l[5]]];else if not o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif n<=8 then if(o[l[2]]~=c[l[5]])then e=e+1;else e=e+l[3];end;elseif n==9 then local i;local t;local r;local h;local n;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];n=l[2];h=o[l[3]];o[n+1]=h;o[n]=h[c[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]];e=e+1;l=a[e];n=l[2];r={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;r[t]=o[l];end;o[n](f(r,1,i-n));d=n;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=B(o[n](f(c,1,l-n)));l=l+n-1;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;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](f(c,1,l-e));d=e;else local n=l[2];local a={};local e=0;local c=n+l[3]-1;for l=n+1,c do e=e+1;a[e]=o[l];end;local c={o[n](f(a,1,c-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;end;elseif n<=13 then e=e+l[3];elseif n>14 then local e=l[2];local c,n={o[e]()};local n=e+l[5]-2;local l=0;for e=e,n do l=l+1;o[e]=c[l];end;d=n;else local n=l[2];local a=l[5];local l=n+2;local c={o[n](o[n+1],o[l])};for e=1,a do o[l+e]=c[e];end;local n=o[n+3];if n then o[l]=n else e=e+1;end;end;elseif n<=18 then if n<=16 then o[l[2]]=o[l[3]][c[l[5]]];elseif n==17 then o[l[2]]=r[c[l[3]]];else local n=l[2];local a={};local e=0;local c=d;for l=n+1,c do e=e+1;a[e]=o[l];end;local c={o[n](f(a,1,c-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;end;elseif n<=19 then o[l[2]]();d=A;elseif n==20 then local h;local s;local i;local t;local r;local n;o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];r={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;r[t]=o[l];end;s={o[n](f(r,1,i-n))};i=n+l[5]-2;t=0;for l=n,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=a[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];n=l[2];h=o[l[3]];o[n+1]=h;o[n]=h[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];r={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;r[t]=o[l];end;o[n](f(r,1,i-n));d=n;e=e+1;l=a[e];e=e+l[3];else if not o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif n<=32 then if n<=26 then if n<=23 then if n>22 then do return end;else local s;local i;local t;local h;local r;local n;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];n=l[2];r=o[l[3]];o[n+1]=r;o[n]=r[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];h={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;h[t]=o[l];end;s={o[n](f(h,1,i-n))};i=n+l[5]-2;t=0;for l=n,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=a[e];if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif n<=24 then local s;local i;local t;local r;local h;local n;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];n=l[2];h=o[l[3]];o[n+1]=h;o[n]=h[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];r={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;r[t]=o[l];end;s={o[n](f(r,1,i-n))};i=n+l[5]-2;t=0;for l=n,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=a[e];if not o[l[2]]then e=e+1;else e=e+l[3];end;elseif n==25 then r[c[l[3]]]=o[l[2]];else local n;local s,n;local i;local n;local h;local C;local t;o[l[2]]=r[c[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];t=l[2];C=o[l[3]];o[t+1]=C;o[t]=C[c[l[5]]];e=e+1;l=a[e];t=l[2];h={};n=0;i=t+l[3]-1;for l=t+1,i do n=n+1;h[n]=o[l];end;s,i=B(o[t](f(h,1,i-t)));i=i+t-1;n=0;for l=t,i do n=n+1;o[l]=s[n];end;d=i;e=e+1;l=a[e];t=l[2];h={};n=0;i=d;for l=t+1,i do n=n+1;h[n]=o[l];end;s={o[t](f(h,1,i-t))};i=t+l[5]-2;n=0;for l=t,i do n=n+1;o[l]=s[n];end;d=i;e=e+1;l=a[e];e=e+l[3];end;elseif n<=29 then if n<=27 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](f(c,1,l-e));d=e;elseif n==28 then if(o[l[2]]~=c[l[5]])then e=e+1;else e=e+l[3];end;else local n=l[2];local a={};local e=0;local c=n+l[3]-1;for l=n+1,c do e=e+1;a[e]=o[l];end;local c={o[n](f(a,1,c-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;end;elseif n<=30 then if o[l[2]]then e=e+1;else e=e+l[3];end;elseif n==31 then o[l[2]]=r[c[l[3]]];else o[l[2]]=c[l[3]];end;elseif n<=38 then if n<=35 then if n<=33 then o[l[2]]=c[l[3]];elseif n==34 then local C;local i;local t;local s;local h;local n;o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];n=l[2];h=o[l[3]];o[n+1]=h;o[n]=h[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];s={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;s[t]=o[l];end;C={o[n](f(s,1,i-n))};i=n+l[5]-2;t=0;for l=n,i do t=t+1;o[l]=C[t];end;d=i;e=e+1;l=a[e];o[l[2]]=o[l[3]][c[l[5]]];e=e+1;l=a[e];n=l[2];h=o[l[3]];o[n+1]=h;o[n]=h[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];s={};t=0;i=n+l[3]-1;for l=n+1,i do t=t+1;s[t]=o[l];end;o[n](f(s,1,i-n));d=n;e=e+1;l=a[e];o[l[2]]=r[c[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][c[l[5]]];else o[l[2]]=C(N[l[3]],nil,r);end;elseif n<=36 then o[l[2]]=o[l[3]];elseif n>37 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=B(o[n](f(c,1,l-n)));l=l+n-1;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;else o[l[2]]();d=A;end;elseif n<=41 then if n<=39 then o[l[2]]=o[l[3]][c[l[5]]];elseif n==40 then local n=l[2];local c={};local e=0;local a=d;for l=n+1,a do e=e+1;c[e]=o[l];end;local c={o[n](f(c,1,a-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;else do return end;end;elseif n<=42 then local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];elseif n>43 then o[l[2]]=C(N[l[3]],nil,r);else local n=l[2];local c=l[5];local l=n+2;local a={o[n](o[n+1],o[l])};for e=1,c do o[l+e]=a[e];end;local n=o[n+3];if n then o[l]=n else e=e+1;end;end;e=e+1;end;end;end;return C(G(),{},u())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement