Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _DVJgUSMMoTHi = a; end)); return(function(u,...)local o;local d;local a;local r;local t;local b;local e=24915;local n=0;local l={};while n<929 do n=n+1;while n<0x9c and e%0x33d6<0x19eb do n=n+1 e=(e+996)%26404 local f=n+e if(e%0x37a6)<=0x1bd3 then e=(e*0x20b)%0x4f77 while n<0x159 and e%0x385c<0x1c2e do n=n+1 e=(e-110)%21158 local f=n+e if(e%0x4108)>0x2084 then e=(e+0x57)%0xab1c local e=87597 if not l[e]then l[e]=0x1 t=function(t)local e=0x01 local function l(n)e=e+n return t:sub(e-n,e-0x01)end while true do local n=l(0x01)if(n=="\5")then break end local e=a.byte(l(0x01))local e=l(e)if n=="\2"then e=o.ixRJOGgW(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then d[e]=function(n,e)return u(8,nil,u,e,n)end elseif n=="\4"then e=d[e]elseif n=="\0"then e=d[e][l(a.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end elseif e%2~=0 then e=(e+0x329)%0x43aa local e=64059 if not l[e]then l[e]=0x1 b=tonumber;end else e=(e-0x2e8)%0x8347 n=n+1 local e=88368 if not l[e]then l[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\105\120\82\74\79\71\103\87\0\6\115\116\114\105\110\103\4\99\104\97\114\100\122\74\76\109\112\76\102\0\6\115\116\114\105\110\103\3\115\117\98\83\103\121\99\66\66\70\102\0\6\115\116\114\105\110\103\4\98\121\116\101\83\118\122\72\108\85\108\71\0\5\116\97\98\108\101\6\99\111\110\99\97\116\77\79\122\103\86\87\69\79\0\5\116\97\98\108\101\6\105\110\115\101\114\116\98\105\87\106\80\88\99\105\5";end end end elseif e%2~=0 then e=(e+0x27c)%0xb44a while n<0x16d and e%0x1bc6<0xde3 do n=n+1 e=(e+536)%11223 local t=n+e if(e%0x143e)>=0xa1f then e=(e+0x35f)%0x25b0 local e=67861 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end elseif e%2~=0 then e=(e*0x389)%0xb223 local e=84201 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end else e=(e*0x2e8)%0x8d84 n=n+1 local e=19480 if not l[e]then l[e]=0x1 end end end else e=(e*0x1b5)%0x184c n=n+1 while n<0x288 and e%0x2b9a<0x15cd do n=n+1 e=(e*262)%38490 local d=n+e if(e%0x3404)<0x1a02 then e=(e*0x15e)%0xbfcc local e=47354 if not l[e]then l[e]=0x1 a=string;end elseif e%2~=0 then e=(e*0x13b)%0x1fa7 local e=73445 if not l[e]then l[e]=0x1 end else e=(e-0x3b3)%0x2bce n=n+1 local e=21512 if not l[e]then l[e]=0x1 o={};end end end end end e=(e-411)%18348 end t(r);local n={};for e=0x0,0xff do local l=o.dzJLmpLf(e);n[e]=l;n[l]=e;end local function c(e)return n[e];end local a=(function(f,a)local r,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local t=f while true do n[0x03][o.SgycBBFf(a,e,(function()e=r+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#a while e<d+0x01 do n[0x02][l]=o.SgycBBFf(a,e,(function()e=r+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.biWjPXci(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=f+t;end end return o.MOzgVWEO(n[0x01])end);t(a(197,"W_<3L+MEa2IPe#(NLT"));t(a(111,"BTb?P>nu.#-,;Idz#Tb.bn,.Pu;zn>dzTILd,_?#;I>-;nud .uzb;;I?bu-7;M..;T,,uP.IdP?I#u?zb,TPu-uzn.,.uT--b?.;z>V;-..d?unA.;-bnuPE,W##,b-,bP.Ib=Tz-uzb?-??#,,PIdnu,T#.??M;Td-uzu#zd-bbu>>PIInn.8;#>Tr,PTI-,>,I;.bdzPbI,I?>nzn.ey#-#bu;,P#I,unr6#njP,P>uI-P-zu#?,.P;b;;;>,zI.#TInzb?-bPudPuuz?##b?>#d-ddn#eb#dcT,?bn;>nndun-z#P>I>#d>zz..zT#u;bP-,>T.bTuTP-9?>;u>nIduPzd#TkP.;?bdYn.7b.n,NPnPn;P>nzTu,-I-I?u;-P;Izu.d##,q,,#b?,uu_I;b-,I,IPuI->;dz..b?-,bAIb?,d#unaP?-;;;.>,d?u#Tq-P?f,Pb?;#>TI>.?,#P;P-;In>dzudbp#??*I?n>IP>#TuuI;>>->PI#uI+b?&bb,#PIIdubIn#iTb#??,IbPdd-Td"));local e=(-1557+(function()local o,d=0,1;(function(l,e,d,n)e(e(e,n,l,n),d(l,e,e,e),e(l,e,e,l),e(e,n and e,n and e,n))end)(function(l,t,e,n)if o>124 then return l end o=o+1 d=(d+44)%12562 if(d%1412)>706 then return n else return e(l(e,t and e,n,n),t(t,e,t,t),e(n,e,l,n and e),e(e and e,t,e,l)and l(e and l,n and t,n,n and e))end return n(l(n,n,n and n,e)and t(n,n and n,l and e,l),l(l,l,n,n)and e(t,t and e,l,t),t(e,l,e,l),l(e,n,e,l))end,function(l,n,t,e)if o>357 then return l end o=o+1 d=(d-562)%3594 if(d%628)>=314 then return e(t(n,n and t,t,n),l(e,t,n,n and e)and l(e,l,e,t),l(l,n and l,l and n,e)and e(e,e and e,n,t),n(t,n,n,e))else return l end return e end,function(e,l,t,n)if o>489 then return t end o=o+1 d=(d+648)%24785 if(d%850)<425 then d=(d-739)%2077 return l else return n(l(t and l,n,l,e),t(e,e,e and e,e),e(n,n,n,e)and n(l,n,e and n,n),n(e and e,e,e and e,e))end return l(t(t and l,l,e,e)and e(t,l,e,t),e(n,l,l,n),n(l and e,t,l,t),e(n,t,n,t))end,function(l,e,t,n)if o>136 then return e end o=o+1 d=(d*124)%4209 if(d%278)<=139 then return n else return e(e(n and l,e,e,e)and n(e,t,n,l),n(e,e,n,n),l(e,l,e and l,e),t(l,n,l and t,e))end return n(n(l and e,t,t,e and l),n(t,n,n,n),n(t,e,n,t),l(n and t,l and e,e,e))end)return d;end)())local le=(getfenv)or(function()return _ENV end);local c=o.ulPqIfb_ or o.KlKhADlG;local t=2;local r=4;local de=1;local d=3;local function g(s,...)local f=a(e,"HYy# )NKqZo7,5L?o)#,5oKqYK7L)y?0qLZq#Z,ZNoYK7N)yLKqoyY)ZY5Z #y5!,yK Y#77ANLoq7y,,#Y,YYZZ ZZ qyyy75NkL?q7#o,ZNN,>7) )LLq85NoYNY??Z,Y?,?N7,NZoY)qYy)7,)o?q5Loq NLa))YY7LLZ7oy ,yN:NNYnoL qLZ LLYK?)#?#ZZ#o,?N?YK7##?ooq5yq7K)K?K)?#iZ5 ;5LK7Y7LN))?#q5#v,LNNkZoq )YF7Y 77q)5yNZo# ,,oq ?5ZYK,Y)y?<qLq7dL7L)jU7ZK##,7NZyZo,#L?5##5 NLx,ooo? K?YqK,YKK?,Zo#qy#L#qYYLoY)YL5qKYZ5qK TZo, #L5N1Y?7q)N?)Z,355LK,Yq LyqMYL,,)o?qZN# 5LK;OLo, 7LqqNy 5 K ?LZ,#o5?KNY 7yNy?Kq,yo,qN7* oy Ta qoYo7q)N?oZy#Y,LNLmoo,)5L qyyl, ),?7Zq#oL7KyYmoL)#LoqZyN, N5ltZL#,57KqYN7 N *NqLy,,oNZTNo y?yqNY,77)q?,Z #y52qLyNoo ZLNq)yy,#)LVLoq#q5ZK YN7w LL,qo ,NNq6yoY#L5,KoYq,_) ?#ZF#y,,NoPqoN NLyq/YL7,)o?oZN# 5LK!6Lo, 7LqqKy ,yN7?LZ,#o5ZKNY 7y)}");local n=0;o.qEJSAotC(function()o.FgIWgWIG()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,h=u(0,u,e,f,o.SvzHlUlG);local function a()local n,l=o.SvzHlUlG(f,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local y=true;local y=0 local function k()local d=n();local e=n();local t=1;local d=(l(e,1,20)*(2^32))+d;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(d==y)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return o.ZmEBaQfB(e,n-1023)*(t+(d/(2^52)));end;local z=n;local function g(n)local l;if(not n)then n=z();if(n==0)then return'';end;end;l=o.SgycBBFf(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+y),#l do e=e..o.SgycBBFf(l,n,n)end return e;end;local y=#o.iKBWtktg(b('\49.\48'))~=1 local e=n;local function _(...)return{...},o.VbtuSGtI('#',...)end local function m()local u={};local e={};local b={};local c={b,u,nil,e};local e=n()local f={}for d=1,e do local l=h();local n;if(l==2)then n=(h()~=#{});elseif(l==3)then local e=k();if y and o.YZbfsLhh(o.iKBWtktg(e),'.(\48+)$')then e=o.En_OflWb(e);end n=e;elseif(l==1)then n=g();end;f[d]=n;end;for e=1,n()do u[e-(#{1})]=m();end;for c=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local u=l(e,4,6);local e={a(),a(),nil,nil};if(o==0)then e[d]=a();e[r]=a();elseif(o==#{1})then e[d]=n();elseif(o==s[2])then e[d]=n()-(2^16)elseif(o==s[3])then e[d]=n()-(2^16)e[r]=a();end;if(l(u,1,1)==1)then e[t]=f[e[t]]end if(l(u,2,2)==1)then e[d]=f[e[d]]end if(l(u,3,3)==1)then e[r]=f[e[r]]end b[c]=e;end end;c[3]=h();return c;end;local function p(l,n,e)local d=n;local d=e;return b(o.YZbfsLhh(o.YZbfsLhh(({o.qEJSAotC(l)})[2],n),e))end local function ne(z,e,h)local function ee(...)local a,j,b,g,s,l,f,p,k,y,m,n;local e=0;while-1<e do if 3>e then if e<=0 then a=u(6,18,1,43,z);j=u(6,20,2,41,z);else if e~=0 then for n=37,70 do if 2~=e then b=u(6,71,3,73,z);s=_ g=0;break;end;l=-41;f=-1;break;end;else b=u(6,71,3,73,z);s=_ g=0;end end else if e>4 then if e==5 then n=u(7);else e=-2;end else if 0<=e then for n=48,69 do if 4>e then p={};k={...};break;end;y=o.VbtuSGtI('#',...)-1;m={};break;end;else y=o.VbtuSGtI('#',...)-1;m={};end end end e=e+1;end;for e=0,y do if(e>=b)then p[e-b]=k[e+1];else n[e]=k[e+1];end;end;local e=y-b+1 local e;local o;local function u(...)while true do end end while true do if l<-40 then l=l+42 end e=a[l];o=e[de];if o>=12 then if o>17 then if 20<o then if o>=22 then if 21<=o then repeat if o<23 then n[e[t]]=h[e[d]];break;end;l=e[d];until true;else l=e[d];end else if(n[e[t]]==e[r])then l=l+1;else l=e[d];end;end else if 18>=o then n[e[t]]=(e[d]~=0);else if o~=19 then local l=e[t]local d,e=s(n[l](c(n,l+1,e[d])))f=e+l-1 local e=0;for l=l,f do e=e+1;n[l]=d[e];end;else local e=e[t]n[e]=n[e](c(n,e+1,f))end end end else if 14<o then if o<=15 then h[e[d]]=n[e[t]];else if 15~=o then repeat if o<17 then local t=e[t];local l=n[e[d]];n[t+1]=l;n[t]=l[e[r]];break;end;do return end;until true;else do return end;end end else if 13>o then for o=0,3 do if 2<=o then if 3==o then if(n[e[t]]==e[r])then l=l+1;else l=e[d];end;else n[e[t]]=h[e[d]];l=l+1;e=a[l];end else if-3<o then repeat if 0~=o then h[e[d]]=n[e[t]];l=l+1;e=a[l];break;end;n[e[t]]=(e[d]~=0);l=l+1;e=a[l];until true;else h[e[d]]=n[e[t]];l=l+1;e=a[l];end end end else if o==14 then local o,a,r,u,f;local l=0;while l>-1 do if 3>l then if l<1 then o=e;else if l>-3 then repeat if 1~=l then r=d;break;end;a=t;until true;else r=d;end end else if l<=4 then if-1<=l then repeat if l~=3 then f=o[a];break;end;u=o[r];until true;else f=o[a];end else if l==6 then l=-2;else n(f,u);end end end l=l+1 end else l=e[d];end end end end else if 5>=o then if o<3 then if 0>=o then n[e[t]]=(e[d]~=0);else if 0<=o then for l=36,72 do if 2>o then h[e[d]]=n[e[t]];break;end;local l=e[t];local d=n[e[d]];n[l+1]=d;n[l]=d[e[r]];break;end;else local t=e[t];local l=n[e[d]];n[t+1]=l;n[t]=l[e[r]];end end else if o>=4 then if o~=1 then for l=32,76 do if o~=5 then n[e[t]]=h[e[d]];break;end;n[e[t]]();break;end;else n[e[t]]=h[e[d]];end else local e=e[t]n[e]=n[e](c(n,e+1,f))end end else if 9>o then if o>=7 then if 8==o then local o,y,k,z,b;for u=0,6 do if u<3 then if 0<u then if-2<u then for f=39,77 do if 2>u then o=e[t];y=n[e[d]];n[o+1]=y;n[o]=y[e[r]];l=l+1;e=a[l];break;end;n(e[t],e[d]);l=l+1;e=a[l];break;end;else n(e[t],e[d]);l=l+1;e=a[l];end else n[e[t]]=h[e[d]];l=l+1;e=a[l];end else if 4<u then if u<6 then o=e[t]n[o]=n[o](c(n,o+1,f))l=l+1;e=a[l];else n[e[t]]();end else if 2<=u then for r=39,55 do if 4>u then n[e[t]]=(e[d]~=0);l=l+1;e=a[l];break;end;o=e[t]k,z=s(n[o](c(n,o+1,e[d])))f=z+o-1 b=0;for e=o,f do b=b+1;n[e]=k[b];end;l=l+1;e=a[l];break;end;else n[e[t]]=(e[d]~=0);l=l+1;e=a[l];end end end end else local l=e[t]local d,e=s(n[l](c(n,l+1,e[d])))f=e+l-1 local e=0;for l=l,f do e=e+1;n[l]=d[e];end;end else n(e[t],e[d]);end else if 10>o then if(n[e[t]]==e[r])then l=l+1;else l=e[d];end;else if o~=8 then repeat if o<11 then n[e[t]]();break;end;do return end;until true;else do return end;end end end end end l=1+l;end;end;return ee end;local t=0xff;local u={};local r=(1);local d='';(function(n)local l=n local a=0x00 local e=0x00 l={(function(o)if a>0x2f then return o end a=a+1 e=(e+0xcba-o)%0x35 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xad);end return true end)'ZDRnm'and l[0x1](0x3a7+o))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x47);u[r]=le();r=r+t;end return true end)'_Aeqs'and l[0x2](o+0x91))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x69);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'_aZpp'and l[0x3](o+0x171))or o end),(function(o)if a>0x24 then return o end a=a+1 e=(e+0xd26-o)%0x12 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x3f);end return true end)'aIrnG'and l[0x3](0x335+o))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x28);t[2]=(t[2]*(p(function()u()end,c(d))-p(t[1],c(d))))+1;u[r]={};t=t[2];r=r+t;end return true end)'dsbPr'and l[0x1](o+0x198))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x1);end return true end)'gqQTw'and l[0x2](o+0x222))or o end),(function(f)if a>0x1f then return f end a=a+1 e=(e+0x5ad-f)%0x2d return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x67);end return true end)'FVIXn'and l[0x3](0x369+f))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x49);end return true end)'UzhxP'and l[0x1](f+0x37f))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x80);d={d..'\58 a',d};u[r]=m();r=r+((not o.lGngMiyM)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'sMIUg'and l[0x2](f+0x3be))or f end)}l[0x1](0x2589)end){};local e=ne(c(u));return e(...);end return g((function()local n={}local e=0x01;local l;if o.lGngMiyM then l=o.lGngMiyM(g)else l=''end if o.YZbfsLhh(l,o.dMzDFGxC)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(l,e,n,t,d,o)local o;if l>=4 then if 6>l then if l==4 then local l=t;local d,t,o=d(2);do return function()local r,a,n,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*d)+(n*t)+(a*o)+r;end;end;else local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;end else if 6<l then if 3~=l then for e=17,64 do if 8~=l then do return setmetatable({},{['__\99\97\108\108']=function(e,l,t,d,n)if n then return e[n]elseif d then return e else e[l]=t end end})end break;end;do return n(l,nil,n);end break;end;else do return n(l,nil,n);end end else do return d[n]end;end end else if 2>l then if-2~=l then repeat if 1>l then do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;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;until true;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end else if l<3 then do return 16777216,65536,256 end;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement