Skip to content

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 

History

42 Commits
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Repository files navigation

([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _CGrUgGpFVPVZ = a; end)); return(function(r,...)local d;local t;local h;local f;local o;local a;local e=24915;local n=0;local l={};while n<129 do n=n+1;while n<0x2c2 and e%0x1c7e<0xe3f do n=n+1 e=(e-362)%38581 local c=n+e if(e%0x123e)>=0x91f then e=(e*0x20c)%0x27e1 while n<0x264 and e%0x2da8<0x16d4 do n=n+1 e=(e+790)%21370 local c=n+e if(e%0x4b18)>0x258c then e=(e*0x388)%0x20c9 local e=80411 if not l[e]then l[e]=0x1 t=function(t)local e=0x01 local function l(n)e=e+n return t:sub(e-n,e-0x01)end while true do local n=l(0x01)if(n=="\5")then break end local e=a.byte(l(0x01))local e=l(e)if n=="\2"then e=o.inSHfpuh(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then d[e]=function(n,e)return r(8,nil,r,e,n)end elseif n=="\4"then e=d[e]elseif n=="\0"then e=d[e][l(a.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end elseif e%2~=0 then e=(e-0x3a0)%0x40ef local e=33590 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\105\110\83\72\102\112\117\104\0\6\115\116\114\105\110\103\4\99\104\97\114\100\67\100\90\107\116\90\84\0\6\115\116\114\105\110\103\3\115\117\98\88\81\68\67\107\74\65\113\0\6\115\116\114\105\110\103\4\98\121\116\101\88\106\112\122\87\104\67\90\0\5\116\97\98\108\101\6\99\111\110\99\97\116\76\102\122\99\108\114\95\68\0\5\116\97\98\108\101\6\105\110\115\101\114\116\118\120\99\77\101\65\113\116\5";end else e=(e-0x1b6)%0x3ee2 n=n+1 local e=14440 if not l[e]then l[e]=0x1 h=tonumber;end end end elseif e%2~=0 then e=(e+0xdc)%0xa0b1 while n<0xce and e%0x1bd4<0xdea do n=n+1 e=(e-443)%46935 local t=n+e if(e%0x24bc)>0x125e then e=(e-0x128)%0x2aa3 local e=69665 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e-0x2c6)%0xbda0 local e=49140 if not l[e]then l[e]=0x1 a=string;end else e=(e*0x3a9)%0x2550 n=n+1 local e=48914 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end end end else e=(e-0x32b)%0x38eb n=n+1 while n<0x36f and e%0x1c2c<0xe16 do n=n+1 e=(e-299)%40715 local t=n+e if(e%0x1e50)>=0xf28 then e=(e+0x346)%0x65a0 local e=76022 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e*0x25)%0x3d9b local e=73337 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end else e=(e*0x9c)%0x2bb6 n=n+1 local e=99125 if not l[e]then l[e]=0x1 end end end end end e=(e*436)%37670 end t(f);local e={};for n=0x0,0xff do local l=o.dCdZktZT(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local a=(function(r,a)local f,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local t=r while true do n[0x03][o.XQDCkJAq(a,e,(function()e=f+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#a while e<d+0x01 do n[0x02][l]=o.XQDCkJAq(a,e,(function()e=f+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.vxcMeAqt(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=r+t;end end return o.Lfzclr_D(n[0x01])end);t(a(194,"D!Tsf8daGSIqCBukfs"));t(a(178,"o6%1d&F4YwuZl+./d.u%&+ul/Y1+wQ+4l%4{l/6&FFZ.+l&FY4ll14&lZUZY#4lHJ6d+uF/d&nw+l%A4Y6Z../dYd4ww&%u%.41uY.Z1W1d/Z1.Y&.ul.1+Y%l.41FY%l46uF6d+k1d&uF.11FF+l6*4&FuY641FY&Yl+.w&+41Y4uF&6uFHu/6p&F4+/%114!l%%/F(Z&uY/.Z1/1&=w4++1u4&+F66FnZY//&duF+16uw6l6%d&%&lu.FYZ681&%w..11F4++%//F.lFx.&+u&/Z+d%4.d6/F.lF,+/lZw_)&!Y/+/1&F/+.%Y4&u1/%d.uZYl+lww.C1DF/Z/6&F+u++l1uw&.%%%Y/FlZZ4dldUw&lZU/4d.4l+.7lYdlw%1/.d.0wdww..&16wX+w%wF4w.T4&+Z%hd+u%l.1%&YFlYZ1F%ZFT4&&uF+w1&4dl&6.&du/.F/4"));local e=(-18022+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>150 then return e end l=l+1 n=(n+751)%23812 if(n%1394)>697 then return e else return e(e(e)and e(e))end return e(e(e))end)return n;end)())local de=(getfenv)or(function()return _ENV end);local c=o.ugHXedVu or o.WxtsSTbq;local t=3;local u=4;local g=1;local d=2;local function le(b,...)local s=a(e,"kX+Dy<VPaFrnLRYqaDqaPyqsVYsqVyY(<L+LnLDFnqYarr+FraXR<y+PaRXnyyXjaY>Paaq<VqqLVFYyXLYq<RYy<yaaDXLqynLV+Pn<+qVaXrPDnYDLnyDUrLaq6<aR9XXrYVX*aL#aYLPyqwVaYP+rFnXPLVyFR DrLFDDnP+RnaYYrn+rFnRqF+XnFybLanQXaanqPDYFPXY<VqrPVVRXVDFPXRFDX+an3LaF)XPFq<rDYRPmXPF<Iq<n5<ayLRPFLRyPnqDYnyD+n2+rRV<yR)XaFLy+FoDraRS+aXqqPDXFDYnqDynB+LqdFaXyaLRqPFOytYF+4yaZqLYyVDRX<pRn<aR+y<LVDn<+Y<yaLyy}MFrP+DFYqqaRdPPqYqaLjVPFqrVqqPyaY<<LRa<<Rr+FRa<yLYRrVXREyLLarDfDaD+raFXPPDXaVrqVVLYYVYF^XraaHyaoqLPYqyPHYLVFYyVIRLVrY<<wLLyaLryhnLDaLVDnrL+ary+PFLXaFyDVFLMaay7la+qaP<qCVRYaVaYF<LRa<yRVyLLFyyLvyXnaDyn,+Rra+yr +YFqXyFlOLaR9ya{qLar?8P%YRVaYVVwRL<aqyV<LLyFLyyXnLDLnyy+LP+arP+,FqXaFyXbaLdYay2XPLqnPyqIVLYaVVYC<LRa<yR1yYLayyR<DLnaDynX+LrF+yrE+PFaXyFNwRaa;ya%qLPaqyP4");local n=0;o.zyPGsbEP(function()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,f=r(0,r,e,s,o.XjpzWhCZ);local function a()local l,n=o.XjpzWhCZ(s,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local y=true;local y=0 local function k()local d=n();local e=n();local t=1;local d=(l(e,1,20)*(2^32))+d;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(d==y)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return o.IpcRVuX_(e,n-1023)*(t+(d/(2^52)));end;local m=n;local function p(n)local l;if(not n)then n=m();if(n==0)then return'';end;end;l=o.XQDCkJAq(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+y),#l do e=e..o.XQDCkJAq(l,n,n)end return e;end;local y=#o.nMnxrsmu(h('\49.\48'))~=1 local e=n;local function z(...)return{...},o.oqaJemtx('#',...)end local function ne()local e={};local s={};local c={};local h={s,c,nil,e};local e=n()local r={}for d=1,e do local l=f();local e;if(l==3)then e=(f()~=#{});elseif(l==0)then local n=k();if y and o.QWOPTuFG(o.nMnxrsmu(n),'.(\48+)$')then n=o.WeVYdLYB(n);end e=n;elseif(l==2)then e=p();end;r[d]=e;end;h[3]=f();for c=1,n()do local e=f();if(l(e,1,1)==0)then local o=l(e,2,3);local f=l(e,4,6);local e={a(),a(),nil,nil};if(o==0)then e[t]=a();e[u]=a();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[u]=a();end;if(l(f,1,1)==1)then e[d]=r[e[d]]end if(l(f,2,2)==1)then e[t]=r[e[t]]end if(l(f,3,3)==1)then e[u]=r[e[u]]end s[c]=e;end end;for e=1,n()do c[e-(#{1})]=ne();end;return h;end;local function ee(l,n,e)local d=n;local d=e;return h(o.QWOPTuFG(o.QWOPTuFG(({o.zyPGsbEP(l)})[2],n),e))end local function le(p,e,h)local function ne(...)local f,ee,b,j,s,l,a,_,k,y,m,n;local e=0;while-1<e do if e<3 then if 0>=e then f=r(6,79,1,42,p);ee=r(6,26,2,40,p);else if-2~=e then repeat if e~=2 then b=r(6,36,3,61,p);s=z j=0;break;end;l=-41;a=-1;until true;else l=-41;a=-1;end end else if 4>=e then if-1<e then repeat if 4~=e then _={};k={...};break;end;y=o.oqaJemtx('#',...)-1;m={};until true;else y=o.oqaJemtx('#',...)-1;m={};end else if e>=2 then for l=36,89 do if e>5 then e=-2;break;end;n=r(7);break;end;else n=r(7);end end end e=e+1;end;for e=0,y do if(e>=b)then _[e-b]=k[e+1];else n[e]=k[e+1];end;end;local e=y-b+1 local e;local o;local function r(...)while true do end end while true do if l<-40 then l=l+42 end e=f[l];o=e[g];if 11>=o then if 5>=o then if o<3 then if 1>o then h[e[t]]=n[e[d]];else if 0<=o then repeat if o~=1 then n[e[d]]();break;end;local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[u]];until true;else n[e[d]]();end end else if o>=4 then if 5==o then do return end;else if(n[e[d]]~=e[u])then l=l+1;else l=e[t];end;end else if(n[e[d]]~=e[u])then l=l+1;else l=e[t];end;end end else if o<9 then if 7>o then for o=0,3 do if 2>o then if o<1 then n[e[d]]=(e[t]~=0);l=l+1;e=f[l];else h[e[t]]=n[e[d]];l=l+1;e=f[l];end else if o==2 then n[e[d]]=h[e[t]];l=l+1;e=f[l];else if(n[e[d]]~=e[u])then l=l+1;else l=e[t];end;end end end else if o>=6 then for l=23,84 do if o>7 then local l=e[d]local d,e=s(n[l](c(n,l+1,e[t])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=d[e];end;break;end;n[e[d]]=h[e[t]];break;end;else local l=e[d]local d,e=s(n[l](c(n,l+1,e[t])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=d[e];end;end end else if 9>=o then l=e[t];else if o>8 then for l=33,61 do if 10~=o then local e=e[d]n[e]=n[e](c(n,e+1,a))break;end;local o,f,c,a,r;local l=0;while l>-1 do if l>2 then if 4<l then if l>4 then for e=38,69 do if 5<l then l=-2;break;end;n(r,a);break;end;else n(r,a);end else if 4==l then r=o[f];else a=o[c];end end else if 1<=l then if l==2 then c=t;else f=d;end else o=e;end end l=l+1 end break;end;else local e=e[d]n[e]=n[e](c(n,e+1,a))end end end end else if 18>o then if o<=14 then if o>12 then if o<14 then local e=e[d]n[e]=n[e](c(n,e+1,a))else n[e[d]]();end else local r,_,m,z,p,k,b,o,j,g,y;n[e[d]]=h[e[t]];l=l+1;e=f[l];r=e[d];_=n[e[t]];n[r+1]=_;n[r]=_[e[u]];l=l+1;e=f[l];o=0;while o>-1 do if 2<o then if o<5 then if o<4 then k=m[p];else b=m[z];end else if 3<o then for e=16,78 do if o<6 then n(b,k);break;end;o=-2;break;end;else n(b,k);end end else if o<1 then m=e;else if o~=-3 then for e=34,84 do if 2>o then z=d;break;end;p=t;break;end;else p=t;end end end o=o+1 end l=l+1;e=f[l];r=e[d]j,g=s(n[r](c(n,r+1,e[t])))a=g+r-1 y=0;for e=r,a do y=y+1;n[e]=j[y];end;l=l+1;e=f[l];r=e[d]n[r]=n[r](c(n,r+1,a))l=l+1;e=f[l];n[e[d]]();l=l+1;e=f[l];do return end;end else if o>15 then if o<17 then h[e[t]]=n[e[d]];else n(e[d],e[t]);end else local l=e[d]local d,e=s(n[l](c(n,l+1,e[t])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=d[e];end;end end else if 21>o then if o>18 then if 18~=o then repeat if o~=20 then do return end;break;end;n[e[d]]=(e[t]~=0);until true;else n[e[d]]=(e[t]~=0);end else l=e[t];end else if 22<=o then if o>=18 then for l=18,94 do if o>22 then local l=e[d];local d=n[e[t]];n[l+1]=d;n[l]=d[e[u]];break;end;n[e[d]]=(e[t]~=0);break;end;else n[e[d]]=(e[t]~=0);end else n[e[d]]=h[e[t]];end end end end l=1+l;end;end;return ne end;local d=0xff;local f={};local o=(1);local t='';(function(n)local l=n local a=0x00 local e=0x00 l={(function(t)if a>0x23 then return t end a=a+1 e=(e+0x6f9-t)%0x15 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xdc);f[o]=de();o=o+d;end return true end)'nqmFx'and l[0x3](0x1c6+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x49);end return true end)'cdpZp'and l[0x1](t+0x17a))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7a);end return true end)'VJfGR'and l[0x2](t+0x224))or t end),(function(r)if a>0x2f then return r end a=a+1 e=(e+0x76f-r)%0x4a return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xad);t={t..'\58 a',t};f[o]=ne();o=o+(1);t[1]='\58'..t[1];d[2]=0xff;end return true end)'DDReh'and l[0x3](0x2d0+r))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x36);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'lKulB'and l[0x2](r+0x10a))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa6);end return true end)'dglcy'and l[0x1](r+0x236))or r end),(function(r)if a>0x22 then return r end a=a+1 e=(e+0x111c-r)%0x24 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x54);end return true end)'TWket'and l[0x2](0x2b5+r))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd6);end return true end)'iIhPf'and l[0x3](r+0x124))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x6c);d[2]=(d[2]*(ee(function()f()end,c(t))-ee(d[1],c(t))))+1;f[o]={};d=d[2];o=o+d;end return true end)'GZiQR'and l[0x1](r+0xc5))or r end)}l[0x2](0xc0f)end){};local e=le(c(f));return e(...);end return le((function()local n={}local e=0x01;local l;if o.zJvYPmDJ then l=o.zJvYPmDJ(le)else l=''end if o.QWOPTuFG(l,o.KMKaHppY)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,l,n,t,d,o)local o;if e>3 then if e>5 then if e<=6 then do return d[n]end;else if 6<e then for l=22,76 do if e~=7 then do return n(e,nil,n);end break;end;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 break;end;else do return n(e,nil,n);end end end else if e>4 then local e=t;do return function()local n=l(n,e(e,e),e(e,e));e(1);return n;end;end;else local e=t;local r,a,t=d(2);do return function()local o,d,l,n=l(n,e(e,e),e(e,e)+3);e(4);return(n*r)+(l*a)+(d*t)+o;end;end;end end else if e>1 then if 2<e then do return l(1),l(4,d,t,n,l),l(5,d,t,n)end;else do return 16777216,65536,256 end;end else if-2<e then for o=34,81 do if 1>e then do return l(1),l(4,d,t,n,l),l(5,d,t,n)end;break;end;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;break;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),...)

About

No description, website, or topics provided.

Resources

Stars

0 stars

Watchers

1 watching

Forks

Releases

Packages

Contributors

Languages