Advertisement
l11lII11I1Il

34124124

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