Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _rfhjrrxnsJtZ = a; end)); return(function(r,...)local t;local o;local a;local d;local f;local h;local e=24915;local n=0;local l={};while n<474 do n=n+1;while n<0x37a and e%0x460e<0x2307 do n=n+1 e=(e+774)%26305 local c=n+e if(e%0x42a4)>0x2152 then e=(e*0xa5)%0x420b while n<0x314 and e%0x4006<0x2003 do n=n+1 e=(e-873)%48413 local d=n+e if(e%0x269a)>=0x134d then e=(e+0x20f)%0xa904 local e=11184 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e+0x2a8)%0xb6f7 local e=78828 if not l[e]then l[e]=0x1 h=tonumber;end else e=(e+0xd5)%0x7ff1 n=n+1 local e=65224 if not l[e]then l[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\82\113\76\114\66\109\114\83\0\6\115\116\114\105\110\103\4\99\104\97\114\98\98\99\109\70\95\86\117\0\6\115\116\114\105\110\103\3\115\117\98\76\114\81\69\111\114\102\90\0\6\115\116\114\105\110\103\4\98\121\116\101\74\95\116\103\114\115\66\84\0\5\116\97\98\108\101\6\99\111\110\99\97\116\83\112\71\117\106\102\87\117\0\5\116\97\98\108\101\6\105\110\115\101\114\116\67\107\108\100\79\66\68\116\5";end end end elseif e%2~=0 then e=(e-0x37e)%0x73b5 while n<0x3d0 and e%0x4200<0x2100 do n=n+1 e=(e-939)%19021 local a=n+e if(e%0x44e2)>=0x2271 then e=(e*0x176)%0xe24 local e=53277 if not l[e]then l[e]=0x1 f=string;end elseif e%2~=0 then e=(e*0x370)%0x4bfa local e=87467 if not l[e]then l[e]=0x1 o={};end else e=(e-0x3f1)%0x87d8 n=n+1 local e=18260 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=f.byte(l(0x01))local e=l(e)if n=="\2"then e=o.RqLrBmrS(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(e,n)return r(8,nil,r,n,e)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][l(f.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end end end else e=(e+0xc7)%0xba25 n=n+1 while n<0x261 and e%0x357c<0x1abe do n=n+1 e=(e+330)%23008 local d=n+e if(e%0x3df4)>=0x1efa then e=(e-0x39a)%0x5f0f local e=53329 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x6f)%0x2e42 local e=68056 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e+0xd3)%0x3ff0 n=n+1 local e=50464 if not l[e]then l[e]=0x1 end end end end end e=(e+847)%18574 end d(a);local n={};for e=0x0,0xff do local l=o.bbcmF_Vu(e);n[e]=l;n[l]=e;end local function c(e)return n[e];end local a=(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.LrQEorfZ(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.LrQEorfZ(r,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.CkldOBDt(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=f+d;end end return o.SpGujfWu(n[0x01])end);d(a(100,"aXBPo?S_})e#^b73eX"));d(a(121,"nce PORQB1V-5rg^BQcP7B1*cO1 c^1^5 VVPe5cP-re crBORg QOrPRr1geRcB1ecQV1 Z-cee-?ORV-POggPgBP%^2cBV%B1PecQB^rB1 VecgrPe1R5^1grQO^VQB2PBPV11Bc Vre V^e_-^ec5r Vr-RO^eDR1cBc^51Rcc Oe VeeV5PP 5 reRCg5OOrQO51ReOc B5eeVeec-Qe-5O 15cOereOQgOP5/eOcc61Rb^ 9--Vg 7--P 5BPRreOegPP:rQQ-gOO-^eQ-VV Re5VdeB-1 1RcOQrQRUrBRc^NOO^rQ c 1-c5VVe1PBrc5QPQr_PBrcR?5PPg5-R1^cRBcgVc-BPy e-- 15OOe-^OrrOPk^CR^^^BRVceVcg1QeOVOeV5ePVrOO5rOR ^cQ1^ Kr1BBB( 1rcB 5eP-c -5eP5V1 c5 Pg^PO-gjRV1g"));local e=(11+(function()local l,e=0,1;(function(n,t,l,e)t(e(t,l,l,l),e(e,l,n,t),n(e,e,n,n),n(l and t,e,e,n))end)(function(d,r,t,n)if l>330 then return t end l=l+1 e=(e*761)%23439 if(e%308)<154 then return n(r(t and n,d,r,n),n(t,d,d and t,d),n(t,n and t,n,r),n(n and d,t and t,n and n,n))else return r end return d end,function(t,r,d,n)if l>468 then return n end l=l+1 e=(e-523)%321 if(e%1272)<=636 then return r(r(n,d,r,d and t)and n(n,n and n,n and d,d),r(t and n,t,t,t),t(n,r,d,t and r),t(d,d,n,n and n))else return d end return t end,function(d,n,t,r)if l>140 then return n end l=l+1 e=(e*1003)%35612 if(e%872)<=436 then e=(e+834)%2255 return t(d(d,n,n and n,r),t(n,t and d,n,d),n(d,r,t,d),r(n,t,d,t))else return t end return t end,function(r,n,t,d)if l>397 then return n end l=l+1 e=(e-1016)%47566 if(e%1462)>=731 then e=(e*519)%33320 return t(n(d,r,d,n),n(t,t,t and r,t and n),r(t,n,d,n),d(r,t,d,n))else return r end return d end)return e;end)())local z=(getfenv)or(function()return _ENV end);local u=o.HKAXYIxt or o.IjYrsmtl;local y=1;local t=3;local f=4;local d=2;local function _(p,...)local b=a(e,"Pp(.&x+G}bQ!56Y<b<.a5}+f<QbG(}5Zx}.}<5b&(}bG&6<&pQ!&&}YaG}GG;bQ6.6G((pQ^.}6s!x+<-GbYp!5xx!Y<G!.&5Qxb<+}G(!b}xpY&G5px!+(pY5}&pQ&(.GGsK}Q-Qn&&65G2m!+Q<G}<+Q<pb<YY!<xb<5}}(6!(x6<.G6((Q!&<Y+}&U6QY&5bY+!R<Qx<<65+<<Qbb<5b.(<<pxGp.!!+(<pb4(55.pG<(G6p+!!9<YkGx:bQ&&!b<GxcpQp.YbG.&6g+x<6bpxQ5xxY((}!(+!QxGY5}xpbY&&Yp&G<&+Q<&m15+Y&&Yx+bQ(x<64+}JBY5b}.p6.p}<+bp(5!6p3<<}p(!G8x}<(}G(&Q6&.Y5Gx^5+D&<6bG5w}x}p66G+<7+}.(65.p}Y+x!5(+x<,}}(qpG5(&YY}}(((!Qx}Y+}.<(!&.(G(p(Ql.}6T6&+<<bb&.!6&+Q<bb+(G+G<1}}(A!}xYY}},p}!p&}Y)G}((!Y&L6}GmJ!Q9.}6tGQR+b}.e5}++<}b%(}Y++(<0}}(W!YxWYb}Ep6!_&5Y!G}p1Q}&+6}Gp4}Q&&.6*+}Ahb<.v5b+7<}Q+(}5gx}<p}}(^!}+(Yb}Kp}!>&<YNG}pd!Q&76}Gpf}Q(.}6k+}(;!p.25b+W<bbg(b5w+Q)}}}(.!}x&Y}}_p}!=xQY#Gbp*Q!&86}GKo}Q5.}67+}dtb}.(5}+Z<Ybg(}5#xb<3}b(s!}x5Y}}=p}!p&}YNG}plQ}&_6}GO");local n=0;o.fPWvDWyR(function()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,c=r(0,r,e,b,o.J_tgrsBT);local function a()local n,l=o.J_tgrsBT(b,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local s=true;local s=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==s)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.iRjqvXSQ(e,n-1023)*(d+(t/(2^52)));end;local g=n;local function k(n)local l;if(not n)then n=g();if(n==0)then return'';end;end;l=o.LrQEorfZ(b,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+s),#l do e=e..o.LrQEorfZ(l,n,n)end return e;end;local s=#o.rGWtWFVX(h('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.uyykryzm('#',...)end local function m()local h={};local e={};local b={};local u={h,b,nil,e};local e=n()local r={}for t=1,e do local l=c();local e;if(l==1)then e=(c()~=#{});elseif(l==3)then local n=j();if s and o.RjEjPjms(o.rGWtWFVX(n),'.(\48+)$')then n=o.HITXwWUX(n);end e=n;elseif(l==2)then e=k();end;r[t]=e;end;for u=1,n()do local e=c();if(l(e,1,1)==0)then local o=l(e,2,3);local c=l(e,4,6);local e={a(),a(),nil,nil};if(o==0)then e[t]=a();e[f]=a();elseif(o==#{1})then e[t]=n();elseif(o==p[2])then e[t]=n()-(2^16)elseif(o==p[3])then e[t]=n()-(2^16)e[f]=a();end;if(l(c,1,1)==1)then e[d]=r[e[d]]end if(l(c,2,2)==1)then e[t]=r[e[t]]end if(l(c,3,3)==1)then e[f]=r[e[f]]end h[u]=e;end end;for e=1,n()do b[e-(#{1})]=m();end;u[3]=c();return u;end;local function _(l,n,e)local t=n;local t=e;return h(o.RjEjPjms(o.RjEjPjms(({o.fPWvDWyR(l)})[2],n),e))end local function le(p,e,h)local function ee(...)local c,z,s,m,b,l,a,j,k,g,_,n;local e=0;while-1<e do if e>=3 then if e>=5 then if e>5 then e=-2;else n=r(7);end else if 4>e then j={};k={...};else g=o.uyykryzm('#',...)-1;_={};end end else if 0>=e then c=r(6,84,1,23,p);z=r(6,24,2,37,p);else if-3~=e then for n=45,81 do if e<2 then s=r(6,22,3,20,p);b=ne m=0;break;end;l=-41;a=-1;break;end;else l=-41;a=-1;end end end e=e+1;end;for e=0,g do if(e>=s)then j[e-s]=k[e+1];else n[e]=k[e+1];end;end;local e=g-s+1 local e;local r;local function o(...)while true do end end while true do if l<-40 then l=l+42 end e=c[l];r=e[y];if 12>r then if 5>=r then if 3>r then if r<1 then local r,s,p,k,o;n[e[d]]=h[e[t]];l=l+1;e=c[l];r=e[d];s=n[e[t]];n[r+1]=s;n[r]=s[e[f]];l=l+1;e=c[l];n(e[d],e[t]);l=l+1;e=c[l];r=e[d]p,k=b(n[r](u(n,r+1,e[t])))a=k+r-1 o=0;for e=r,a do o=o+1;n[e]=p[o];end;l=l+1;e=c[l];r=e[d]n[r]=n[r](u(n,r+1,a))l=l+1;e=c[l];n[e[d]]();l=l+1;e=c[l];do return end;else if r~=0 then repeat if r~=2 then n[e[d]]=h[e[t]];break;end;h[e[t]]=n[e[d]];until true;else n[e[d]]=h[e[t]];end end else if r>=4 then if r>0 then repeat if r~=5 then n[e[d]]();break;end;local l=e[d]local t,e=b(n[l](u(n,l+1,e[t])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=t[e];end;until true;else n[e[d]]();end else local e=e[d]n[e]=n[e](u(n,e+1,a))end end else if 8>=r then if r>=7 then if r~=5 then for l=28,74 do if r~=8 then n[e[d]]=(e[t]~=0);break;end;local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[f]];break;end;else n[e[d]]=(e[t]~=0);end else if(n[e[d]]==e[f])then l=l+1;else l=e[t];end;end else if r<=9 then n[e[d]]=(e[t]~=0);else if 8~=r then repeat if 11~=r then local e=e[d]n[e]=n[e](u(n,e+1,a))break;end;l=e[t];until true;else local e=e[d]n[e]=n[e](u(n,e+1,a))end end end end else if 17>=r then if r<15 then if 12<r then if r==14 then for r=0,3 do if 2>r then if-2<r then for o=12,61 do if 0~=r then h[e[t]]=n[e[d]];l=l+1;e=c[l];break;end;n[e[d]]=(e[t]~=0);l=l+1;e=c[l];break;end;else n[e[d]]=(e[t]~=0);l=l+1;e=c[l];end else if 0~=r then for o=34,74 do if 2~=r then if(n[e[d]]==e[f])then l=l+1;else l=e[t];end;break;end;n[e[d]]=h[e[t]];l=l+1;e=c[l];break;end;else if(n[e[d]]==e[f])then l=l+1;else l=e[t];end;end end end else n[e[d]]=h[e[t]];end else n(e[d],e[t]);end else if 15<r then if 13<=r then for o=41,68 do if 17~=r then if(n[e[d]]==e[f])then l=l+1;else l=e[t];end;break;end;local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[f]];break;end;else local l=e[d];local t=n[e[t]];n[l+1]=t;n[l]=t[e[f]];end else h[e[t]]=n[e[d]];end end else if r>20 then if 21<r then if r>=18 then for l=36,59 do if r~=22 then n[e[d]]();break;end;do return end;break;end;else do return end;end else do return end;end else if r<19 then local o,a,r,f,c;local l=0;while l>-1 do if l<3 then if l>0 then if l>=-3 then repeat if l~=2 then a=d;break;end;r=t;until true;else r=t;end else o=e;end else if 5>l then if 0<=l then for e=22,67 do if l>3 then c=o[a];break;end;f=o[r];break;end;else f=o[r];end else if 4<l then repeat if l>5 then l=-2;break;end;n(c,f);until true;else l=-2;end end end l=l+1 end else if r>=15 then for o=22,91 do if r~=19 then local l=e[d]local t,e=b(n[l](u(n,l+1,e[t])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=t[e];end;break;end;l=e[t];break;end;else l=e[t];end end end end end l=1+l;end;end;return ee end;local t=0xff;local a={};local r=(1);local d='';(function(n)local l=n local o=0x00 local e=0x00 l={(function(f)if o>0x28 then return f end o=o+1 e=(e+0x812-f)%0x48 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x8e);a[r]=z();r=r+t;end return true end)'KnBQY'and l[0x2](0x30d+f))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xbb);end return true end)'EcupG'and l[0x3](f+0x13f))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd1);t[2]=(t[2]*(_(function()a()end,u(d))-_(t[1],u(d))))+1;a[r]={};t=t[2];r=r+t;end return true end)'AfVmK'and l[0x1](f+0x19c))or f end),(function(f)if o>0x29 then return f end o=o+1 e=(e+0x8bb-f)%0x41 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x67);end return true end)'qnVkf'and l[0x3](0xd7+f))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb7);d={d..'\58 a',d};a[r]=m();r=r+(1);d[1]='\58'..d[1];t[2]=0xff;end return true end)'kxThW'and l[0x1](f+0x34d))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x85);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'cHvDx'and l[0x2](f+0x1ba))or f end),(function(t)if o>0x24 then return t end o=o+1 e=(e+0xcd5-t)%0x43 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xab);end return true end)'Jbibo'and l[0x3](0x3e2+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7);end return true end)'ELrwG'and l[0x2](t+0x2e8))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe3);end return true end)'hRMPW'and l[0x1](t+0x353))or t end)}l[0x2](0x1c02)end){};local e=le(u(a));return e(...);end return _((function()local n={}local e=0x01;local l;if o.pHh_epHZ then l=o.pHh_epHZ(_)else l=''end if o.RjEjPjms(l,o.DBGjRGvD)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,r)local r;if l>=4 then if 6<=l then if 6>=l then do return d[n]end;else if 5<=l then repeat if l~=8 then 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;do return n(l,nil,n);end until true;else do return n(l,nil,n);end end end else if 0<l then repeat if l~=5 then local l=t;local f,r,o=d(2);do return function()local d,t,n,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*f)+(n*r)+(t*o)+d;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;until true;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 else if 1<l then if 0~=l then repeat if 3~=l 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;until true;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end else if l<1 then do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;else 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;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement