Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _TqDqzlKiRspk = a; end)); return(function(u,...)local r;local f;local s;local d;local t;local o;local e=24915;local n=0;local l={};while n<493 do n=n+1;while n<0x6c and e%0x4704<0x2382 do n=n+1 e=(e-896)%24519 local a=n+e if(e%0x4454)>0x222a then e=(e*0x13)%0x744c while n<0x1c8 and e%0x45ae<0x22d7 do n=n+1 e=(e+951)%48340 local d=n+e if(e%0x389a)<=0x1c4d then e=(e+0x179)%0x9b67 local e=94187 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e-0xd0)%0x980f local e=31051 if not l[e]then l[e]=0x1 s=tonumber;end else e=(e+0x19f)%0xad9d n=n+1 local e=88629 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\67\74\108\120\111\120\100\95\0\6\115\116\114\105\110\103\4\99\104\97\114\86\101\112\110\71\70\80\101\0\6\115\116\114\105\110\103\3\115\117\98\117\77\102\69\118\106\80\99\0\6\115\116\114\105\110\103\4\98\121\116\101\111\103\84\88\97\116\65\69\0\5\116\97\98\108\101\6\99\111\110\99\97\116\121\79\102\105\114\99\84\80\0\5\116\97\98\108\101\6\105\110\115\101\114\116\73\90\73\112\84\73\95\87\5";end end end elseif e%2~=0 then e=(e+0x285)%0x407d while n<0x1bb and e%0x3516<0x1a8b do n=n+1 e=(e-888)%1401 local t=n+e if(e%0x4908)<=0x2484 then e=(e*0x20e)%0x6e32 local e=29303 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e-0x275)%0x41d8 local e=94150 if not l[e]then l[e]=0x1 end else e=(e+0x2ba)%0x3796 n=n+1 local e=55416 if not l[e]then l[e]=0x1 end end end else e=(e+0x2fd)%0x2854 n=n+1 while n<0x385 and e%0xabe<0x55f do n=n+1 e=(e+764)%39981 local f=n+e if(e%0x24c0)<0x1260 then e=(e*0x5d)%0x4899 local e=65833 if not l[e]then l[e]=0x1 r=string;end elseif e%2~=0 then e=(e*0x3f1)%0x9f3 local e=51561 if not l[e]then l[e]=0x1 d=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.CJlxoxd_(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)o[n]=e end end end else e=(e+0x232)%0x47b0 n=n+1 local e=71696 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end end end end end e=(e*515)%21001 end d(f);local n={};for e=0x0,0xff do local l=o.VepnGFPe(e);n[e]=l;n[l]=e;end local function h(e)return n[e];end local r=(function(f,r)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=f while true do n[0x03][o.uMfEvjPc(r,e,(function()e=a+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.uMfEvjPc(r,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.IZIpTI_W(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=f+d;end end return o.yOfircTP(n[0x01])end);d(r(132,"Bfd}E?_FK93=%wJWKf"));d(r(28,"njbq^kd;Dyvm=73#3^=3j#+^3d=jvvD;_D^=^jj78^=#=qD7d=kykbb^j#y=Dj7Yv;Dy;Dk=bjbq3d#D7DD#;;;D#k77b=jb377d=zvqdvdjb7qj#k#^7qksqvDm;8kbb7jd#q;k=jyyyFdq^=O#zm#b=kyyvvDmd=3D7%j7#k3==^^kyBd=kj^Db^7v3^m;mky^dkkm^vm=vD#q=ym=yy;kdDqyq-?j3d7^mjy;D^dbqqqy%d7qmDk^qmd3dj^qqDj;#3vqmkvbD7^=k;b7#y#^;Dk=mqDjd7k=jU#m3m7ov=v^yjky337j379d7rmvv=v4;b^j^jm=v^#^7qmmv-Dbk7^dbqh7=;=bmDDdD^^yqm=}vy#==7mbvG;7BbkkqbjD377qm#mr;m;jkbS3bq7k=;k=^byk;bkDb7jq##=7vXv=Dm^7kDbyKjy=Dj7<mdyj;vd^qvzy33#b7Dvb;#;m#D73b#<k#!=7v#v^;k^m^^bb#m7j3jyqq^j=dy^jqDjoyj7d=Ov;Dm;bk0jyjW7v37v?vDd;)y"));local e=(-1124+(function()local d,t=0,1;(function(e,n,l)l(e(n,l,e and l),n(e,e and n,n),e(e,e and l,n))end)(function(e,l,n)if d>173 then return l end d=d+1 t=(t+110)%17848 if(t%836)>418 then return e(n(n,l,l)and n(l,e,e),n(e and n,e,l)and e(n,l,n),l(e,n,e and n))else return e end return e end,function(n,l,e)if d>328 then return e end d=d+1 t=(t*603)%39035 if(t%354)<=177 then return e(e(e,l,n),n(l,e,n),n(e,l,e))else return l end return n end,function(l,n,e)if d>245 then return l end d=d+1 t=(t-286)%1451 if(t%1184)>592 then return e else return e(l(e,n and l,e)and e(e,n,n),n(e,e,l),e(n,e,l))end return l(n(e,l,n and e),e(l and l,n and e,l)and e(n,e,n),e(n,e,l))end)return t;end)())local ne=(getfenv)or(function()return _ENV end);local c=o.UDlgElYM or o.x_qnFwES;local le=1;local d=2;local t=3;local a=4;local function z(j,...)local f=r(e,"7vzhU6-x2Q>j;H#<Hj>2x;6(z6z;;;>JxUjyQ9-UhUPj>--<UhUHzh<<H->vxx66zx#Q2>>hxUhQ <#62h6#z;5hH6H;xH6-zU<Q;H>hxQUHzh<U<x;HxRUvU2#<;zQh-Uh-U2z6#66QhQK3HU>2Hj>UQ6h;hHv>#oQh26UzhxB2HxUvv##2j;Q%Ha>x-HUUzx<;;#QQxzh<>H>x6Uz2<;zUN;#vj<U46>hvB2H6-U2<UHhhjUH2>#x<62vH#<HUQQ-;<;zx#H;;QUzAzvvx#jj#xx6Hz<;n;>xjvH.Q;UQ2-;2H2h6xz>#h;QQj-jhhz2<>;6Q#-jUj<U#Qj22;-vh##6#;;rQz<6;<Q;x,UU-N-mhUrU><>v2U#6j;2;-BhU-<hHvH#Q62hjSRHU>2x;-UzU<2;;>vxUU2v;qzHvQ2-;U&vQ#2j;Q)x-U>^;#3jU2>6;hWVU<#;v2F6Uz2}zH*>6x26!zJ<2HxQ;xdUUv##;;vQU-26vvI#Uj22H-FhU42##;z2U62z;ShHU>2x;-zzH<2;H>8xjU2v;<}#U>h-;UvvU#Qj;Q--UU>vx#9jx226HhZ8UH2>;2-6Uz;<;Hv>Ux2U;z4<Q;2QHxyU2v2#;;YQU2Uh;v4#Uj22;-zhU12#>j=2U62zH(+H6>2x;-6zU<2;;>vxUU2v;<{;UQ2-;");local n=0;o.MkJxtGKh(function()o.DKWXPdmQ()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.ogTXatAE);local function r()local l,n=o.ogTXatAE(f,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local b=true;local b=0 local function z()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==b)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.BhWqlYkv(e,n-1023)*(d+(t/(2^52)));end;local k=n;local function m(n)local l;if(not n)then n=k();if(n==0)then return'';end;end;l=o.uMfEvjPc(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..o.uMfEvjPc(l,n,n)end return e;end;local b=#o.mCZlVpQ_(s('\49.\48'))~=1 local e=n;local function ee(...)return{...},o.aShbWIuC('#',...)end local function y()local e={};local u={};local c={};local s={c,u,nil,e};local e=n()local f={}for t=1,e do local l=h();local e;if(l==3)then e=(h()~=#{});elseif(l==2)then local n=z();if b and o.G_bQAnkh(o.mCZlVpQ_(n),'.(\48+)$')then n=o.lQdJyHlG(n);end e=n;elseif(l==1)then e=m();end;f[t]=e;end;s[3]=h();for u=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local h=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==j[2])then e[t]=n()-(2^16)elseif(o==j[3])then e[t]=n()-(2^16)e[a]=r();end;if(l(h,1,1)==1)then e[d]=f[e[d]]end if(l(h,2,2)==1)then e[t]=f[e[t]]end if(l(h,3,3)==1)then e[a]=f[e[a]]end c[u]=e;end end;for e=1,n()do u[e-(#{1})]=y();end;return s;end;local function z(l,e,n)local t=e;local t=n;return s(o.G_bQAnkh(o.G_bQAnkh(({o.MkJxtGKh(l)})[2],e),n))end local function g(j,e,h)local function g(...)local r,_,b,p,s,n,f,z,k,m,y,l;local e=0;while-1<e do if e<3 then if 1>e then r=u(6,6,1,43,j);_=u(6,18,2,39,j);else if e>=-1 then for l=18,58 do if e<2 then b=u(6,61,3,77,j);s=ee p=0;break;end;n=-41;f=-1;break;end;else n=-41;f=-1;end end else if 5>e then if 4~=e then z={};k={...};else m=o.aShbWIuC('#',...)-1;y={};end else if 5~=e then e=-2;else l=u(7);end end end e=e+1;end;for e=0,m do if(e>=b)then z[e-b]=k[e+1];else l[e]=k[e+1];end;end;local e=m-b+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[le];if o>11 then if o<=17 then if o>=15 then if o<=15 then n=e[t];else if 14~=o then repeat if 16~=o then l[e[d]]=(e[t]~=0);break;end;l(e[d],e[t]);until true;else l[e[d]]=(e[t]~=0);end end else if 12>=o then local n=e[d];local t=l[e[t]];l[n+1]=t;l[n]=t[e[a]];else if o~=9 then repeat if 13~=o then if(l[e[d]]~=e[a])then n=n+1;else n=e[t];end;break;end;local e=e[d]l[e]=l[e](c(l,e+1,f))until true;else if(l[e[d]]~=e[a])then n=n+1;else n=e[t];end;end end end else if o<=20 then if o<=18 then l[e[d]]=h[e[t]];else if 17<=o then for f=20,71 do if o~=19 then for o=0,3 do if 2>o then if-1<=o then repeat if o~=1 then l[e[d]]=(e[t]~=0);n=n+1;e=r[n];break;end;h[e[t]]=l[e[d]];n=n+1;e=r[n];until true;else h[e[t]]=l[e[d]];n=n+1;e=r[n];end else if 2<o then if(l[e[d]]~=e[a])then n=n+1;else n=e[t];end;else l[e[d]]=h[e[t]];n=n+1;e=r[n];end end end break;end;h[e[t]]=l[e[d]];break;end;else for o=0,3 do if 2>o then if-1<=o then repeat if o~=1 then l[e[d]]=(e[t]~=0);n=n+1;e=r[n];break;end;h[e[t]]=l[e[d]];n=n+1;e=r[n];until true;else h[e[t]]=l[e[d]];n=n+1;e=r[n];end else if 2<o then if(l[e[d]]~=e[a])then n=n+1;else n=e[t];end;else l[e[d]]=h[e[t]];n=n+1;e=r[n];end end end end end else if o>=22 then if o~=19 then repeat if o~=23 then l[e[d]]();break;end;local n=e[d]local t,e=s(l[n](c(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=t[e];end;until true;else local n=e[d]local t,e=s(l[n](c(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=t[e];end;end else do return end;end end end else if 6<=o then if o<=8 then if o<7 then l[e[d]]=(e[t]~=0);else if o~=7 then if(l[e[d]]~=e[a])then n=n+1;else n=e[t];end;else l[e[d]]=h[e[t]];end end else if o>9 then if o==11 then local e=e[d]l[e]=l[e](c(l,e+1,f))else l[e[d]]();end else local o,j,k,m,b;for u=0,6 do if u<=2 then if u>=1 then if 1<u then l(e[d],e[t]);n=n+1;e=r[n];else o=e[d];j=l[e[t]];l[o+1]=j;l[o]=j[e[a]];n=n+1;e=r[n];end else l[e[d]]=h[e[t]];n=n+1;e=r[n];end else if 4>=u then if 4==u then o=e[d]k,m=s(l[o](c(l,o+1,e[t])))f=m+o-1 b=0;for e=o,f do b=b+1;l[e]=k[b];end;n=n+1;e=r[n];else l[e[d]]=(e[t]~=0);n=n+1;e=r[n];end else if u>=1 then repeat if 6~=u then o=e[d]l[o]=l[o](c(l,o+1,f))n=n+1;e=r[n];break;end;l[e[d]]();until true;else l[e[d]]();end end end end end end else if 2>=o then if o<1 then do return end;else if 2~=o then n=e[t];else h[e[t]]=l[e[d]];end end else if 4>o then local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[a]];else if 2~=o then repeat if 5>o then local n=e[d]local t,e=s(l[n](c(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=t[e];end;break;end;local o,h,f,r,a;local n=0;while n>-1 do if n>2 then if 4<n then if 4<n then repeat if 6>n then l(a,r);break;end;n=-2;until true;else l(a,r);end else if n>2 then repeat if n~=3 then a=o[h];break;end;r=o[f];until true;else r=o[f];end end else if 1>n then o=e;else if n>=-1 then for e=15,76 do if n>1 then f=t;break;end;h=d;break;end;else f=t;end end end n=n+1 end until true;else local n=e[d]local t,e=s(l[n](c(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=t[e];end;end end end end end n=1+n;end;end;return g end;local t=0xff;local h={};local f=(1);local d='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(t)if r>0x1e then return t end r=r+1 e=(e+0xa85-t)%0xd return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x54);end return true end)'GKACn'and l[0x1](0xb0+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x98);end return true end)'t_wPQ'and l[0x3](t+0x1af))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x86);end return true end)'OuEBs'and l[0x2](t+0x338))or t end),(function(a)if r>0x31 then return a end r=r+1 e=(e+0xe0c-a)%0x11 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7f);d={d..'\58 a',d};h[f]=y();f=f+((not o.WgMHQfTk)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'sZoAI'and l[0x3](0xac+a))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x64);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'QPJmp'and l[0x2](a+0x6b))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4c);end return true end)'JcWRB'and l[0x1](a+0x2a6))or a end),(function(o)if r>0x2a then return o end r=r+1 e=(e+0xfea-o)%0x22 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x6f);t[2]=(t[2]*(z(function()h()end,c(d))-z(t[1],c(d))))+1;h[f]={};t=t[2];f=f+t;end return true end)'LnsOu'and l[0x3](0x2de+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x78);end return true end)'ZGgnR'and l[0x2](o+0x368))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe2);h[f]=ne();f=f+t;end return true end)'ijmGB'and l[0x1](o+0x95))or o end)}l[0x2](0xb90)end){};local e=g(c(h));return e(...);end return z((function()local n={}local e=0x01;local l;if o.WgMHQfTk then l=o.WgMHQfTk(z)else l=''end if o.G_bQAnkh(l,o.sViQqQlg)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,l,t,d,o)local o;if e>3 then if 6<=e then if 6>=e then do return d[l]end;else if 3<e then for n=10,59 do if 7<e then do return l(e,nil,l);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 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 end end else if 3<e then repeat if e~=4 then local e=t;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;break;end;local e=t;local f,r,d=d(2);do return function()local o,t,l,n=n(l,e(e,e),e(e,e)+3);e(4);return(n*f)+(l*r)+(t*d)+o;end;end;until true;else local e=t;local d,t,o=d(2);do return function()local l,n,f,r=n(l,e(e,e),e(e,e)+3);e(4);return(r*d)+(f*t)+(n*o)+l;end;end;end end else if 1>=e then if 0<e then 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;else do return n(1),n(4,d,t,l,n),n(5,d,t,l)end;end else if 0<e then repeat if 3~=e then do return 16777216,65536,256 end;break;end;do return n(1),n(4,d,t,l,n),n(5,d,t,l)end;until true;else do return 16777216,65536,256 end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement