-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathmaru-kill-aura
More file actions
1 lines (1 loc) · 13.3 KB
/
maru-kill-aura
File metadata and controls
1 lines (1 loc) · 13.3 KB
1
([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _OUvhSrP_dhWU = a; end)); return(function(u,...)local f;local d;local r;local t;local o;local s;local e=24915;local n=0;local l={};while n<806 do n=n+1;while n<0x15d and e%0x29a2<0x14d1 do n=n+1 e=(e+393)%16390 local a=n+e if(e%0x1846)<=0xc23 then e=(e-0x243)%0x5391 while n<0x24d and e%0x8f2<0x479 do n=n+1 e=(e*746)%13766 local t=n+e if(e%0x2d98)<=0x16cc then e=(e+0x1a8)%0x3fa3 local e=91885 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e+0x182)%0x3e95 local e=6847 if not l[e]then l[e]=0x1 end else e=(e+0xaa)%0xaca9 n=n+1 local e=32889 if not l[e]then l[e]=0x1 f=string;end end end elseif e%2~=0 then e=(e+0x5a)%0x60b4 while n<0x2a6 and e%0x1a2c<0xd16 do n=n+1 e=(e*467)%42070 local a=n+e if(e%0x2772)>=0x13b9 then e=(e*0x391)%0xa399 local e=93076 if not l[e]then l[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\117\106\65\112\84\86\114\119\0\6\115\116\114\105\110\103\4\99\104\97\114\98\121\111\120\118\112\109\66\0\6\115\116\114\105\110\103\3\115\117\98\79\68\117\73\103\119\121\106\0\6\115\116\114\105\110\103\4\98\121\116\101\100\120\111\66\122\71\120\80\0\5\116\97\98\108\101\6\99\111\110\99\97\116\102\102\101\98\77\118\79\114\0\5\116\97\98\108\101\6\105\110\115\101\114\116\101\69\106\87\117\95\85\101\5";end elseif e%2~=0 then e=(e*0x185)%0x2140 local e=97159 if not l[e]then l[e]=0x1 end else e=(e+0x287)%0x6f4b n=n+1 local e=84559 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=f.byte(n(0x01))local e=n(e)if l=="\2"then e=o.ujApTVrw(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(f.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end end end else e=(e*0x23f)%0x6f53 n=n+1 while n<0x367 and e%0x156e<0xab7 do n=n+1 e=(e+314)%22229 local d=n+e if(e%0x450e)>0x2287 then e=(e-0x3a9)%0x79fa local e=86381 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e+0x1ff)%0xa2f2 local e=64771 if not l[e]then l[e]=0x1 s=tonumber;end else e=(e+0x2e2)%0x3ae4 n=n+1 local e=30543 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end end end end end e=(e*388)%36342 end d(r);local e={};for n=0x0,0xff do local l=o.byoxvpmB(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local l=(function(r,d)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local f=r while true do n[0x03][o.ODuIgwyj(d,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=#d while e<t+0x01 do n[0x02][l]=o.ODuIgwyj(d,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.eEjWu_Ue(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+f)%0x100)));f=r+f;end end return o.ffebMvOr(n[0x01])end);d(l(150,"r^GVo{j,JyZ}dTz2j2"));d(l(106,"PIsYH-=r l?gJzf_l=YsY-JJ=ofz IrH?HNfrr-Kf sHJrHl_gllsgg f r_ mGllzYfzH--_l IY JY==fI=l?_HlH?fs=_D??=sfzr==ffl?IzJss=r IHIr?fHsJ_=?_lszsgg--ffYrf_glJs??_=f_llfYf-J_=_-r_s gsf-fsr^wrgiYfzlHfzrl-ssJlHgf-I g=gYYgfQ=__z?ss-Jf-If IrlJYszJrIol JH-Jf_Jl-r?I_gY-?fg Hzg gY-?JH?flrHIl?Y_s lIII?_-xgrrH_ l_slJzHs_)sHgl rsJJ_=_I=lgYggJ=-l YsYHJ--__= ?IrgsHIz= &_HlfY-JR=)f8s:ggJ{HYz?r?BlHcH-zH=J_Y gslg_HIzl 4ffl-s_J-i ?%?-YHJJ-Yfg l_-?I-IJ?rYff?-s = __;}l s-J!-JJI=Yssl sYJf=ffIYsJ?Jz--_s II-gJYIg_ I!_?lIzg?Y? fs srgI-?fHIrXf??HYzlrsAJ=fiJ?fY-zz==IlHg"));local e=(-16201+(function()local l,e=0,1;(function(e)e(e(e))end)(function(n)if l>223 then return n end l=l+1 e=(e*680)%47498 if(e%1546)<773 then e=(e*95)%16086 return n(n(n))else return n end return n end)return e;end)())local h=o.AWqTgLmZ or o.kWYjBSWW;local le=(getfenv)or(function()return _ENV end);local t=3;local r=4;local d=2;local ee=1;local function m(y,...)local c=l(e,"#NWiZy8TIEH2XCU*WHZ88EIX2VC**yNIi22CCg*EiCyW8JHWHiCy*CWZi8yTW8yW82IU2NZ;88T2HNCi*TNIiWyHT8ii2WTIE22UZETIE22HU,XHUWRyyCTC2NXC*Ib2iCyTINHIXHHIN6iLZZ8EIUT2UW*yWTZN82EW2ZEi2TC*kWy8ZH8*2U2NXXWiNCiE8!T2HyXHNEiXWHyITXEH22CE.NWWTTTNIC2in8*INCiH8NITCWX**WNiiWy8TUEHXWUTLZWHZ28*EW2ICX*HWNiHE2XTC8EECZCUxNWZEZCE*XNUW8y2TXE22W*8NTiNyETyHZEXUO*UWNZyTN8T2CUe_N2iCX*IN2iUHE*IN2iHiZTyHTyTHuEX2*UWyEE<2ZUN2NNHZY88IW8RCHUTNXUXy*IZHZXXU?BNiyZE82ZHXZCEDTNU*EZEIU2NCiC2N/iNNN8H8Hy2INHxXiU8TfIC2XCTEy2IC2*UiOZZ8TIHHCCU*iN8iEyCT*HWXy*HNHWUyNTZE22HCCcOiyZU8EIXH*Ci*yNIi2IZICHZXTUHNii{yZT8E*2XUiNNWyZI82EZ2NCy*TNHZ*8AIiH8XHUXc*iW8TTUE22UUNn8WTZH8CHWXHC8*HNXZ88WIyHIU2oNNNiyyTT2ECXyUiNIWCZXTWEW2ICI*2NUZNTUITHUXC*NNii8yETXH*XWU8{IW*ZUTNEZ2TUC*CW;Zi88IEHUX**WWUiIy2TUHWXZUIoHWC8WTiE82ECC**WWZy8I");local n=0;o.WeWxmz_Q(function()o.ElZk_mLd()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,a=u(0,u,e,c,o.dxoBzGxP);local function f()local n,l=o.dxoBzGxP(c,e(1,3),e(5,6)+2);e(2);return(l*256)+n;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.uTGofwcg(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.ODuIgwyj(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+_),#l do e=e..o.ODuIgwyj(l,n,n)end return e;end;local _=#o.fzXlmblV(s('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.SKwosQXB('#',...)end local function j()local u={};local h={};local e={};local s={h,u,nil,e};local e=n()local c={}for t=1,e do local l=a();local e;if(l==3)then e=(a()~=#{});elseif(l==0)then local n=b();if _ and o.OZRAj_nx(o.fzXlmblV(n),'.(\48+)$')then n=o.vBJVGYLi(n);end e=n;elseif(l==1)then e=g();end;c[t]=e;end;for e=1,n()do u[e-(#{1})]=j();end;for u=1,n()do local e=a();if(l(e,1,1)==0)then local o=l(e,2,3);local a=l(e,4,6);local e={f(),f(),nil,nil};if(o==0)then e[t]=f();e[r]=f();elseif(o==#{1})then e[t]=n();elseif(o==y[2])then e[t]=n()-(2^16)elseif(o==y[3])then e[t]=n()-(2^16)e[r]=f();end;if(l(a,1,1)==1)then e[d]=c[e[d]]end if(l(a,2,2)==1)then e[t]=c[e[t]]end if(l(a,3,3)==1)then e[r]=c[e[r]]end h[u]=e;end end;s[3]=a();return s;end;local function p(l,n,e)local t=n;local t=e;return s(o.OZRAj_nx(o.OZRAj_nx(({o.WeWxmz_Q(l)})[2],n),e))end local function m(b,e,c)local function j(...)local f,p,s,j,_,n,a,k,g,y,z,l;local e=0;while-1<e do if e>=3 then if 4>=e then if e>2 then repeat if 4~=e then k={};g={...};break;end;y=o.SKwosQXB('#',...)-1;z={};until true;else y=o.SKwosQXB('#',...)-1;z={};end else if e~=4 then repeat if 5<e then e=-2;break;end;l=u(7);until true;else l=u(7);end end else if e<=0 then f=u(6,65,1,92,b);p=u(6,1,2,35,b);else if-3~=e then for l=11,93 do if 2~=e then s=u(6,98,3,63,b);_=ne j=0;break;end;n=-41;a=-1;break;end;else n=-41;a=-1;end end end e=e+1;end;for e=0,y do if(e>=s)then k[e-s]=g[e+1];else l[e]=g[e+1];end;end;local e=y-s+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=f[n];o=e[ee];if o>=12 then if 18<=o then if 21<=o then if 21<o then if 21<o then repeat if 22~=o then local o,s,g,b,y;for u=0,6 do if u>=3 then if u<5 then if 1<=u then repeat if 4>u then l[e[d]]=(e[t]~=0);n=n+1;e=f[n];break;end;o=e[d]g,b=_(l[o](h(l,o+1,e[t])))a=b+o-1 y=0;for e=o,a do y=y+1;l[e]=g[y];end;n=n+1;e=f[n];until true;else l[e[d]]=(e[t]~=0);n=n+1;e=f[n];end else if u>3 then for t=25,73 do if 5~=u then l[e[d]]();break;end;o=e[d]l[o]=l[o](h(l,o+1,a))n=n+1;e=f[n];break;end;else l[e[d]]();end end else if 1>u then l[e[d]]=c[e[t]];n=n+1;e=f[n];else if-2<u then for a=10,81 do if 1<u then l(e[d],e[t]);n=n+1;e=f[n];break;end;o=e[d];s=l[e[t]];l[o+1]=s;l[o]=s[e[r]];n=n+1;e=f[n];break;end;else o=e[d];s=l[e[t]];l[o+1]=s;l[o]=s[e[r]];n=n+1;e=f[n];end end end end break;end;l[e[d]]=(e[t]~=0);until true;else l[e[d]]=(e[t]~=0);end else if(l[e[d]]~=e[r])then n=n+1;else n=e[t];end;end else if 19<=o then if 18<o then repeat if 20>o then do return end;break;end;l(e[d],e[t]);until true;else l(e[d],e[t]);end else do return end;end end else if o<=14 then if 13>o then l[e[d]]();else if 11~=o then repeat if 14~=o then local e=e[d]l[e]=l[e](h(l,e+1,a))break;end;for o=0,3 do if o<=1 then if o>=-4 then for r=44,84 do if o~=1 then l[e[d]]=(e[t]~=0);n=n+1;e=f[n];break;end;c[e[t]]=l[e[d]];n=n+1;e=f[n];break;end;else c[e[t]]=l[e[d]];n=n+1;e=f[n];end else if 2==o then l[e[d]]=c[e[t]];n=n+1;e=f[n];else if(l[e[d]]~=e[r])then n=n+1;else n=e[t];end;end end end until true;else for o=0,3 do if o<=1 then if o>=-4 then for r=44,84 do if o~=1 then l[e[d]]=(e[t]~=0);n=n+1;e=f[n];break;end;c[e[t]]=l[e[d]];n=n+1;e=f[n];break;end;else c[e[t]]=l[e[d]];n=n+1;e=f[n];end else if 2==o then l[e[d]]=c[e[t]];n=n+1;e=f[n];else if(l[e[d]]~=e[r])then n=n+1;else n=e[t];end;end end end end end else if 16<=o then if o>12 then for f=26,78 do if 17>o then n=e[t];break;end;local f,c,o,a,r;local n=0;while n>-1 do if 2>=n then if 0<n then if n>-3 then repeat if n~=2 then c=d;break;end;o=t;until true;else o=t;end else f=e;end else if 5<=n then if 4<n then repeat if n<6 then l(r,a);break;end;n=-2;until true;else n=-2;end else if n==3 then a=f[o];else r=f[c];end end end n=n+1 end break;end;else local o,a,f,r,c;local n=0;while n>-1 do if 2>=n then if 0<n then if n>-3 then repeat if n~=2 then a=d;break;end;f=t;until true;else f=t;end else o=e;end else if 5<=n then if 4<n then repeat if n<6 then l(c,r);break;end;n=-2;until true;else n=-2;end else if n==3 then r=o[f];else c=o[a];end end end n=n+1 end end else n=e[t];end end end else if 5<o then if 8<o then if 9>=o then c[e[t]]=l[e[d]];else if 10<o then if(l[e[d]]~=e[r])then n=n+1;else n=e[t];end;else l[e[d]]=(e[t]~=0);end end else if o>6 then if 7==o then local n=e[d]local t,e=_(l[n](h(l,n+1,e[t])))a=e+n-1 local e=0;for n=n,a do e=e+1;l[n]=t[e];end;else c[e[t]]=l[e[d]];end else l[e[d]]=c[e[t]];end end else if 2<o then if 3>=o then l[e[d]]=c[e[t]];else if 4~=o then local n=e[d]local t,e=_(l[n](h(l,n+1,e[t])))a=e+n-1 local e=0;for n=n,a do e=e+1;l[n]=t[e];end;else local e=e[d]l[e]=l[e](h(l,e+1,a))end end else if o>=1 then if o>0 then repeat if 1~=o then local n=e[d];local t=l[e[t]];l[n+1]=t;l[n]=t[e[r]];break;end;local n=e[d];local t=l[e[t]];l[n+1]=t;l[n]=t[e[r]];until true;else local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[r]];end else l[e[d]]();end end end end n=1+n;end;end;return j end;local t=0xff;local c={};local f=(1);local d='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(d)if r>0x1e then return d end r=r+1 e=(e+0x982-d)%0x48 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x54);end return true end)'tJIze'and l[0x3](0x2cb+d))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf2);end return true end)'ygltf'and l[0x1](d+0x1a6))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x69);c[f]=le();f=f+t;end return true end)'kQlMp'and l[0x2](d+0x304))or d end),(function(a)if r>0x2f then return a end r=r+1 e=(e+0x72a-a)%0x46 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x6a);end return true end)'HAcrp'and l[0x2](0x1ef+a))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf);d={d..'\58 a',d};c[f]=j();f=f+((not o.TZgSowsj)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'rMuKW'and l[0x3](a+0x1b0))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x67);end return true end)'boMLL'and l[0x1](a+0x2dd))or a end),(function(o)if r>0x2e then return o end r=r+1 e=(e+0x986-o)%0x16 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x0);end return true end)'mEcAD'and l[0x3](0x3ad+o))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x58);t[2]=(t[2]*(p(function()c()end,h(d))-p(t[1],h(d))))+1;c[f]={};t=t[2];f=f+t;end return true end)'tCCCe'and l[0x1](o+0x17b))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb5);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'UsRDU'and l[0x2](o+0xf8))or o end)}l[0x3](0x16bb)end){};local e=m(h(c));return e(...);end return m((function()local n={}local e=0x01;local l;if o.TZgSowsj then l=o.TZgSowsj(m)else l=''end if o.OZRAj_nx(l,o.fyrdzgvD)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,d,t,o)local o;if e>=4 then if 5>=e then if 3<e then repeat if e~=4 then local e=d;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;break;end;local e=d;local d,r,o=t(2);do return function()local f,l,n,t=n(l,e(e,e),e(e,e)+3);e(4);return(t*d)+(n*r)+(l*o)+f;end;end;until true;else local e=d;local t,o,d=t(2);do return function()local l,n,f,r=n(l,e(e,e),e(e,e)+3);e(4);return(r*t)+(f*o)+(n*d)+l;end;end;end else if 6<e then if 3<e then repeat if e>7 then do return l(e,nil,l);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 until true;else 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 end else do return t[l]end;end end else if e<=1 then if-3<=e then for o=39,92 do if e~=1 then do return n(1),n(4,t,d,l,n),n(5,t,d,l)end;break;end;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;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 else if e>2 then do return n(1),n(4,t,d,l,n),n(5,t,d,l)end;else do return 16777216,65536,256 end;end end end end),...)