Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _toAyXaiteSKW = a; end)); return(function(u,...)local r;local f;local o;local d;local t;local s;local e=24915;local n=0;local l={};while n<956 do n=n+1;while n<0x2cb and e%0x4598<0x22cc do n=n+1 e=(e*943)%5472 local a=n+e if(e%0x2876)>0x143b then e=(e+0x3d7)%0x277f while n<0x143 and e%0x3cb4<0x1e5a do n=n+1 e=(e-768)%27801 local a=n+e if(e%0x2012)<=0x1009 then e=(e+0x19d)%0x7ce7 local e=22509 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\90\77\103\81\71\90\115\83\0\6\115\116\114\105\110\103\4\99\104\97\114\97\73\122\72\82\109\82\72\0\6\115\116\114\105\110\103\3\115\117\98\109\111\88\113\121\95\97\119\0\6\115\116\114\105\110\103\4\98\121\116\101\114\107\107\110\65\76\77\99\0\5\116\97\98\108\101\6\99\111\110\99\97\116\111\82\76\66\118\72\72\74\0\5\116\97\98\108\101\6\105\110\115\101\114\116\104\108\68\89\87\85\74\105\5";end elseif e%2~=0 then e=(e+0x13b)%0xbc58 local e=91217 if not l[e]then l[e]=0x1 d=function(d)local e=0x01 local function l(n)e=e+n return d:sub(e-n,e-0x01)end while true do local n=l(0x01)if(n=="\5")then break end local e=r.byte(l(0x01))local e=l(e)if n=="\2"then e=o.ZMgQGZsS(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(e,n)return u(8,nil,u,n,e)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][l(r.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end else e=(e-0xec)%0x19a7 n=n+1 local e=71475 if not l[e]then l[e]=0x1 s=tonumber;end end end elseif e%2~=0 then e=(e-0x19d)%0x1145 while n<0x245 and e%0x4164<0x20b2 do n=n+1 e=(e+368)%20787 local d=n+e if(e%0x1284)>=0x942 then e=(e-0x53)%0x35a2 local e=62007 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e*0x20b)%0x554d local e=32700 if not l[e]then l[e]=0x1 r=string;end else e=(e*0x135)%0x222b n=n+1 local e=29788 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end end end else e=(e+0xf5)%0xa30b n=n+1 while n<0x12c and e%0x2998<0x14cc do n=n+1 e=(e+23)%22206 local d=n+e if(e%0x3b3c)<0x1d9e then e=(e+0x205)%0x77af local e=7915 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e+0x32b)%0xaf1 local e=54832 if not l[e]then l[e]=0x1 end else e=(e*0x210)%0x1bde n=n+1 local e=25351 if not l[e]then l[e]=0x1 end end end end end e=(e-230)%47541 end d(f);local n={};for e=0x0,0xff do local l=o.aIzHRmRH(e);n[e]=l;n[l]=e;end local function c(e)return n[e];end local r=(function(a,r)local f,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=a while true do n[0x03][o.moXqy_aw(r,e,(function()e=f+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#r while e<t+0x01 do n[0x02][l]=o.moXqy_aw(r,e,(function()e=f+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.hlDYWUJi(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=a+d;end end return o.oRLBvHHJ(n[0x01])end);d(r(10,"{NvwKpE83%X72Czii7"));d(r(4,"Bjp^E5L_T(rCI+HWWIWHL_LE5H5j5pE_HD^IE(^+^IArv(pCjj0WppW^HWrIr(j*WWW(vaWIW+W^++I+Ho+ICC+IL+L++E+pI5ILIT(+C_(ETLC^T+_+rT^d^p(C(T(pT5TL_Cj5_(L(_TL^LE^(ELET5p^I^IpL5j+T+T^+p+^IpII5pTjIj(pTjID(fWW62HsCW+WrHCTI(KW^HjHIHj+5HMI(+TIjCHIEC(CIIpIpC(TCTjrIrC^E^^_HT(T^(*T_TLE^LWLp_+5rEIE_EILTW!HI5CEjE5EIELpWjEEppHG_p^p(CLCjH5jrj5zEH(W=W(WH+HTITIWEHCHCHTHp+5+LICCur^IECICLrWC^CCE*EjrI(5(p(TT+pr(5TrTT_5_^__55_j_LECLIETL_E^HIHr55ErET^5^^^_jp^_p5WHbWpHj5j+rIr(jYQHNj1p=E+EHfW(HWH_HEIsH(_8LH+_I5ITC+C_IE(jTrrr(jT(TjrL__pIpI(jTj(NTZj(_L_T___^_pLT5W5r^j^HEI^(^_Hj"));local e=(-25675+(function()local d,l=0,1;(function(n,e,t,l)e(e(e,e,n and e,l),e(l,n and e,t,e),e(l,n,t,e),e(n,n,e,l))end)(function(o,t,n,e)if d>277 then return o end d=d+1 l=(l*678)%44870 if(l%318)>159 then l=(l+614)%36391 return n(e(e,n and t,e,e),n(t,n,e,n),e(n,e,e,n),e(e,e,n,t))else return e end return t end,function(o,t,n,e)if d>436 then return o end d=d+1 l=(l-659)%26100 if(l%312)<=156 then return e(n(e,e,e,n),t(e,e,o,t),e(t,n,n,t),t(o,t,n,n))else return o end return o end,function(e,n,o,t)if d>212 then return e end d=d+1 l=(l-28)%39589 if(l%1354)<677 then return o(n(e and n,t,o,n),t(t,e,e,t),n(o,t,e and t,n and o),e(e,n,n and o,e))else return e end return o end,function(o,t,n,e)if d>216 then return e end d=d+1 l=(l+102)%26917 if(l%1814)<=907 then l=(l+92)%48968 return n else return n(o(e and e,o,e,e),e(e,o,o,n),o(o and n,e and t,n,t),n(e,t,o,n)and e(o,e,n,t))end return t(e(n,o,t and e,o)and t(t,t,n,n),e(n and t,n,t,t),e(n,e,e,t and n),e(n,t,e,e)and t(n,e,t,e))end)return l;end)())local h=o.JseBWzeq or o.MmvOtTwW;local ne=(getfenv)or(function()return _ENV end);local d=2;local ee=1;local f=4;local t=3;local function y(b,...)local c=r(e,"PJ2;ifTa #>Fx8+6f#>i6Ti #F6#;+#A+2#;6>iaTF6f2T J8F; aFFFHfT;f68a52fi>TixF2bfTJT)6 i8>2+86>>;86i;i2+i; a8+2JaJ8iJaT aTJ6T;xALTJe 6=;ff>T88iJ#J>E2 faaax6J>TxF+f 8T2 aT#6z6aNi6>>62ii#Tfi>#+8i2>;6TiT 6+T;JJ8a2xSJ2TiJ8T#xaJJ66T#>26iiT+ff#>F6x;;#a+a;faF++;+ a8+2# a>+2JT+x^J;T+#;J T>F>#FD8;+#N+2#x6>ix#>+6) i6>J;iaa8F2+aJxgJ#aM 2S#TaFaxFT<>JC#J; #68fJ 8xL;FTi> 8iJ T>Fx:+TiF24ifT>#6>ix#+N2fJ#i+T; #n8x2+ <+i;JaTx J>T8F+JGT28>J2f >>6xfi>)6;ii# + ;+>J8+;3 28>2Ta#x>Jxaix^J2TiFa, f>>xJcf>>26iiT#x+>;x +62;# i8a2 a6xxJ+aU+22 TTF#:>f8>+!;f2FTJ;i #8+xif#*+2;i T622>a8x+2;a2xiJTT x+zxf+FX_2fi> 6 i>>;++iA#2+f;T #8>2x#J8122aixaJ T>FxO+T^F25ifT");local n=0;o.qkYMddGl(function()o.r_HzjGgq()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,a=u(0,u,e,c,o.rkknALMc);local function r()local n,l=o.rkknALMc(c,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local _=true;local _=0 local function j()local t=n();local e=n();local d=1;local t=(l(e,1,20)*(2^32))+t;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(t==_)then return e*0;else n=1;d=0;end;elseif(n==2047)then return(t==0)and(e*(1/0))or(e*(0/0));end;return o.akPrsij_(e,n-1023)*(d+(t/(2^52)));end;local k=n;local function p(n)local l;if(not n)then n=k();if(n==0)then return'';end;end;l=o.moXqy_aw(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+_),#l do e=e..o.moXqy_aw(l,n,n)end return e;end;local _=#o.PGlhfckw(s('\49.\48'))~=1 local e=n;local function g(...)return{...},o.EBfQMIrG('#',...)end local function m()local s={};local u={};local e={};local h={u,s,nil,e};local e=n()local c={}for t=1,e do local l=a();local n;if(l==3)then n=(a()~=#{});elseif(l==2)then local e=j();if _ and o.ARXfTXFu(o.PGlhfckw(e),'.(\48+)$')then e=o.lgfARdUW(e);end n=e;elseif(l==1)then n=p();end;c[t]=n;end;for h=1,n()do local e=a();if(l(e,1,1)==0)then local o=l(e,2,3);local a=l(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[t]=r();e[f]=r();elseif(o==#{1})then e[t]=n();elseif(o==b[2])then e[t]=n()-(2^16)elseif(o==b[3])then e[t]=n()-(2^16)e[f]=r();end;if(l(a,1,1)==1)then e[d]=c[e[d]]end if(l(a,2,2)==1)then e[t]=c[e[t]]end if(l(a,3,3)==1)then e[f]=c[e[f]]end u[h]=e;end end;for e=1,n()do s[e-(#{1})]=m();end;h[3]=a();return h;end;local function y(l,n,e)local t=n;local t=e;return s(o.ARXfTXFu(o.ARXfTXFu(({o.qkYMddGl(l)})[2],n),e))end local function z(p,e,a)local function m(...)local r,z,s,y,b,n,c,k,_,j,m,l;local e=0;while-1<e do if e<3 then if e<=0 then r=u(6,78,1,82,p);z=u(6,74,2,2,p);else if e>=-2 then for l=26,55 do if e~=1 then n=-41;c=-1;break;end;s=u(6,23,3,95,p);b=g y=0;break;end;else s=u(6,23,3,95,p);b=g y=0;end end else if e>4 then if 4<=e then repeat if e~=6 then l=u(7);break;end;e=-2;until true;else l=u(7);end else if 1<=e then for n=49,82 do if e<4 then k={};_={...};break;end;j=o.EBfQMIrG('#',...)-1;m={};break;end;else k={};_={...};end end end e=e+1;end;for e=0,j do if(e>=s)then k[e-s]=_[e+1];else l[e]=_[e+1];end;end;local e=j-s+1 local e;local o;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=r[n];o=e[ee];if 12>o then if o>5 then if 9>o then if o<7 then do return end;else if o>3 then for u=28,59 do if o>7 then if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;break;end;local o,s,p,_,u;l[e[d]]=a[e[t]];n=n+1;e=r[n];o=e[d];s=l[e[t]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];l(e[d],e[t]);n=n+1;e=r[n];o=e[d]p,_=b(l[o](h(l,o+1,e[t])))c=_+o-1 u=0;for e=o,c do u=u+1;l[e]=p[u];end;n=n+1;e=r[n];o=e[d]l[o]=l[o](h(l,o+1,c))n=n+1;e=r[n];l[e[d]]();n=n+1;e=r[n];do return end;break;end;else if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;end end else if o>9 then if o>6 then for r=16,57 do if o<11 then l[e[d]]=a[e[t]];break;end;if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;break;end;else l[e[d]]=a[e[t]];end else local e=e[d]l[e]=l[e](h(l,e+1,c))end end else if o<=2 then if 0<o then if 1~=o then a[e[t]]=l[e[d]];else l[e[d]]=(e[t]~=0);end else local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[f]];end else if o<=3 then l[e[d]]();else if 1<=o then for c=25,89 do if o~=4 then do return end;break;end;for o=0,3 do if o<=1 then if o>0 then a[e[t]]=l[e[d]];n=n+1;e=r[n];else l[e[d]]=(e[t]~=0);n=n+1;e=r[n];end else if o>-2 then repeat if 2~=o then if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;break;end;l[e[d]]=a[e[t]];n=n+1;e=r[n];until true;else if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;end end end break;end;else for o=0,3 do if o<=1 then if o>0 then a[e[t]]=l[e[d]];n=n+1;e=r[n];else l[e[d]]=(e[t]~=0);n=n+1;e=r[n];end else if o>-2 then repeat if 2~=o then if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;break;end;l[e[d]]=a[e[t]];n=n+1;e=r[n];until true;else if(l[e[d]]~=e[f])then n=n+1;else n=e[t];end;end end end end end end end else if 18>o then if 15<=o then if o>=16 then if 14~=o then repeat if o~=17 then l(e[d],e[t]);break;end;n=e[t];until true;else n=e[t];end else local n=e[d]local t,e=b(l[n](h(l,n+1,e[t])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;end else if o>12 then if o>12 then repeat if 14~=o then a[e[t]]=l[e[d]];break;end;l[e[d]]=a[e[t]];until true;else l[e[d]]=a[e[t]];end else local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[f]];end end else if 20>=o then if 18>=o then l[e[d]]=(e[t]~=0);else if o<20 then local e=e[d]l[e]=l[e](h(l,e+1,c))else local n=e[d]local t,e=b(l[n](h(l,n+1,e[t])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;end end else if o<22 then n=e[t];else if o>=20 then repeat if 23>o then l[e[d]]();break;end;local o,a,f,r,c;local n=0;while n>-1 do if 3>n then if 0>=n then o=e;else if n>1 then f=t;else a=d;end end else if n<5 then if 2<n then for e=49,62 do if n>3 then c=o[a];break;end;r=o[f];break;end;else r=o[f];end else if 1~=n then for e=33,62 do if 6~=n then l(c,r);break;end;n=-2;break;end;else n=-2;end end end n=n+1 end until true;else l[e[d]]();end end end end end n=1+n;end;end;return m end;local t=0xff;local c={};local r=(1);local d='';(function(n)local l=n local f=0x00 local e=0x00 l={(function(o)if f>0x24 then return o end f=f+1 e=(e+0x657-o)%0xd return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x15);end return true end)'cxFgi'and l[0x1](0x12e+o))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x8b);end return true end)'VHySs'and l[0x3](o+0x1f7))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc6);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'WcYqP'and l[0x2](o+0x36d))or o end),(function(a)if f>0x26 then return a end f=f+1 e=(e+0x97b-a)%0xa return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x2e);c[r]=ne();r=r+t;end return true end)'yAEyt'and l[0x1](0x262+a))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x62);end return true end)'noioX'and l[0x2](a+0x332))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc3);d={d..'\58 a',d};c[r]=m();r=r+((not o.BEkUWnCC)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'XVzpM'and l[0x3](a+0xc2))or a end),(function(o)if f>0x2c then return o end f=f+1 e=(e+0x1320-o)%0x4f return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xad);end return true end)'SjXbA'and l[0x1](0x2bc+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x71);t[2]=(t[2]*(y(function()c()end,h(d))-y(t[1],h(d))))+1;c[r]={};t=t[2];r=r+t;end return true end)'pkFUs'and l[0x2](o+0x222))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x28);end return true end)'pHdQV'and l[0x3](o+0x3c3))or o end)}l[0x1](0xb13)end){};local e=z(h(c));return e(...);end return y((function()local n={}local e=0x01;local l;if o.BEkUWnCC then l=o.BEkUWnCC(y)else l=''end if o.ARXfTXFu(l,o.MkLBsQEt)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 3>=l then if 2>l then if l>-3 then for o=37,85 do if l>0 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 e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end else if l~=-1 then for o=33,98 do if l~=3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end end else if 6<=l then if l<7 then do return d[n]end;else if 7==l then do return setmetatable({},{['__\99\97\108\108']=function(e,d,t,l,n)if n then return e[n]elseif l then return e else e[d]=t end end})end else do return n(l,nil,n);end end end else if l>0 then for o=40,58 do if l~=5 then local l=t;local d,t,o=d(2);do return function()local f,e,n,r=e(n,l(l,l),l(l,l)+3);l(4);return(r*d)+(n*t)+(e*o)+f;end;end;break;end;local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;break;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 end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement