Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) __PglJnEIXUFr = a; end)); return(function(u,...)local d;local f;local o;local s;local r;local t;local e=24915;local n=0;local l={};while n<857 do n=n+1;while n<0x2f5 and e%0xfa4<0x7d2 do n=n+1 e=(e+951)%39184 local c=n+e if(e%0x3d86)>0x1ec3 then e=(e-0x8b)%0x6202 while n<0x34c and e%0x47bc<0x23de do n=n+1 e=(e*793)%24416 local d=n+e if(e%0x10d4)<=0x86a then e=(e+0x25c)%0x9ad6 local e=4024 if not l[e]then l[e]=0x1 r=string;end elseif e%2~=0 then e=(e-0x152)%0x2acc local e=88646 if not l[e]then l[e]=0x1 o={};end else e=(e*0x145)%0xa6dd n=n+1 local e=53547 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end end end elseif e%2~=0 then e=(e-0x16e)%0x429b while n<0xb3 and e%0x27b0<0x13d8 do n=n+1 e=(e-822)%48024 local c=n+e if(e%0x339e)>0x19cf then e=(e*0x254)%0x969a local e=57801 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x297)%0x75d1 local e=92952 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\72\104\104\102\80\73\114\84\0\6\115\116\114\105\110\103\4\99\104\97\114\71\115\85\73\82\97\80\72\0\6\115\116\114\105\110\103\3\115\117\98\103\121\95\99\67\87\104\95\0\6\115\116\114\105\110\103\4\98\121\116\101\70\109\109\101\88\95\120\65\0\5\116\97\98\108\101\6\99\111\110\99\97\116\81\120\100\88\105\114\83\73\0\5\116\97\98\108\101\6\105\110\115\101\114\116\85\118\76\97\112\81\100\73\5";end else e=(e+0x2dd)%0x673d n=n+1 local e=18574 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.HhhfPIrT(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 end end else e=(e*0x23c)%0x7b40 n=n+1 while n<0xbb and e%0x170e<0xb87 do n=n+1 e=(e*750)%43000 local d=n+e if(e%0x12e8)<=0x974 then e=(e*0x234)%0xc204 local e=20676 if not l[e]then l[e]=0x1 s=tonumber;end elseif e%2~=0 then e=(e+0x55)%0x7e66 local e=39760 if not l[e]then l[e]=0x1 end else e=(e*0x3ce)%0x83d8 n=n+1 local e=56932 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end end end e=(e*842)%41066 end d(f);local n={};for e=0x0,0xff do local l=o.GsUIRaPH(e);n[e]=l;n[l]=e;end local function a(e)return n[e];end local l=(function(f,d)local c,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local r=f while true do n[0x03][o.gy_cCWh_(d,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=#d while e<t+0x01 do n[0x02][l]=o.gy_cCWh_(d,e,(function()e=c+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.UvLapQdI(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 o.QxdXirSI(n[0x01])end);d(l(139,"QyXvhr0s632^ZV}Os2"));d(l(110,"K.cr>42&5h7y:qf6hcc7chy:>:q42:6&c2.5yy>4q7&c62&cc7h4>67:&(hocrce74r4qc2>::54cc7h>::h2.q4.yy.7f>c:y2c67h.1>7&rcq4r5q.2c75>=r6qc2cfy5clqrqr&yq2cfr&7n&yl.qyr42fr5..5r>:7:4>y6(&274hfc5yy2{f74.b.hrr7h24rf&5r7Or7rry&45fr2qJf5qrcy.>>fg2yD>5>r.7r>.:r4rl:c::.7c>rqr&2Mrh5fy7.c&f&&hq5&7.77qqf&!&46.5yc575>>yJ>&Pc2.cMyFq52hrrq>52mr5>>fq524q6cSy2y>>.q&27675r.774.4qk>4qy5>fq7qrf2T6&65&&W772r.2>246,5>{&hyr4:>4y6c42..hqr7:66)5>54.L7>c&yy44f55.67&7.q:f4:q9.n7r78r>yq4>f:>:f25q..y5cffh5chfrcr.y4>fqh2hg:hqR6hr>hf5&r^f7.y74H>yq.&26:cy.fy2>yqq&c6y&:66h:>>fcr66.c&"));local e=(-3505+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>386 then return e end l=l+1 n=(n*235)%7496 if(n%1376)<=688 then n=(n+223)%27874 return e else return e(e(e and e))end return e(e(e))end)return n;end)())local ee=(getfenv)or(function()return _ENV end);local c=o.lsZHYxtV or o.hmrDmgru;local t=2;local ne=1;local d=3;local a=4;local function j(y,...)local f=l(e,"<OXKQ4yI_8-3%&^ey^%^K48%GKII&OK_8ey4%%XQ-XN^4K&^O%_Ie&yO38Q%QO%eceIy&&8_OKI3^%?g-&OI_O^OZK%OOX_38e4y3eXK_e^IQ%%QO%_X-4yK3%X^_8-_K%%4X%8X&^4I3%^dI&%Oe4I4%KX-8OQ4%^K483^IyM%4X__KH3Id%^K-8-f&Q8&OKK8-.XIX-%Qy-&OXYI-X&4K%-KIX^4Q%-eO8QI-KY--IO0Ie^8QI3hXO_y&3Me33OeII^NQ8I-OQQ33_O_3}^8Ie3_O%_OO^443_4K_8eX4K^&4X8aeO4_3&X-__X&8&eWeyyO%QX38Xyj%OKQ8K84gKyK%-KO^gIK&-K&I3oEIyy8&-KI8^V4&_QX83P4I3^KQ_-yOXIX_X&8Qc-Iw^_y&%QK--OXI_&eQy3eX8I3^XQ83KOII^^44^3yO-_O^_4W3yO&_QOOyX38Xj_IeQ443&XK_%eO4%&OXy_&eQyO%XX-8:e3Ip%4X%8KAOyO%8Xe8yE=yQ%3KX8-d?yI%^QI--TKy-&OKe8eHyy&^yQQ-Xr-IN&%K^-4,%8K&3QO-8)eII&&Q--3XQ_4^bQ--^O8I%^KQ-3OXyIe^-Q&34O3_X^84N%NO^_y^%4I3-XO__^eyQ3&XQ_3eX48%XXI_^H34%%KX-8Xe_yD%yX&8Ie3yX%8KO8Ie^y4%%KK8-oOy_");local n=0;o.BitizekM(function()o.blFKtAnl()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.FmmeX_xA);local function r()local l,n=o.FmmeX_xA(f,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local _=true;local _=0 local function b()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.EccxBmoy(e,n-1023)*(d+(t/(2^52)));end;local k=n;local function g(n)local l;if(not n)then n=k();if(n==0)then return'';end;end;l=o.gy_cCWh_(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+_),#l do e=e..o.gy_cCWh_(l,n,n)end return e;end;local k=#o.EnQUlCqp(s('\49.\48'))~=1 local e=n;local function m(...)return{...},o.sSEivoxy('#',...)end local function p()local e={};local s={};local u={};local _={u,s,nil,e};local e=n()local f={}for t=1,e do local l=h();local n;if(l==3)then n=(h()~=#{});elseif(l==1)then local e=b();if k and o.czUYjeqv(o.EnQUlCqp(e),'.(\48+)$')then e=o.iXITjvAa(e);end n=e;elseif(l==0)then n=g();end;f[t]=n;end;for s=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local c=l(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[d]=r();e[a]=r();elseif(o==#{1})then e[d]=n();elseif(o==y[2])then e[d]=n()-(2^16)elseif(o==y[3])then e[d]=n()-(2^16)e[a]=r();end;if(l(c,1,1)==1)then e[t]=f[e[t]]end if(l(c,2,2)==1)then e[d]=f[e[d]]end if(l(c,3,3)==1)then e[a]=f[e[a]]end u[s]=e;end end;_[3]=h();for e=1,n()do s[e-(#{1})]=p();end;return _;end;local function g(l,e,n)local t=e;local t=n;return s(o.czUYjeqv(o.czUYjeqv(({o.BitizekM(l)})[2],e),n))end local function j(_,e,h)local function z(...)local f,j,y,p,s,l,r,g,k,b,z,n;local e=0;while-1<e do if e>=3 then if e>4 then if e~=6 then n=u(7);else e=-2;end else if e~=4 then g={};k={...};else b=o.sSEivoxy('#',...)-1;z={};end end else if e<1 then f=u(6,26,1,15,_);j=u(6,36,2,59,_);else if e>=-2 then repeat if e>1 then l=-41;r=-1;break;end;y=u(6,89,3,80,_);s=m p=0;until true;else y=u(6,89,3,80,_);s=m p=0;end end end e=e+1;end;for e=0,b do if(e>=y)then g[e-y]=k[e+1];else n[e]=k[e+1];end;end;local e=b-y+1 local e;local o;local function u(...)while true do end end while true do if l<-40 then l=l+42 end e=f[l];o=e[ne];if o>11 then if 17>=o then if o<15 then if 13<=o then if o~=14 then local l=e[t]local t,e=s(n[l](c(n,l+1,e[d])))r=e+l-1 local e=0;for l=l,r do e=e+1;n[l]=t[e];end;else n[e[t]]=h[e[d]];end else local l=e[t];local t=n[e[d]];n[l+1]=t;n[l]=t[e[a]];end else if o>15 then if 17>o then n[e[t]]=(e[d]~=0);else for o=0,3 do if 1<o then if 0<o then for r=14,65 do if o<3 then n[e[t]]=h[e[d]];l=l+1;e=f[l];break;end;if(n[e[t]]==e[a])then l=l+1;else l=e[d];end;break;end;else if(n[e[t]]==e[a])then l=l+1;else l=e[d];end;end else if-3<o then for r=26,79 do if 1>o then n[e[t]]=(e[d]~=0);l=l+1;e=f[l];break;end;h[e[d]]=n[e[t]];l=l+1;e=f[l];break;end;else h[e[d]]=n[e[t]];l=l+1;e=f[l];end end end end else l=e[d];end end else if 21>o then if 19<=o then if 15<=o then for l=34,62 do if 19~=o then n[e[t]]();break;end;h[e[d]]=n[e[t]];break;end;else h[e[d]]=n[e[t]];end else l=e[d];end else if o>=22 then if 19<=o then for r=48,56 do if 22<o then n[e[t]]();break;end;if(n[e[t]]==e[a])then l=l+1;else l=e[d];end;break;end;else n[e[t]]();end else local e=e[t]n[e]=n[e](c(n,e+1,r))end end end else if 6>o then if 3>o then if 0>=o then if(n[e[t]]==e[a])then l=l+1;else l=e[d];end;else if 0~=o then for l=29,60 do if o<2 then local o,r,a,c,f;local l=0;while l>-1 do if 2>=l then if 0<l then if l==1 then r=t;else a=d;end else o=e;end else if l<5 then if 1~=l then repeat if l~=3 then f=o[r];break;end;c=o[a];until true;else f=o[r];end else if 1<=l then repeat if l<6 then n(f,c);break;end;l=-2;until true;else l=-2;end end end l=l+1 end break;end;local l=e[t]local t,e=s(n[l](c(n,l+1,e[d])))r=e+l-1 local e=0;for l=l,r do e=e+1;n[l]=t[e];end;break;end;else local l=e[t]local t,e=s(n[l](c(n,l+1,e[d])))r=e+l-1 local e=0;for l=l,r do e=e+1;n[l]=t[e];end;end end else if 3<o then if 2<o then repeat if o~=5 then local e=e[t]n[e]=n[e](c(n,e+1,r))break;end;local t=e[t];local l=n[e[d]];n[t+1]=l;n[t]=l[e[a]];until true;else local e=e[t]n[e]=n[e](c(n,e+1,r))end else do return end;end end else if o<=8 then if 6<o then if 5~=o then repeat if o>7 then do return end;break;end;n[e[t]]=h[e[d]];until true;else n[e[t]]=h[e[d]];end else h[e[d]]=n[e[t]];end else if o<=9 then local o,k,b,_,u;for y=0,6 do if y<3 then if y>0 then if 2==y then n(e[t],e[d]);l=l+1;e=f[l];else o=e[t];k=n[e[d]];n[o+1]=k;n[o]=k[e[a]];l=l+1;e=f[l];end else n[e[t]]=h[e[d]];l=l+1;e=f[l];end else if 5>y then if 0<y then for a=37,85 do if 4~=y then n[e[t]]=(e[d]~=0);l=l+1;e=f[l];break;end;o=e[t]b,_=s(n[o](c(n,o+1,e[d])))r=_+o-1 u=0;for e=o,r do u=u+1;n[e]=b[u];end;l=l+1;e=f[l];break;end;else o=e[t]b,_=s(n[o](c(n,o+1,e[d])))r=_+o-1 u=0;for e=o,r do u=u+1;n[e]=b[u];end;l=l+1;e=f[l];end else if 6==y then n[e[t]]();else o=e[t]n[o]=n[o](c(n,o+1,r))l=l+1;e=f[l];end end end end else if o>10 then n[e[t]]=(e[d]~=0);else n(e[t],e[d]);end end end end end l=1+l;end;end;return z end;local t=0xff;local a={};local r=(1);local d='';(function(n)local l=n local f=0x00 local e=0x00 l={(function(c)if f>0x2e then return c end f=f+1 e=(e+0x542-c)%0x2d return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x46);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'bIdVR'and l[0x1](0x39c+c))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x33);d={d..'\58 a',d};a[r]=p();r=r+((not o.vhRxQyDv)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'npQMo'and l[0x3](c+0x2bc))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7d);end return true end)'DFXda'and l[0x2](c+0x293))or c end),(function(t)if f>0x23 then return t end f=f+1 e=(e+0xb83-t)%0x45 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb8);end return true end)'X_JsA'and l[0x1](0x7b+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4e);end return true end)'ZvXpB'and l[0x3](t+0x23f))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf8);end return true end)'GxUhW'and l[0x2](t+0x1ed))or t end),(function(o)if f>0x26 then return o end f=f+1 e=(e+0xd9f-o)%0x1b return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x8c);t[2]=(t[2]*(g(function()a()end,c(d))-g(t[1],c(d))))+1;a[r]={};t=t[2];r=r+t;end return true end)'Qwvlq'and l[0x1](0x29c+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd9);a[r]=ee();r=r+t;end return true end)'dxTGx'and l[0x3](o+0x214))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7d);end return true end)'YzLJP'and l[0x2](o+0x141))or o end)}l[0x1](0x84)end){};local e=j(c(a));return e(...);end return j((function()local n={}local e=0x01;local l;if o.vhRxQyDv then l=o.vhRxQyDv(j)else l=''end if o.czUYjeqv(l,o.yZkduFML)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 6<=l then if l>6 then if 3<=l then repeat if 8~=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 break;end;do return n(l,nil,n);end until true;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 else do return d[n]end;end else if 2<l then repeat if 5~=l then local l=t;local t,f,r=d(2);do return function()local o,n,d,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*t)+(d*f)+(n*r)+o;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 l>=2 then if 1<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-4~=l then for o=36,67 do if 0<l 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;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 end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement