Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _EVVcszBcRFxI = a; end)); return(function(h,...)local d;local t;local f;local r;local o;local s;local e=24915;local n=0;local l={};while n<960 do n=n+1;while n<0x249 and e%0x4586<0x22c3 do n=n+1 e=(e-638)%36331 local a=n+e if(e%0x1444)>=0xa22 then e=(e-0x1b3)%0xbecb while n<0x159 and e%0x3f90<0x1fc8 do n=n+1 e=(e+373)%46078 local t=n+e if(e%0x4612)<=0x2309 then e=(e*0x235)%0xb39c local e=60792 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e+0x23)%0x6cb5 local e=50518 if not l[e]then l[e]=0x1 end else e=(e*0x34b)%0x607a n=n+1 local e=72394 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end end end elseif e%2~=0 then e=(e*0x2f)%0x651c while n<0x22c and e%0x2a50<0x1528 do n=n+1 e=(e-945)%42308 local t=n+e if(e%0x1a0a)<=0xd05 then e=(e*0x2dc)%0x23d5 local e=11617 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end elseif e%2~=0 then e=(e+0x3df)%0xa9dd local e=96050 if not l[e]then l[e]=0x1 end else e=(e-0x20f)%0x71f6 n=n+1 local e=40640 if not l[e]then l[e]=0x1 s=tonumber;end end end else e=(e*0x11b)%0x7a66 n=n+1 while n<0x347 and e%0x24a6<0x1253 do n=n+1 e=(e+562)%48618 local a=n+e if(e%0x2352)<=0x11a9 then e=(e*0x280)%0x919f local e=8300 if not l[e]then l[e]=0x1 r=string;end elseif e%2~=0 then e=(e-0x8a)%0x9505 local e=40839 if not l[e]then l[e]=0x1 t=function(l)local e=0x01 local function n(n)e=e+n return l:sub(e-n,e-0x01)end while true do local l=n(0x01)if(l=="\5")then break end local e=r.byte(n(0x01))local e=n(e)if l=="\2"then e=o.aVtFwyJz(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then d[e]=function(n,e)return h(8,nil,h,e,n)end elseif l=="\4"then e=d[e]elseif l=="\0"then e=d[e][n(r.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end else e=(e*0x2e8)%0xb577 n=n+1 local e=24067 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\97\86\116\70\119\121\74\122\0\6\115\116\114\105\110\103\4\99\104\97\114\73\104\83\67\90\101\86\113\0\6\115\116\114\105\110\103\3\115\117\98\80\73\66\66\76\90\98\108\0\6\115\116\114\105\110\103\4\98\121\116\101\118\116\99\118\82\65\77\97\0\5\116\97\98\108\101\6\99\111\110\99\97\116\119\87\85\87\118\72\102\106\0\5\116\97\98\108\101\6\105\110\115\101\114\116\98\101\105\66\65\111\118\122\5";end end end end end e=(e*299)%27921 end t(f);local e={};for n=0x0,0xff do local l=o.IhSCZeVq(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local r=(function(a,t)local f,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local r=a while true do n[0x03][o.PIBBLZbl(t,e,(function()e=f+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#t while e<d+0x01 do n[0x02][l]=o.PIBBLZbl(t,e,(function()e=f+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.beiBAovz(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+r)%0x100)));r=a+r;end end return o.wWUWvHfj(n[0x01])end);t(r(6,"t0I(-gGiz1lu;FLfff"));t(r(77,"b)zxFMsoDm-hANlEhxsADAFPE)mhMxEEFEszzsN)DoLAlF--x{llm+M<)zss)-xDNlDEFNc<A3Fo)-hDsF)hh-mFl mohMs-)FAADM)-loDxMfEMmsFxlAMA)MxMlmm-FFEA-DEm)FhhD)zxNhomxhANDhsMlA-OMNhloMm)xDEl-MEM Eh-slxFNEDxzAElmOMEEFAoM-hlommxxDE--sM))xhxom)mAND-xsETDsMElmmMsNOMA9zwNsNDm-FhwEhNoxloAmD!FklFoFxmlM-x(xhsNAomxFEzmDxl?xh-MxzD-sooAhoNsDxhjoh-s-zDNmDFxDolxMMF!zhmsN)lADDWzAhl-)FWEFmDFo)DAD)fADl-D-xlEh-oEh)NAmolzzNomzMzEAhzs.)A-AoxzooszhFNEm-lMz;oAzMF!Ml-DFzmNmDxsn-sM-oDzNNoDEFDEsohMAE*hAoNx)hDzxNDEDmNMoWxhFoDx)NosM)NE-olMs lFEyszzAmDExsDsm-MxHmhAozEFNmDAzzAhmszN,7MU"));local e=(-18546+(function()local d,l=0,1;(function(e,n)e(e(n,e and e)and e(n,e),n(n,e))end)(function(e,n)if d>303 then return e end d=d+1 l=(l*513)%41069 if(l%1856)>928 then return e else return e(n(e,n),n(e,e))end return e(e(n,e),e(n,e))end,function(e,n)if d>159 then return e end d=d+1 l=(l+251)%29980 if(l%1160)<580 then l=(l-214)%953 return e else return e(e(e,n)and n(n,e),n(n,e))end return n(e(e,n and e),n(n,e))end)return l;end)())local u=o.JHzaSPGq or o.xormvSgh;local j=(getfenv)or(function()return _ENV end);local y=1;local d=2;local a=4;local t=3;local function p(m,...)local f=r(e,"2;&Px<.bqL:fndrI&<Pn<:bqLqfrd&ImcrLqfLnLr:;bP.<&.bq::;<:qILxf&d?PfbfLLf.fLrL+<;IP;b8qn:;nxdf%<IqPb<F.rqdfx:<I.;xPmdrIr;qP.<xdLI;;fP;rn;<&.xx.&dIrP;&P/<fqL:rLxdPreI&x&P;hq&fx&.7brrx&rxn..<fLbnxb*fP::nqr.<qq::Ld;Ln!*&;x&<LP&:b:IdI::;qPq<Pb.q<:;d1dIInd.xf<fqxL..nfbIb;<P&P<.<q;<nfF:fLqrqd&I{XrLxfrdnI.;bIn I&dq;:;nbrqId;dx<.;.d<qffd.r<A<&<id<dbIL:fq:LI.;xPx&;.dqd::n<fbX<I&Pd&fxI.dfb:LI;r<I:<.bdqbxx.&q!Lrnnd:Iq;.Px<&bSqr:nnfrqt.&x<xbLbrLnf:d:I.;xP&.&bqqn::nqr:?x&&x_qxqnL:fqd.I:;&P;xrb&q::ndqrx5&&Wxx<nbfLqf:r.I&;#&r<P.:qL:.nxr<4_;rPn<fbqL.fxrxI;mr&nx:.Lq.:xn&I&6.;nPf<qbLLxf&dXXr;;&:xL..q<:&n<drgrPxPq<LbxLLfBnrrn>:P;x..qq&:;frdnI:;qxf<xbPLEf&nnr:9q&.<x.&q_Lrfnd:I:;.Px.;bvqr:nnfrqJb&xx&.PbrLnf:dLI.;xP&<T");local n=0;o.yMmXQUAh(function()o.gZlpVxCa()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,c=h(0,h,e,f,o.vtcvRAMa);local function r()local n,l=o.vtcvRAMa(f,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local b=true;local b=0 local function g()local e=n();local n=n();local t=1;local d=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(d==b)then return n*0;else e=1;t=0;end;elseif(e==2047)then return(d==0)and(n*(1/0))or(n*(0/0));end;return o.aWvUqSsS(n,e-1023)*(t+(d/(2^52)));end;local z=n;local function k(n)local l;if(not n)then n=z();if(n==0)then return'';end;end;l=o.PIBBLZbl(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..o.PIBBLZbl(l,n,n)end return e;end;local b=#o.FvbcTPnk(s('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.zmHMwHmr('#',...)end local function p()local e={};local u={};local h={};local s={h,u,nil,e};local e=n()local f={}for d=1,e do local l=c();local e;if(l==3)then e=(c()~=#{});elseif(l==0)then local n=g();if b and o.SbALsGHR(o.FvbcTPnk(n),'.(\48+)$')then n=o.AssVLdHh(n);end e=n;elseif(l==2)then e=k();end;f[d]=e;end;for e=1,n()do u[e-(#{1})]=p();end;for u=1,n()do local e=c();if(l(e,1,1)==0)then local o=l(e,2,3);local c=l(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[t]=r();e[a]=r();elseif(o==#{1})then e[t]=n();elseif(o==m[2])then e[t]=n()-(2^16)elseif(o==m[3])then e[t]=n()-(2^16)e[a]=r();end;if(l(c,1,1)==1)then e[d]=f[e[d]]end if(l(c,2,2)==1)then e[t]=f[e[t]]end if(l(c,3,3)==1)then e[a]=f[e[a]]end h[u]=e;end end;s[3]=c();return s;end;local function _(l,e,n)local d=e;local d=n;return s(o.SbALsGHR(o.SbALsGHR(({o.yMmXQUAh(l)})[2],e),n))end local function ee(k,e,c)local function j(...)local r,j,s,p,m,n,f,g,b,z,_,l;local e=0;while-1<e do if 2<e then if 5<=e then if e==6 then e=-2;else l=h(7);end else if 2<e then repeat if e~=4 then g={};b={...};break;end;z=o.zmHMwHmr('#',...)-1;_={};until true;else g={};b={...};end end else if e>=1 then if e~=-3 then for l=44,72 do if 2>e then s=h(6,49,3,19,k);m=ne p=0;break;end;n=-41;f=-1;break;end;else n=-41;f=-1;end else r=h(6,62,1,98,k);j=h(6,77,2,82,k);end end e=e+1;end;for e=0,z do if(e>=s)then g[e-s]=b[e+1];else l[e]=b[e+1];end;end;local e=z-s+1 local e;local o;local function h(...)while true do end end while true do if n<-40 then n=n+42 end e=r[n];o=e[y];if o>11 then if 17<o then if o>20 then if 22>o then l[e[d]]=(e[t]~=0);else if o~=22 then l[e[d]]=c[e[t]];else local n=e[d];local d=l[e[t]];l[n+1]=d;l[n]=d[e[a]];end end else if 19>o then n=e[t];else if 18<o then repeat if 19<o then c[e[t]]=l[e[d]];break;end;local n=e[d];local d=l[e[t]];l[n+1]=d;l[n]=d[e[a]];until true;else c[e[t]]=l[e[d]];end end end else if 15<=o then if o>15 then if o<17 then l[e[d]]();else local n=e[d]local d,e=m(l[n](u(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;end else l(e[d],e[t]);end else if o<13 then c[e[t]]=l[e[d]];else if o>=9 then for n=43,60 do if o~=14 then l[e[d]]();break;end;do return end;break;end;else do return end;end end end end else if o>5 then if o>8 then if 10>o then l(e[d],e[t]);else if 11==o then local e=e[d]l[e]=l[e](u(l,e+1,f))else local n=e[d]local d,e=m(l[n](u(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;end end else if 7>o then if(l[e[d]]==e[a])then n=n+1;else n=e[t];end;else if 8~=o then local e=e[d]l[e]=l[e](u(l,e+1,f))else local o,b,z,k,s;for h=0,6 do if 2>=h then if 1<=h then if-3<h then repeat if h~=1 then l(e[d],e[t]);n=n+1;e=r[n];break;end;o=e[d];b=l[e[t]];l[o+1]=b;l[o]=b[e[a]];n=n+1;e=r[n];until true;else l(e[d],e[t]);n=n+1;e=r[n];end else l[e[d]]=c[e[t]];n=n+1;e=r[n];end else if h>4 then if h>=3 then for t=39,78 do if 6~=h then o=e[d]l[o]=l[o](u(l,o+1,f))n=n+1;e=r[n];break;end;l[e[d]]();break;end;else l[e[d]]();end else if h>=1 then for a=30,81 do if h<4 then l[e[d]]=(e[t]~=0);n=n+1;e=r[n];break;end;o=e[d]z,k=m(l[o](u(l,o+1,e[t])))f=k+o-1 s=0;for e=o,f do s=s+1;l[e]=z[s];end;n=n+1;e=r[n];break;end;else l[e[d]]=(e[t]~=0);n=n+1;e=r[n];end end end end end end end else if 3>o then if o>=1 then if 1~=o then l[e[d]]=(e[t]~=0);else l[e[d]]=c[e[t]];end else for o=0,3 do if o<2 then if o~=1 then l[e[d]]=(e[t]~=0);n=n+1;e=r[n];else c[e[t]]=l[e[d]];n=n+1;e=r[n];end else if o>-2 then repeat if 3>o then l[e[d]]=c[e[t]];n=n+1;e=r[n];break;end;if(l[e[d]]==e[a])then n=n+1;else n=e[t];end;until true;else l[e[d]]=c[e[t]];n=n+1;e=r[n];end end end end else if 4>o then do return end;else if 2<=o then repeat if o~=5 then n=e[t];break;end;if(l[e[d]]==e[a])then n=n+1;else n=e[t];end;until true;else n=e[t];end end end end end n=1+n;end;end;return j end;local t=0xff;local c={};local f=(1);local d='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(a)if r>0x29 then return a end r=r+1 e=(e+0x810-a)%0x2a return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x9e);end return true end)'LLBOj'and l[0x2](0x239+a))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd8);d={d..'\58 a',d};c[f]=p();f=f+((not o.BgzMXGTc)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'UycZA'and l[0x1](a+0xd5))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x18);t[2]=(t[2]*(_(function()c()end,u(d))-_(t[1],u(d))))+1;c[f]={};t=t[2];f=f+t;end return true end)'zsqzw'and l[0x3](a+0xd5))or a end),(function(d)if r>0x21 then return d end r=r+1 e=(e+0x5fc-d)%0x17 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe9);end return true end)'b__yR'and l[0x2](0x3be+d))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf0);end return true end)'UrUdY'and l[0x1](d+0x2c8))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x41);end return true end)'SbZLE'and l[0x3](d+0x118))or d end),(function(o)if r>0x2a then return o end r=r+1 e=(e+0xc3b-o)%0x3b return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x45);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'HMnTo'and l[0x1](0x141+o))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb6);end return true end)'dpPax'and l[0x3](o+0x3d0))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa);c[f]=j();f=f+t;end return true end)'QtjGr'and l[0x2](o+0x307))or o end)}l[0x3](0x14ac)end){};local e=ee(u(c));return e(...);end return p((function()local n={}local e=0x01;local l;if o.BgzMXGTc then l=o.BgzMXGTc(p)else l=''end if o.SbALsGHR(l,o.VpYseSMC)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,l,n,d,t,o)local o;if e<4 then if 1>=e then if e>=-1 then repeat if 0~=e then do return function(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;end;break;end;do return l(1),l(4,t,d,n,l),l(5,t,d,n)end;until true;else do return function(n,e,l)if l then local e=(n/2^(e-1))%2^((l-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;end else if 0<e then repeat if 3>e then do return 16777216,65536,256 end;break;end;do return l(1),l(4,t,d,n,l),l(5,t,d,n)end;until true;else do return 16777216,65536,256 end;end end else if e<=5 then if e~=3 then repeat if e>4 then local e=d;do return function()local n=l(n,e(e,e),e(e,e));e(1);return n;end;end;break;end;local e=d;local d,o,t=t(2);do return function()local r,f,l,n=l(n,e(e,e),e(e,e)+3);e(4);return(n*d)+(l*o)+(f*t)+r;end;end;until true;else local e=d;do return function()local n=l(n,e(e,e),e(e,e));e(1);return n;end;end;end else if 7<=e then if e>=5 then for l=26,53 do if 7<e then do return n(e,nil,n);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,l,d,t,n)if n then return e[n]elseif t then return e else e[l]=d end end})end break;end;else do return n(e,nil,n);end end else do return t[n]end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement