Advertisement
MegumuSenpai

Arcane Legacy | Level AutoFarm

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