Advertisement
MegumuSenpai

Clover Online | AutoQuest

Jul 23rd, 2019
3,357
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.91 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. local r=string.byte;local f=string.char;local c=string.sub;local D=table.concat;local s=math.ldexp;local E=getfenv or function()return _ENV end;local l=setmetatable;local i=select;local t=unpack;local h=tonumber;local function u(t)local e,o,n="","",{}local a=256;local d={}for l=0,a-1 do d[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())n[1]=e;while l<#t do local l=r()if d[l]then o=d[l]else o=e..c(e,1,1)end;d[a]=e..c(o,1,1)n[#n+1],e,a=o,o,a+1 end;return table.concat(n)end;local a=u('24Z24D27521Z24523122Q23124527521Y24D25924D23527524D27E24T27H27J21V25927923127G24D22725127923025127521U23X27G23A23X27521T25124C24D22S2881T21W25923022Q22U25924C1T21U24D27124D22R27J22324L27922T24L28023P28522Q23P28028N24D22Q28R26527922Q26528X28Z29124D28M28O29527522325X29825X29B29429D29F29428R25P29825P29N22Y29P29329H24D22325H29825H29N29029229G28R27129828O29E28Y29O2A829R29I26T29826T2A629Y28O23628R26L29826L2AN2AH2A022326D29826D2AV29E29Z28R1T2981T2B229Q2AX1L27X1L29N22V2AO28P28R1D27X1D2BF29D21W21H22R28H2BQ26A21Y27C24D22X2BW23Z27J24E24927J26Y27026O26W24E23W27J25R26W26L26P26S27227026H26W26X25Q26H26Q26N27026Y2C824B27J26F2702732CV2732C227J26I27026S26H24F27J27J25526524E24727J26326S26N26W25Q26W26N26J2DJ24E24127J25W25M27026R26H26326P26Q26I2DJ26M24E24427J25G26Q26G2DG25M26W27026U2DB27J25Y26S26P26P2672DS26X2D424E24627J26626Q2EG26W27226H25M26Q26Q26X24E2422ED2EF2EH2EJ2D425926726Q26M2E02BW24D25S26W26P26W26W26226G26C2C927J25L2EA26W25L26T26S26M2FD2F92CQ2FP26Q24E2FB25P26P27026C2622C62C82FB2EI2EG2622DF26P24E2852752EE2EG26027026N26H26T25925M26S2CV26N2EY2EN2752DQ2DS26H2G12GX2E02DC2GG2F22GP2GR26X2D724D');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local c,a=l%2,o%2 if c~=a then n=n+e end l,o,e=(l-c)/2,(o-a)/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 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=r(a,l,l+3);e=n(e,157)o=n(o,157)c=n(c,157)a=n(a,157)l=l+4;return(a*16777216)+(c*65536)+(o*256)+e;end;local function d()local e=n(r(a,l,l),157);l=l+1;return e;end;local function u()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 s=o;local function h(e)local o;if(not e)then e=s();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]=f(n(r(c(o,l,l)),157))end return D(e);end;local l=o;local function r(...)return{...},i('#',...)end local function s()local t={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 f={};local l={};local a={t,nil,f,nil,l};for a=1,o()do local c=n(o(),219);local o=n(o(),255);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;t[a]=l;end;local l=o()local n={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=d();local l;if(e==1)then l=(d()~=0);elseif(e==2)then l=u();elseif(e==3)then l=h();end;n[o]=l;end;a[2]=n for l=1,o()do f[l-1]=s();end;a[4]=d();return a;end;local function u(l,e,s)local e=l[1];local n=l[2];local o=l[3];local l=l[4];return function(...)local a=e;local c=n;local e=o;local n=l;local l=r local e=1;local f=-1;local h={};local d={...};local r=i('#',...)-1;local l={};local o={};for l=0,r do if(l>=n)then h[l-n]=d[l+1];else o[l]=d[l+1];end;end;local l=r-n+1 local l;local d;while true do l=a[e];d=l[1];if d<=9 then if d<=4 then if d<=1 then if d>0 then local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];else if o[l[2]]then e=e+1;else e=e+l[3];end;end;elseif d<=2 then do return end;elseif d==3 then e=e+l[3];else e=e+l[3];end;elseif d<=6 then if d>5 then if o[l[2]]then e=e+1;else e=e+l[3];end;else 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](t(c,1,l-e));f=e;end;elseif d<=7 then local h;local r;local d;local i;local n;o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;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];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;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];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;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]];elseif d==8 then local h;local r;local d;local i;local n;n=l[2];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;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];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;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];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;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];i={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;i[d]=o[l];end;o[n](t(i,1,r-n));f=n;else o[l[2]]=s[c[l[3]]];end;elseif d<=14 then if d<=11 then if d>10 then do return end;else local n=l[2];local e=o[l[3]];o[n+1]=e;o[n]=e[c[l[5]]];end;elseif d<=12 then local n=l[2];local c={};local e=0;local a=n+l[3]-1;for l=n+1,a do e=e+1;c[e]=o[l];end;local c={o[n](t(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;f=l;elseif d==13 then o[l[2]]=c[l[3]];else o[l[2]]=c[l[3]];end;elseif d<=17 then if d<=15 then o[l[2]]=s[c[l[3]]];elseif d>16 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](t(c,1,l-e));f=e;else local h;local r;local i;local d;local n;n=l[2];d=o[l[3]];o[n+1]=d;o[n]=d[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];i={};r=0;h=n+l[3]-1;for l=n+1,h do r=r+1;i[r]=o[l];end;o[n](t(i,1,h-n));f=n;e=e+1;l=a[e];n=l[2];d=o[l[3]];o[n+1]=d;o[n]=d[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];i={};r=0;h=n+l[3]-1;for l=n+1,h do r=r+1;i[r]=o[l];end;o[n](t(i,1,h-n));f=n;e=e+1;l=a[e];n=l[2];d=o[l[3]];o[n+1]=d;o[n]=d[c[l[5]]];e=e+1;l=a[e];o[l[2]]=c[l[3]];e=e+1;l=a[e];n=l[2];i={};r=0;h=n+l[3]-1;for l=n+1,h do r=r+1;i[r]=o[l];end;o[n](t(i,1,h-n));f=n;e=e+1;l=a[e];n=l[2];d=o[l[3]];o[n+1]=d;o[n]=d[c[l[5]]];end;elseif d<=18 then o[l[2]]=o[l[3]][c[l[5]]];elseif d==19 then o[l[2]]=o[l[3]][c[l[5]]];else local n=l[2];local c={};local e=0;local a=n+l[3]-1;for l=n+1,a do e=e+1;c[e]=o[l];end;local c={o[n](t(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;f=l;end;e=e+1;end;end;end;return u(s(),{},E())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement