Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _zpZdyHEPWcLt = a; end)); return(function(u,...)local f;local o;local s;local l;local t;local r;local e=24915;local n=0;local d={};while n<585 do n=n+1;while n<0x252 and e%0x295e<0x14af do n=n+1 e=(e+446)%31407 local a=n+e if(e%0x1038)>0x81c then e=(e*0x1d5)%0x9a13 while n<0x20e and e%0x98e<0x4c7 do n=n+1 e=(e-261)%9475 local t=n+e if(e%0x40c4)>0x2062 then e=(e*0x212)%0x8ac2 local e=75974 if not d[e]then d[e]=0x1 end elseif e%2~=0 then e=(e+0x2fe)%0xe82 local e=63125 if not d[e]then d[e]=0x1 end else e=(e+0x125)%0x596b n=n+1 local e=83251 if not d[e]then d[e]=0x1 l=(not l)and _ENV or l;end end end elseif e%2~=0 then e=(e-0x51)%0x5ac2 while n<0x2df and e%0x28e2<0x1471 do n=n+1 e=(e*205)%21129 local f=n+e if(e%0x4666)>=0x2333 then e=(e-0x369)%0x6ff3 local e=33966 if not d[e]then d[e]=0x1 o={};end elseif e%2~=0 then e=(e-0x34b)%0x90b7 local e=86654 if not d[e]then d[e]=0x1 t=function(t)local e=0x01 local function d(n)e=e+n return t:sub(e-n,e-0x01)end while true do local n=d(0x01)if(n=="\5")then break end local e=r.byte(d(0x01))local e=d(e)if n=="\2"then e=o.fvLITWSJ(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then l[e]=function(n,e)return u(8,nil,u,e,n)end elseif n=="\4"then e=l[e]elseif n=="\0"then e=l[e][d(r.byte(d(0x01)))];end local n=d(0x08)o[n]=e end end end else e=(e+0x135)%0x7893 n=n+1 local e=15624 if not d[e]then d[e]=0x1 s=tonumber;end end end else e=(e+0x35f)%0x2039 n=n+1 while n<0x2ac and e%0x3f54<0x1faa do n=n+1 e=(e-559)%12960 local t=n+e if(e%0x15f0)>=0xaf8 then e=(e*0x39)%0xbdad local e=65339 if not d[e]then d[e]=0x1 l=getfenv and getfenv();end elseif e%2~=0 then e=(e-0x3e5)%0x5030 local e=40720 if not d[e]then d[e]=0x1 r=string;end else e=(e-0x1c7)%0xbff2 n=n+1 local e=48078 if not d[e]then d[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\102\118\76\73\84\87\83\74\0\6\115\116\114\105\110\103\4\99\104\97\114\68\85\107\110\106\103\74\89\0\6\115\116\114\105\110\103\3\115\117\98\90\72\77\80\73\73\121\88\0\6\115\116\114\105\110\103\4\98\121\116\101\121\112\76\95\66\95\74\100\0\5\116\97\98\108\101\6\99\111\110\99\97\116\76\114\77\98\97\99\122\77\0\5\116\97\98\108\101\6\105\110\115\101\114\116\79\80\72\68\72\76\120\106\5";end end end end end e=(e*332)%46341 end t(f);local e={};for n=0x0,0xff do local d=o.DUknjgJY(n);e[n]=d;e[d]=n;end local function c(n)return e[n];end local r=(function(f,t)local a,d=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local r=f while true do n[0x03][o.ZHMPIIyX(t,e,(function()e=a+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""d=0x000 break end end local l=#t while e<l+0x01 do n[0x02][d]=o.ZHMPIIyX(t,e,(function()e=a+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 o.OPHDHLxj(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+r)%0x100)));r=f+r;end end return o.LrMbaczM(n[0x01])end);t(r(230,"r?m^!1OL>Z<IhBH#?#"));t(r(19,"BpdYM5q#Xji.OT818T80YidXpY1#8jO15jiqiMXj#jMdd1YMd1pX8;8#Tdqd5GiXXX#Yq.5XMpdTd58T1iTg.#O8MdYYX.#i585>MYdp1d1c1OO1.dj1X1dMp##p51Mid8dWtqjp8qO#O#iYj55.#d58dTM_d.pi1.Xd#YOjiiiiX.p5qjM8YOYOdpS;TYTTT=iOj8Xp#8hi115YYdd8pM1j15O1O1ijj#X8#M58Y.dXdM1T1YTjTjqX5XjMj_#.#jqp5p11d>8i858i8qTp.##Od5pd#dMjY8YqpY1Y1d81TT.5j#idpj)5di55YT4OpO1XTdOpO5MiY.jM#OqT5.MqdipOkd1j..OjjiX#jO#.##1u8dY8pX<q1T8Y#pOT.YidX?q1qM5XMM?ipM8MTM8Y.Y5dMpjTXY#d5 Y1YM*X158iOd.8iYjXXqddplqX5#Y.dTd<V#T8OYTdX8idj#5X,51MM8dTdp #1d1b.jOXj5XjXjq15.diTpOdpX1j1jTiqM.di5j5Xd#d51MTYipO1MAYOd.d5i"));local e=(-680+(function()local l,e=0,1;(function(e,n)e(e(n,e)and e(e and n,e),e(e,e))end)(function(d,n)if l>245 then return n end l=l+1 e=(e*835)%7197 if(e%730)>=365 then e=(e+634)%2829 return d(n(n,n),d(n and n,n)and d(n and d,d))else return n end return d end,function(n,d)if l>335 then return d end l=l+1 e=(e-515)%18001 if(e%508)<254 then e=(e-174)%1695 return n(n(n and n,d),d(d,d))else return n end return n end)return e;end)())local ee=(getfenv)or(function()return _ENV end);local a=o.RRZETLTU or o.rqJgJMoR;local z=1;local c=4;local t=3;local l=2;local function m(b,...)local f=r(e,"&{3wX6}xFdM:,C/sw/}/M6C,{X}wF{:F/sxw,,jwwd66d/Cwu}w{Fd://,3F6Fd:Mxssw{}FM)/7/M6XF:,*F},Vsw3M}{ssw*xwM3x6C3/3{d6(C:3}6/dsFw_ wMxXMXd}3XX6F/x3sdw3}}M3,MssXx}sM6dF3}Xsd{:,M:ns}FdsC6s{wM}s}wC2/X/d3d6}FC,X}xM{,MfXXMF3:x/63{6{33}6Fs,}sCdw/6{3wwxX,S,}sMw,xM:CCCw,P7wC}CMXC:6M:CsX3xw6FMC.dXs/j{wF}s;/6{FF::s6sw{s6},ws,w:x6MwC,{C63xxx:sx3:6wF,,6,}<}w/d/M:/3XwX/xs/dsX3x}3,Fs:=6}MxwM,/Q{,xCF{//sx3XddCds,C3{dXExxM//6336wFM,{sd3s}}dC/}3}X3xd:e/F{/66F,C6{kw{}FdsC:NCXXx:CFsX3(6xF/,:s,wX}MMXCF{wXsxC:X/:3F6dd{,x73w/},MwCM{FXFF.:}/C3}6:d3,d={wx}/M6//{MXMF{:Fsw3}6CdXCCrCwdx{Mx/v{6X,FwCMH33F}+d},/ XX{x3::sX{x6{F6,wsw3M}{dFCwk}X{xXM,/3{d6iFx,Cs63C}wd/C{IFwsx}:F/X{:63Fd,fsd3/}6MFCweMX{xdMs/x{C6XFC,3sdwL}Fd/C6G,XwxM:{/F");local n=0;o.hgrMmVPz(function()o.dWiyzeZx()n=n+1 end)local function e(e,d)if d then return n end;n=e+n;end local d,n,h=u(0,u,e,f,o.ypL_B_Jd);local function r()local d,n=o.ypL_B_Jd(f,e(1,3),e(5,6)+2);e(2);return(n*256)+d;end;local p=true;local p=0 local function _()local e=n();local n=n();local t=1;local l=(d(n,1,20)*(2^32))+e;local e=d(n,21,31);local n=((-1)^d(n,32));if(e==0)then if(l==p)then return n*0;else e=1;t=0;end;elseif(e==2047)then return(l==0)and(n*(1/0))or(n*(0/0));end;return o.bHekZ_Ue(n,e-1023)*(t+(l/(2^52)));end;local j=n;local function k(n)local d;if(not n)then n=j();if(n==0)then return'';end;end;d=o.ZHMPIIyX(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+p),#d do e=e..o.ZHMPIIyX(d,n,n)end return e;end;local j=#o.qFgKKset(s('\49.\48'))~=1 local e=n;local function y(...)return{...},o.PrRYledF('#',...)end local function g()local u={};local e={};local s={};local p={s,u,nil,e};local e=n()local f={}for l=1,e do local d=h();local e;if(d==3)then e=(h()~=#{});elseif(d==2)then local n=_();if j and o.AkjLrprf(o.qFgKKset(n),'.(\48+)$')then n=o.rsshSuGJ(n);end e=n;elseif(d==1)then e=k();end;f[l]=e;end;p[3]=h();for u=1,n()do local e=h();if(d(e,1,1)==0)then local o=d(e,2,3);local a=d(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[t]=r();e[c]=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[c]=r();end;if(d(a,1,1)==1)then e[l]=f[e[l]]end if(d(a,2,2)==1)then e[t]=f[e[t]]end if(d(a,3,3)==1)then e[c]=f[e[c]]end s[u]=e;end end;for e=1,n()do u[e-(#{1})]=g();end;return p;end;local function m(d,n,e)local l=n;local l=e;return s(o.AkjLrprf(o.AkjLrprf(({o.hgrMmVPz(d)})[2],n),e))end local function ne(p,e,b)local function m(...)local r,m,s,g,h,d,f,k,j,_,ee,n;local e=0;while-1<e do if e>2 then if 4<e then if e>=3 then for d=48,76 do if e>5 then e=-2;break;end;n=u(7);break;end;else e=-2;end else if 2<=e then repeat if 4>e then k={};j={...};break;end;_=o.PrRYledF('#',...)-1;ee={};until true;else k={};j={...};end end else if 1<=e then if-1<=e then for n=16,67 do if 1<e then d=-41;f=-1;break;end;s=u(6,60,3,24,p);h=y g=0;break;end;else s=u(6,60,3,24,p);h=y g=0;end else r=u(6,59,1,60,p);m=u(6,77,2,90,p);end end e=e+1;end;for e=0,_ do if(e>=s)then k[e-s]=j[e+1];else n[e]=j[e+1];end;end;local e=_-s+1 local e;local o;local function u(...)while true do end end while true do if d<-40 then d=d+42 end e=r[d];o=e[z];if o<=11 then if 6<=o then if o<9 then if o>6 then if 4<o then repeat if 8~=o then n[e[l]]=b[e[t]];break;end;n[e[l]]=(e[t]~=0);until true;else n[e[l]]=(e[t]~=0);end else for o=0,3 do if o>=2 then if o==2 then n[e[l]]=b[e[t]];d=d+1;e=r[d];else if(n[e[l]]==e[c])then d=d+1;else d=e[t];end;end else if-1<o then repeat if o<1 then n[e[l]]=(e[t]~=0);d=d+1;e=r[d];break;end;b[e[t]]=n[e[l]];d=d+1;e=r[d];until true;else n[e[l]]=(e[t]~=0);d=d+1;e=r[d];end end end end else if o<=9 then d=e[t];else if 6<=o then for u=36,75 do if o~=10 then local o,k,p,j,s;for u=0,6 do if u<=2 then if 1<=u then if u>-2 then for f=48,80 do if 2~=u then o=e[l];k=n[e[t]];n[o+1]=k;n[o]=k[e[c]];d=d+1;e=r[d];break;end;n(e[l],e[t]);d=d+1;e=r[d];break;end;else n(e[l],e[t]);d=d+1;e=r[d];end else n[e[l]]=b[e[t]];d=d+1;e=r[d];end else if 5>u then if 2<=u then repeat if 4>u then n[e[l]]=(e[t]~=0);d=d+1;e=r[d];break;end;o=e[l]p,j=h(n[o](a(n,o+1,e[t])))f=j+o-1 s=0;for e=o,f do s=s+1;n[e]=p[s];end;d=d+1;e=r[d];until true;else o=e[l]p,j=h(n[o](a(n,o+1,e[t])))f=j+o-1 s=0;for e=o,f do s=s+1;n[e]=p[s];end;d=d+1;e=r[d];end else if u~=4 then for t=22,67 do if 5~=u then n[e[l]]();break;end;o=e[l]n[o]=n[o](a(n,o+1,f))d=d+1;e=r[d];break;end;else n[e[l]]();end end end end break;end;local e=e[l]n[e]=n[e](a(n,e+1,f))break;end;else local o,k,p,j,s;for u=0,6 do if u<=2 then if 1<=u then if u>-2 then for f=48,80 do if 2~=u then o=e[l];k=n[e[t]];n[o+1]=k;n[o]=k[e[c]];d=d+1;e=r[d];break;end;n(e[l],e[t]);d=d+1;e=r[d];break;end;else n(e[l],e[t]);d=d+1;e=r[d];end else n[e[l]]=b[e[t]];d=d+1;e=r[d];end else if 5>u then if 2<=u then repeat if 4>u then n[e[l]]=(e[t]~=0);d=d+1;e=r[d];break;end;o=e[l]p,j=h(n[o](a(n,o+1,e[t])))f=j+o-1 s=0;for e=o,f do s=s+1;n[e]=p[s];end;d=d+1;e=r[d];until true;else o=e[l]p,j=h(n[o](a(n,o+1,e[t])))f=j+o-1 s=0;for e=o,f do s=s+1;n[e]=p[s];end;d=d+1;e=r[d];end else if u~=4 then for t=22,67 do if 5~=u then n[e[l]]();break;end;o=e[l]n[o]=n[o](a(n,o+1,f))d=d+1;e=r[d];break;end;else n[e[l]]();end end end end end end end else if 2>=o then if 1<=o then if 1==o then n(e[l],e[t]);else do return end;end else local d=e[l];local l=n[e[t]];n[d+1]=l;n[d]=l[e[c]];end else if 3<o then if 2~=o then for d=26,69 do if 5~=o then local d=e[l];local l=n[e[t]];n[d+1]=l;n[d]=l[e[c]];break;end;local f,c,r,o,a;local d=0;while d>-1 do if d<=2 then if d<=0 then f=e;else if d~=-1 then repeat if d~=2 then c=l;break;end;r=t;until true;else r=t;end end else if d<5 then if d>=-1 then repeat if d~=4 then o=f[r];break;end;a=f[c];until true;else o=f[r];end else if d>4 then for e=37,77 do if 5<d then d=-2;break;end;n(a,o);break;end;else n(a,o);end end end d=d+1 end break;end;else local d=e[l];local l=n[e[t]];n[d+1]=l;n[d]=l[e[c]];end else n[e[l]]();end end end else if 17>=o then if 14>=o then if o<13 then local e=e[l]n[e]=n[e](a(n,e+1,f))else if 9<=o then for r=38,86 do if o~=14 then local d=e[l]local l,e=h(n[d](a(n,d+1,e[t])))f=e+d-1 local e=0;for d=d,f do e=e+1;n[d]=l[e];end;break;end;if(n[e[l]]==e[c])then d=d+1;else d=e[t];end;break;end;else local d=e[l]local l,e=h(n[d](a(n,d+1,e[t])))f=e+d-1 local e=0;for d=d,f do e=e+1;n[d]=l[e];end;end end else if o<=15 then do return end;else if o>14 then for r=36,84 do if o>16 then n[e[l]]=(e[t]~=0);break;end;if(n[e[l]]==e[c])then d=d+1;else d=e[t];end;break;end;else n[e[l]]=(e[t]~=0);end end end else if 21>o then if 18>=o then d=e[t];else if 20~=o then b[e[t]]=n[e[l]];else local d=e[l]local l,e=h(n[d](a(n,d+1,e[t])))f=e+d-1 local e=0;for d=d,f do e=e+1;n[d]=l[e];end;end end else if o<=21 then n[e[l]]=b[e[t]];else if 21<o then for d=18,71 do if 22~=o then b[e[t]]=n[e[l]];break;end;n[e[l]]();break;end;else n[e[l]]();end end end end end d=1+d;end;end;return m end;local t=0xff;local c={};local f=(1);local l='';(function(n)local d=n local r=0x00 local e=0x00 d={(function(o)if r>0x1f then return o end r=r+1 e=(e+0x421-o)%0x2e return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x71);end return true end)'UDeSF'and d[0x1](0x263+o))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x49);end return true end)'ROpyq'and d[0x2](o+0x123))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x38);t[2]=(t[2]*(m(function()c()end,a(l))-m(t[1],a(l))))+1;c[f]={};t=t[2];f=f+t;end return true end)'RgQnD'and d[0x3](o+0x2c0))or o end),(function(l)if r>0x1e then return l end r=r+1 e=(e+0xd76-l)%0x3c return(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x9b);end return true end)'VBBaA'and d[0x2](0x3ad+l))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xd0);end return true end)'PtjSO'and d[0x3](l+0x326))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x26);end return true end)'LyWdp'and d[0x1](l+0x312))or l end),(function(a)if r>0x25 then return a end r=r+1 e=(e+0xc89-a)%0x4e return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x73);l={l..'\58 a',l};c[f]=g();f=f+((not o.LLdrnIca)and 1 or 0);l[1]='\58'..l[1];t[2]=0xff;end return true end)'WOpFz'and d[0x1](0x1ae+a))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x45);c[f]=ee();f=f+t;end return true end)'OkTRH'and d[0x2](a+0x2ad))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x43);l='\37';t={function()t()end};l=l..'\100\43';end return true end)'aZhcX'and d[0x3](a+0x6a))or a end)}d[0x3](0x2059)end){};local e=ne(a(c));return e(...);end return m((function()local n={}local e=0x01;local d;if o.LLdrnIca then d=o.LLdrnIca(m)else d=''end if o.AkjLrprf(d,o.eIZy_UUX)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(d,e,n,l,t,o)local o;if 4>d then if 2<=d then if 1<d then repeat if 2<d then do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;break;end;do return 16777216,65536,256 end;until true;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end else if 0==d then do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;else do return function(d,e,n)if n then local e=(d/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(d%(e+e)>=e)and 1 or 0;end;end;end;end end else if d<6 then if d==5 then local d=l;do return function()local e=e(n,d(d,d),d(d,d));d(1);return e;end;end;else local d=l;local f,t,l=t(2);do return function()local n,e,o,r=e(n,d(d,d),d(d,d)+3);d(4);return(r*f)+(o*t)+(e*l)+n;end;end;end else if d>6 then if d>4 then for e=11,82 do if d~=7 then do return n(d,nil,n);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,d,l,t,n)if n then return e[n]elseif t then return e else e[d]=l end end})end break;end;else do return n(d,nil,n);end end else do return t[n]end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement