Advertisement
MegumuSenpai

Clover Online | Anti-AFK

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