Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _bbvICZxbngLW = a; end)); return(function(u,...)local r;local s;local d;local o;local t;local c;local e=24915;local n=0;local l={};while n<771 do n=n+1;while n<0x17f and e%0x4878<0x243c do n=n+1 e=(e+69)%16932 local f=n+e if(e%0x9b2)<0x4d9 then e=(e+0x337)%0x524e while n<0x340 and e%0x2cd8<0x166c do n=n+1 e=(e-583)%26659 local f=n+e if(e%0x3912)>=0x1c89 then e=(e+0x377)%0x4f92 local e=46186 if not l[e]then l[e]=0x1 o=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=d.kqMegmES(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then t[e]=function(e,n)return u(8,nil,u,n,e)end elseif l=="\4"then e=t[e]elseif l=="\0"then e=t[e][n(r.byte(n(0x01)))];end local n=n(0x08)d[n]=e end end end elseif e%2~=0 then e=(e+0x1b9)%0x6999 local e=2272 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\107\113\77\101\103\109\69\83\0\6\115\116\114\105\110\103\4\99\104\97\114\74\66\87\101\101\103\116\119\0\6\115\116\114\105\110\103\3\115\117\98\111\109\90\74\90\101\80\71\0\6\115\116\114\105\110\103\4\98\121\116\101\69\104\99\108\90\122\105\66\0\5\116\97\98\108\101\6\99\111\110\99\97\116\108\110\113\66\98\111\89\81\0\5\116\97\98\108\101\6\105\110\115\101\114\116\103\65\84\87\71\87\88\115\5";end else e=(e-0x19d)%0x8d7d n=n+1 local e=25444 if not l[e]then l[e]=0x1 end end end elseif e%2~=0 then e=(e*0x27f)%0xb3be while n<0x3a4 and e%0x23a6<0x11d3 do n=n+1 e=(e-720)%9254 local o=n+e if(e%0x2692)<0x1349 then e=(e+0xbf)%0xb9a7 local e=99239 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e+0x1c9)%0xa739 local e=50440 if not l[e]then l[e]=0x1 end else e=(e-0x6b)%0x5df5 n=n+1 local e=5913 if not l[e]then l[e]=0x1 s=tonumber;end end end else e=(e+0x26f)%0x4f20 n=n+1 while n<0x345 and e%0x4cf6<0x267b do n=n+1 e=(e+318)%36669 local o=n+e if(e%0xba0)>0x5d0 then e=(e+0x1f7)%0x31ad local e=28714 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end elseif e%2~=0 then e=(e-0x15d)%0x7d19 local e=34088 if not l[e]then l[e]=0x1 d={};end else e=(e*0x2dd)%0x4fa8 n=n+1 local e=22829 if not l[e]then l[e]=0x1 r=string;end end end end end e=(e*620)%23860 end o(c);local n={};for e=0x0,0xff do local l=d.JBWeegtw(e);n[e]=l;n[l]=e;end local function a(e)return n[e];end local l=(function(f,o)local c,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local r=f while true do n[0x03][d.omZJZePG(o,e,(function()e=c+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#o while e<t+0x01 do n[0x02][l]=d.omZJZePG(o,e,(function()e=c+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 d.gATWGWXs(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+r)%0x100)));r=f+r;end end return d.lnqBboYQ(n[0x01])end);o(l(108,"sF4GP2f?:kDmt3n*kk"));o(l(248,"zj_^C9TY=Go0t()+M=jT=0GCGoGGoToYCt0Ct(t((=0+))(x+T++O)+9+_0C0(^D_0^jCCCt9_9o^+Yo99YoG_T^_G^9o=0_0j0)tto9(o0_ta+=(9N9L9oho)_^_t^_^j^)^+)9999jTtT^Yg9GT_G TooTYGGTtj9#9tt(tG)C) =9+C+C+(j=j=j)j)ijC__Y_o^Z^9+CQCY^T(=C=9=9GtGjotojoo0t0(t_0t(Gt++_+o(Y+joCo+bTj(_^^t^+Coj^9GC+C=Y^Y)T_==G^_t^Co+oj0jtC(qtC()()t_t0(o(=Gooj)jj9j_#YjYjtjGCtT_+C3vYCYY=^=tG_GjG)G+G_t_oGoto^t((j(+=e=(!C+G:_jCj90)^9^TCQ^GC^9^99^tTC9_TYY+G=Yt^C^)090Tt10Gt^(^0(tt(+fg)oqo)Tj00C0(^1^o^GCT9CCYCjTT9oYt=9T(Yj_t^To0o90C0900(Cot)=0)tG(tmo!))_o=0C_9_j^t^=((CT9C9+TYY_Yj909tYj=_G^0j0_C("));local e=(-33575+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>101 then return e end l=l+1 n=(n+330)%48237 if(n%674)<=337 then return e(e(e)and e(e and e))else return e end return e end)return n;end)())local h=d.MT_xZrFs or d.eDdJWgxT;local y=(getfenv)or(function()return _ENV end);local ee=1;local t=2;local o=3;local f=4;local function g(_,...)local c=l(e,"eS9*2Uc_4r< ^K85 SU258<4U2SU<cUF5<5S Kc_Sfr5U R*<r2_S9 <U a<<Kc*89<KU95^<_U<K_ 2U8{c2bB5r9*^8c82<92K>SU4245U<92U<<< *55 U92^54r5288rrS2^8_rQ5c5_r*248c24S58 rU*8^K4r*Sr4_455_49_^<_2S8S;8crY*c __5*4_VS^^9c^Sc9_^ 4S9*c<S5 ^ccSXSr^c_H98< 25SRK4c^99^UU2.rU8*< DU<O2Sc^^_cS^^r*<Kr4*c*)5^Sc8F5 c5S_<59cSU ^U_I*<59*Z2_rU*)9_K9U58_<9*^K<2S8^8<99*^<c52K52c^2_59<bSr ^<2U_8K*48<4<*2K852<S*K8<<*285cr_2c8r*^Kc4G9<K24594K9_^9_KY_<928:_<99^^_c9S^<_2S8K<_US^^c_PS5^2c8S4844kSc^Lc<S< 8crS9 8ccS2 ^c2>8 4c4B^ _c-m8 cU8R4 9c*Lc SU<;2^*U4H9<^U_M-<<U2Sp< U95^<cU_5<<2281< S2^5_<z2852r824S9<U2c5Sr<2U88r 2958r_2(8Kr22284r9*^8c<r*<8448*r894^*c8.r**2K544*cK^4c*=K<4U98K4499^Kc499<K2_594K9_^9_KW_ 92^84K99^^_c9S^<_2S8^4_9S^^c_D");local n=0;d.jjGzMjzC(function()d.xdvnJKRH()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,a=u(0,u,e,c,d.EhclZziB);local function r()local n,l=d.EhclZziB(c,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local b=true;local b=0 local function z()local e=n();local n=n();local o=1;local t=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(t==b)then return n*0;else e=1;o=0;end;elseif(e==2047)then return(t==0)and(n*(1/0))or(n*(0/0));end;return d.nfAzWRPM(n,e-1023)*(o+(t/(2^52)));end;local j=n;local function k(n)local l;if(not n)then n=j();if(n==0)then return'';end;end;l=d.omZJZePG(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..d.omZJZePG(l,n,n)end return e;end;local b=#d.RzYTCeag(s('\49.\48'))~=1 local e=n;local function p(...)return{...},d.DxFITzvB('#',...)end local function m()local e={};local s={};local h={};local u={s,h,nil,e};local e=n()local c={}for t=1,e do local l=a();local e;if(l==0)then e=(a()~=#{});elseif(l==1)then local n=z();if b and d.IJpBvAVy(d.RzYTCeag(n),'.(\48+)$')then n=d.iKDQZcyr(n);end e=n;elseif(l==2)then e=k();end;c[t]=e;end;for h=1,n()do local e=a();if(l(e,1,1)==0)then local d=l(e,2,3);local a=l(e,4,6);local e={r(),r(),nil,nil};if(d==0)then e[o]=r();e[f]=r();elseif(d==#{1})then e[o]=n();elseif(d==_[2])then e[o]=n()-(2^16)elseif(d==_[3])then e[o]=n()-(2^16)e[f]=r();end;if(l(a,1,1)==1)then e[t]=c[e[t]]end if(l(a,2,2)==1)then e[o]=c[e[o]]end if(l(a,3,3)==1)then e[f]=c[e[f]]end s[h]=e;end end;u[3]=a();for e=1,n()do h[e-(#{1})]=m();end;return u;end;local function g(l,n,e)local t=n;local t=e;return s(d.IJpBvAVy(d.IJpBvAVy(({d.jjGzMjzC(l)})[2],n),e))end local function ne(b,e,a)local function ne(...)local r,y,_,z,s,n,c,m,k,j,g,l;local e=0;while-1<e do if 2<e then if 5<=e then if 2<=e then repeat if 5~=e then e=-2;break;end;l=u(7);until true;else e=-2;end else if 1<=e then for n=17,97 do if e>3 then j=d.DxFITzvB('#',...)-1;g={};break;end;m={};k={...};break;end;else j=d.DxFITzvB('#',...)-1;g={};end end else if e>=1 then if e~=-2 then for l=47,79 do if e~=1 then n=-41;c=-1;break;end;_=u(6,75,3,16,b);s=p z=0;break;end;else _=u(6,75,3,16,b);s=p z=0;end else r=u(6,75,1,77,b);y=u(6,33,2,19,b);end end e=e+1;end;for e=0,j do if(e>=_)then m[e-_]=k[e+1];else l[e]=k[e+1];end;end;local e=j-_+1 local e;local d;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=r[n];d=e[ee];if d>11 then if d>=18 then if 21<=d then if 22>d then do return end;else if 23~=d then local d,c,f,a,r;local n=0;while n>-1 do if 2<n then if 4<n then if n>4 then repeat if 5~=n then n=-2;break;end;l(r,a);until true;else n=-2;end else if n~=1 then repeat if n~=3 then r=d[c];break;end;a=d[f];until true;else r=d[c];end end else if 1>n then d=e;else if n~=1 then f=o;else c=t;end end end n=n+1 end else l(e[t],e[o]);end end else if 19<=d then if d>=18 then for r=18,53 do if d~=19 then do return end;break;end;if(l[e[t]]==e[f])then n=n+1;else n=e[o];end;break;end;else if(l[e[t]]==e[f])then n=n+1;else n=e[o];end;end else local n=e[t];local t=l[e[o]];l[n+1]=t;l[n]=t[e[f]];end end else if 14<d then if 15>=d then local d,b,k,j,_;for u=0,6 do if u<3 then if u<1 then l[e[t]]=a[e[o]];n=n+1;e=r[n];else if 1<u then l(e[t],e[o]);n=n+1;e=r[n];else d=e[t];b=l[e[o]];l[d+1]=b;l[d]=b[e[f]];n=n+1;e=r[n];end end else if u>4 then if u>1 then for o=49,94 do if 5<u then l[e[t]]();break;end;d=e[t]l[d]=l[d](h(l,d+1,c))n=n+1;e=r[n];break;end;else d=e[t]l[d]=l[d](h(l,d+1,c))n=n+1;e=r[n];end else if u>=0 then for f=49,90 do if 4~=u then l[e[t]]=(e[o]~=0);n=n+1;e=r[n];break;end;d=e[t]k,j=s(l[d](h(l,d+1,e[o])))c=j+d-1 _=0;for e=d,c do _=_+1;l[e]=k[_];end;n=n+1;e=r[n];break;end;else l[e[t]]=(e[o]~=0);n=n+1;e=r[n];end end end end else if d>14 then for c=21,94 do if 17>d then l[e[t]]();break;end;for d=0,3 do if 1<d then if 1<d then repeat if d~=2 then if(l[e[t]]==e[f])then n=n+1;else n=e[o];end;break;end;l[e[t]]=a[e[o]];n=n+1;e=r[n];until true;else l[e[t]]=a[e[o]];n=n+1;e=r[n];end else if-2<=d then repeat if d~=1 then l[e[t]]=(e[o]~=0);n=n+1;e=r[n];break;end;a[e[o]]=l[e[t]];n=n+1;e=r[n];until true;else l[e[t]]=(e[o]~=0);n=n+1;e=r[n];end end end break;end;else for d=0,3 do if 1<d then if 1<d then repeat if d~=2 then if(l[e[t]]==e[f])then n=n+1;else n=e[o];end;break;end;l[e[t]]=a[e[o]];n=n+1;e=r[n];until true;else l[e[t]]=a[e[o]];n=n+1;e=r[n];end else if-2<=d then repeat if d~=1 then l[e[t]]=(e[o]~=0);n=n+1;e=r[n];break;end;a[e[o]]=l[e[t]];n=n+1;e=r[n];until true;else l[e[t]]=(e[o]~=0);n=n+1;e=r[n];end end end end end else if d>12 then if 14>d then l[e[t]]();else a[e[o]]=l[e[t]];end else if(l[e[t]]==e[f])then n=n+1;else n=e[o];end;end end end else if 5>=d then if 2>=d then if 1<=d then if 0<d then for r=14,67 do if d~=1 then n=e[o];break;end;l[e[t]]=(e[o]~=0);break;end;else l[e[t]]=(e[o]~=0);end else local e=e[t]l[e]=l[e](h(l,e+1,c))end else if d>=4 then if d==4 then a[e[o]]=l[e[t]];else local n=e[t]local t,e=s(l[n](h(l,n+1,e[o])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;end else l[e[t]]=a[e[o]];end end else if 8<d then if d<10 then local e=e[t]l[e]=l[e](h(l,e+1,c))else if 6<=d then for n=31,67 do if 11>d then l[e[t]]=(e[o]~=0);break;end;local t=e[t];local n=l[e[o]];l[t+1]=n;l[t]=n[e[f]];break;end;else l[e[t]]=(e[o]~=0);end end else if 7>d then l[e[t]]=a[e[o]];else if d>=3 then for r=27,88 do if d~=8 then local n=e[t]local t,e=s(l[n](h(l,n+1,e[o])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;break;end;n=e[o];break;end;else local n=e[t]local t,e=s(l[n](h(l,n+1,e[o])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;end end end end end n=1+n;end;end;return ne end;local o=0xff;local a={};local r=(1);local t='';(function(n)local l=n local c=0x00 local e=0x00 l={(function(d)if c>0x2a then return d end c=c+1 e=(e+0x98f-d)%0x29 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb5);o[2]=(o[2]*(g(function()a()end,h(t))-g(o[1],h(t))))+1;a[r]={};o=o[2];r=r+o;end return true end)'kaAxs'and l[0x1](0x240+d))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xdb);end return true end)'riqtl'and l[0x3](d+0x1d0))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x3c);a[r]=y();r=r+o;end return true end)'ediDb'and l[0x2](d+0x23a))or d end),(function(f)if c>0x2a then return f end c=c+1 e=(e+0x129d-f)%0x4a return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xcb);end return true end)'ccyym'and l[0x3](0x1fc+f))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x17);t={t..'\58 a',t};a[r]=m();r=r+((not d.OvPnovUJ)and 1 or 0);t[1]='\58'..t[1];o[2]=0xff;end return true end)'oPKDC'and l[0x1](f+0x29c))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb4);end return true end)'MDFaP'and l[0x2](f+0x39f))or f end),(function(d)if c>0x25 then return d end c=c+1 e=(e+0xcb6-d)%0x36 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x49);end return true end)'IpjbP'and l[0x1](0x323+d))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x26);t='\37';o={function()o()end};t=t..'\100\43';end return true end)'nSUzX'and l[0x2](d+0x389))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa);end return true end)'KcUlH'and l[0x3](d+0x364))or d end)}l[0x3](0xad6)end){};local e=ne(h(a));return e(...);end return g((function()local n={}local e=0x01;local l;if d.OvPnovUJ then l=d.OvPnovUJ(g)else l=''end if d.IJpBvAVy(l,d.ErBHxMum)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,o,d)local d;if l<=3 then if 1<l then if l~=0 then for d=12,73 do if 3~=l then do return 16777216,65536,256 end;break;end;do return e(1),e(4,o,t,n,e),e(5,o,t,n)end;break;end;else do return e(1),e(4,o,t,n,e),e(5,o,t,n)end;end else if-3<l then for d=20,63 do if l~=1 then do return e(1),e(4,o,t,n,e),e(5,o,t,n)end;break;end;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;break;end;else do return e(1),e(4,o,t,n,e),e(5,o,t,n)end;end end else if 6>l then if 3<l then for d=46,77 do if l~=4 then local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;break;end;local l=t;local d,o,t=o(2);do return function()local e,c,r,n=e(n,l(l,l),l(l,l)+3);l(4);return(n*d)+(r*o)+(c*t)+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 else if l<=6 then do return o[n]end;else if l~=6 then for e=36,98 do if l~=8 then do return setmetatable({},{['__\99\97\108\108']=function(e,o,t,l,n)if n then return e[n]elseif l then return e else e[o]=t end end})end break;end;do return n(l,nil,n);end break;end;else do return setmetatable({},{['__\99\97\108\108']=function(e,l,t,o,n)if n then return e[n]elseif o then return e else e[l]=t end end})end end end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement