Script

([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) __nIKmOAZqqkO = a; end)); return(function(u,...)local d;local o;local s;local f;local r;local t;local e=24915;local n=0;local l={};while n<591 do n=n+1;while n<0x3bd and e%0xefe<0x77f do n=n+1 e=(e*675)%8928 local a=n+e if(e%0x2bcc)>=0x15e6 then e=(e*0x3a9)%0x4813 while n<0xa2 and e%0x3c3a<0x1e1d do n=n+1 e=(e+47)%40075 local d=n+e if(e%0x4d86)>0x26c3 then e=(e-0x139)%0xb7e6 local e=8101 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e-0x157)%0x1fb5 local e=49191 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e-0x18a)%0xae00 n=n+1 local e=67386 if not l[e]then l[e]=0x1 r=string;end end end elseif e%2~=0 then e=(e*0x3d7)%0xab09 while n<0x20e and e%0x11ca<0x8e5 do n=n+1 e=(e*236)%37179 local d=n+e if(e%0x352c)>=0x1a96 then e=(e-0x1a7)%0xa631 local e=90008 if not l[e]then l[e]=0x1 s=tonumber;end elseif e%2~=0 then e=(e-0x7d)%0xbe93 local e=24346 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\119\84\122\73\121\98\83\98\0\6\115\116\114\105\110\103\4\99\104\97\114\118\100\70\114\84\79\106\95\0\6\115\116\114\105\110\103\3\115\117\98\95\102\106\122\88\81\122\104\0\6\115\116\114\105\110\103\4\98\121\116\101\75\115\68\97\69\79\107\69\0\5\116\97\98\108\101\6\99\111\110\99\97\116\81\105\121\106\77\102\120\70\0\5\116\97\98\108\101\6\105\110\115\101\114\116\69\119\99\102\89\89\104\74\5";end else e=(e*0x191)%0x753b n=n+1 local e=28110 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end else e=(e+0x2f1)%0xa796 n=n+1 while n<0x11e and e%0x1dc2<0xee1 do n=n+1 e=(e+305)%16481 local f=n+e if(e%0x3b80)<=0x1dc0 then e=(e*0x16e)%0xb66c local e=20069 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=r.byte(l(0x01))local e=l(e)if n=="\2"then e=o.wTzIybSb(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(e,n)return u(8,nil,u,n,e)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][l(r.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end elseif e%2~=0 then e=(e+0x312)%0x22f8 local e=43972 if not l[e]then l[e]=0x1 end else e=(e*0x5b)%0x9717 n=n+1 local e=74518 if not l[e]then l[e]=0x1 end end end end end e=(e*285)%9087 end d(f);local e={};for n=0x0,0xff do local l=o.vdFrTOj_(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local r=(function(a,r)local f,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=a while true do n[0x03][o._fjzXQzh(r,e,(function()e=f+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._fjzXQzh(r,e,(function()e=f+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.EwcfYYhJ(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=a+d;end end return o.QiyjMfxF(n[0x01])end);d(r(57,"?slYxoiQ<5}1k)^(kk"));d(r(88,"DAp&gtv,q_?bcrz-?qtvvbAgb?t_Pv?,zc-g?rgr-q?gpqr.qcp?b__?Ar,gAr&2cb,ApgccqAp&c-gtAq?pt,z_g_-tVqbptA-z?c&p-&?v&rcq,t&_cgpTczz&qc&prA,zA-vt,tAAccv&Aa?gg--gbgtbzl?q&q_u&cgrz_?ggTqt_g&grr_q&qcpqfp?b?tvW,bAgzbgvg,& rcgvtFtbctAVc?Ag?-c_rppz__p&zc,,?ArrApgc-cv,rp&rc,-p?_&,zY&?,v?pAbgt_Aggc-g<-?AtA}g_-g-rqq_g?c_,,&p,?pALAc_vgI-bt,AQ?b-v_bgv5,gA,c&vcApbAtz--?z&r-v,?p?-__&p-q9prggr_qp&grtAz&trvqSA_c&,&--cbg-A_??vfLg_?-g_zbttv{.__g&-&qSprct,q&ccAvAAz,gAr&Ir?,_pvrggrptbbggz-c&t:!qgc-vlb?ttg-t_btg-c,?p?ct,ogpcb_fcq,gqtpArc,qbrcv,gA-c,,p%?bqg-9pqrg3Ad?Azr"));local e=(-16998+(function()local d,l=0,1;(function(e,l,n,t)n(e(l,n and n,n,e),t(t and n,n,n,e)and e(e and t,n,l,e),n(l,l,l,e),e(e,l and t,e,l))end)(function(o,n,t,e)if d>308 then return e end d=d+1 l=(l+939)%7966 if(l%248)>124 then l=(l-957)%11955 return n else return n(e(t,e,e,e)and n(e,n,n,o and t),t(t and t,o,e,n),t(n,e,o,o),t(n,n,n,o))end return t(t(n,e,e,o)and n(e and t,t,e,e),e(n,e,n,o),n(e,e,e,n),t(t and n,e,o,e)and n(o,e,e,o))end,function(n,e,t,o)if d>352 then return o end d=d+1 l=(l*222)%23763 if(l%554)<=277 then l=(l*808)%23328 return t else return e(e(o and n,n,e,o),e(o and n,o,n and t,n),e(n,t,e,t)and e(e,t,n,n),n(t,t,e,o))end return n(t(t,o,e,t),n(o,o,n,e and t),e(o,e,n,e),o(t,t,e,n))end,function(e,o,n,t)if d>453 then return n end d=d+1 l=(l+27)%25247 if(l%938)<=469 then return e else return o(n(e,n and n,e,n),n(n,n,t and e,e),e(e,o,o and n,n and e),n(e,e,e,o))end return t(t(e,n,t and o,o),t(e,t and t,e,o and t),e(o,n,t,e),e(e and n,n,n,n))end,function(o,t,n,e)if d>461 then return o end d=d+1 l=(l*188)%18739 if(l%1272)<=636 then return t else return n(n(e,o and n,o,n),n(o,n,o and n,e),t(e,e,n,t),e(e,e,t,n))end return t(n(o,n,t,e),e(e,t,o and e,n),e(e,e,o,t),e(n,e,e,t))end)return l;end)())local h=o.PUEPlIAV or o.OsOqZhdR;local ee=(getfenv)or(function()return _ENV end);local d=3;local t=2;local f=4;local m=1;local function j(g,...)local c=r(e,">Fvq%gDU _nJ1iQy _-% DB  iFq QF6_vg1En 13nDq,q_%ng%JnDv nn aFD__vgg%F1nFvDnFiQJUvqJUQDJ q1JJ%vJgqg1 qJJ1yniq%Ui%%n %qqiUg_in%Figgg_%%1nJyin1yQ b#vQ1Uny1Unyy% Jy%Fy UU^n g;y FFv JF%_nFJg Fy_QFF_gF_DgvJ_ivQnUqCJDqUUg#F F2G KCD q8i yqn JRn1ngg1qQUUqQ DnQ11i%yQ0qi1FDg1_qii UFyqDyigpJ Q.1 QF+y_Ug{qUi_ivD_Qvdnv_jFg _kQ_yvvnvFJnvFiqJiqq1JQ%RWyJqqgJDFiJFqFnyvg1 % 1F% 1qgFn %J1 %n1ig niDvQ%D%U%yDU ynU1.i tlv %SD nHn 1hQ_FFv_%FDnnvy_1FQnPv_n%vDn q11DvQJBqvJ qDJ qnQvgU1e%v1%%11 %J11g-iegDiggDi gnQvgQQFDvQ%UqQ DnQ1Dyy4Uvy%  RvUny1UQHD v#% DFn yP1 yF<_UF%_DF JnqF_QvFnvvgnDv_nnqQ1JqjJgq%J_q Jnq1JQgn1v% 1D%_1n%11QgEQMg%iUg iQg1iQD<QvDDQDD QnD1QQUvyvU%yUU ynU1yy )Wq %<D_g;n 1jQ_FFv_%FD");local n=0;o.yswEpR_I(function()o.goPYrIOb()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,a=u(0,u,e,c,o.KsDaEOkE);local function r()local n,l=o.KsDaEOkE(c,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local b=true;local b=0 local function p()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.RhjRFOQF(e,n-1023)*(d+(t/(2^52)));end;local _=n;local function k(n)local l;if(not n)then n=_();if(n==0)then return'';end;end;l=o._fjzXQzh(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..o._fjzXQzh(l,n,n)end return e;end;local b=#o.nUfBJqcW(s('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.tJREHrSp('#',...)end local function z()local e={};local s={};local u={};local h={s,u,nil,e};local e=n()local c={}for t=1,e do local l=a();local n;if(l==2)then n=(a()~=#{});elseif(l==0)then local e=p();if b and o.TWTlkHhP(o.nUfBJqcW(e),'.(\48+)$')then e=o.bhWbEPxa(e);end n=e;elseif(l==3)then n=k();end;c[t]=n;end;h[3]=a();for e=1,n()do u[e-(#{1})]=z();end;for h=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={r(),r(),nil,nil};if(o==0)then e[d]=r();e[f]=r();elseif(o==#{1})then e[d]=n();elseif(o==g[2])then e[d]=n()-(2^16)elseif(o==g[3])then e[d]=n()-(2^16)e[f]=r();end;if(l(a,1,1)==1)then e[t]=c[e[t]]end if(l(a,2,2)==1)then e[d]=c[e[d]]end if(l(a,3,3)==1)then e[f]=c[e[f]]end s[h]=e;end end;return h;end;local function y(l,n,e)local t=n;local t=e;return s(o.TWTlkHhP(o.TWTlkHhP(({o.yswEpR_I(l)})[2],n),e))end local function j(p,e,c)local function z(...)local r,y,s,j,b,n,a,_,g,k,z,l;local e=0;while-1<e do if 2<e then if 5>e then if 0~=e then repeat if 4~=e then _={};g={...};break;end;k=o.tJREHrSp('#',...)-1;z={};until true;else _={};g={...};end else if e>=3 then for n=10,89 do if e>5 then e=-2;break;end;l=u(7);break;end;else l=u(7);end end else if e>=1 then if-1~=e then for l=15,77 do if 1~=e then n=-41;a=-1;break;end;s=u(6,66,3,13,p);b=ne j=0;break;end;else n=-41;a=-1;end else r=u(6,98,1,96,p);y=u(6,81,2,3,p);end end e=e+1;end;for e=0,k do if(e>=s)then _[e-s]=g[e+1];else l[e]=g[e+1];end;end;local e=k-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=r[n];o=e[m];if 11>=o then if o>=6 then if o>=9 then if o<=9 then local n=e[t]local t,e=b(l[n](h(l,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;l[n]=t[e];end;else if o>8 then for n=32,52 do if o~=10 then l[e[t]]();break;end;l[e[t]]=c[e[d]];break;end;else l[e[t]]();end end else if 7>o then c[e[d]]=l[e[t]];else if o~=8 then local o,r,c,f,a;local n=0;while n>-1 do if 3<=n then if n<5 then if n==3 then f=o[c];else a=o[r];end else if 2~=n then for e=48,66 do if 5~=n then n=-2;break;end;l(a,f);break;end;else n=-2;end end else if 1>n then o=e;else if n>1 then c=d;else r=t;end end end n=n+1 end else l[e[t]]=(e[d]~=0);end end end else if 3<=o then if o>3 then if 5==o then local o,s,p,_,g;for u=0,6 do if u<=2 then if 0<u then if u~=-2 then repeat if 2~=u then o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];break;end;l(e[t],e[d]);n=n+1;e=r[n];until true;else o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];end else l[e[t]]=c[e[d]];n=n+1;e=r[n];end else if u>4 then if u==6 then l[e[t]]();else o=e[t]l[o]=l[o](h(l,o+1,a))n=n+1;e=r[n];end else if 3==u then l[e[t]]=(e[d]~=0);n=n+1;e=r[n];else o=e[t]p,_=b(l[o](h(l,o+1,e[d])))a=_+o-1 g=0;for e=o,a do g=g+1;l[e]=p[g];end;n=n+1;e=r[n];end end end end else do return end;end else l[e[t]]();end else if o<=0 then local o,r,c,a,f;local n=0;while n>-1 do if 3<=n then if n>=5 then if 3~=n then repeat if 5~=n then n=-2;break;end;l(f,a);until true;else n=-2;end else if n>=2 then repeat if n~=3 then f=o[r];break;end;a=o[c];until true;else f=o[r];end end else if n>=1 then if n~=0 then repeat if 1<n then c=d;break;end;r=t;until true;else r=t;end else o=e;end end n=n+1 end else if o~=-3 then repeat if 1<o then for o=0,3 do if o>=2 then if o>1 then repeat if 2~=o then if(l[e[t]]~=e[f])then n=n+1;else n=e[d];end;break;end;l[e[t]]=c[e[d]];n=n+1;e=r[n];until true;else if(l[e[t]]~=e[f])then n=n+1;else n=e[d];end;end else if o>-4 then repeat if o~=0 then c[e[d]]=l[e[t]];n=n+1;e=r[n];break;end;l[e[t]]=(e[d]~=0);n=n+1;e=r[n];until true;else l[e[t]]=(e[d]~=0);n=n+1;e=r[n];end end end break;end;n=e[d];until true;else for o=0,3 do if o>=2 then if o>1 then repeat if 2~=o then if(l[e[t]]~=e[f])then n=n+1;else n=e[d];end;break;end;l[e[t]]=c[e[d]];n=n+1;e=r[n];until true;else if(l[e[t]]~=e[f])then n=n+1;else n=e[d];end;end else if o>-4 then repeat if o~=0 then c[e[d]]=l[e[t]];n=n+1;e=r[n];break;end;l[e[t]]=(e[d]~=0);n=n+1;e=r[n];until true;else l[e[t]]=(e[d]~=0);n=n+1;e=r[n];end end end end end end end else if o<=17 then if 15>o then if o>12 then if o~=10 then for n=15,59 do if 13<o then l[e[t]]=(e[d]~=0);break;end;do return end;break;end;else l[e[t]]=(e[d]~=0);end else local e=e[t]l[e]=l[e](h(l,e+1,a))end else if 15>=o then if(l[e[t]]~=e[f])then n=n+1;else n=e[d];end;else if 13<=o then for n=46,88 do if 17~=o then local n=e[t];local t=l[e[d]];l[n+1]=t;l[n]=t[e[f]];break;end;l[e[t]]=c[e[d]];break;end;else l[e[t]]=c[e[d]];end end end else if 20>=o then if 18<o then if 18<o then for r=20,86 do if 19~=o then if(l[e[t]]~=e[f])then n=n+1;else n=e[d];end;break;end;n=e[d];break;end;else n=e[d];end else c[e[d]]=l[e[t]];end else if o<=21 then local n=e[t]local t,e=b(l[n](h(l,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;l[n]=t[e];end;else if o>=18 then repeat if o~=22 then local n=e[t];local t=l[e[d]];l[n+1]=t;l[n]=t[e[f]];break;end;local e=e[t]l[e]=l[e](h(l,e+1,a))until true;else local t=e[t];local n=l[e[d]];l[t+1]=n;l[t]=n[e[f]];end end end end end n=1+n;end;end;return z end;local d=0xff;local c={};local f=(1);local t='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(a)if r>0x2f then return a end r=r+1 e=(e+0x113f-a)%0x2e return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xae);t={t..'\58 a',t};c[f]=z();f=f+((not o.tPPdZAzU)and 1 or 0);t[1]='\58'..t[1];d[2]=0xff;end return true end)'XivFH'and l[0x2](0x372+a))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x9f);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'pmwZO'and l[0x1](a+0x243))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb0);end return true end)'RcrFG'and l[0x3](a+0x1f0))or a end),(function(o)if r>0x29 then return o end r=r+1 e=(e+0x9b5-o)%0xf return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x12);end return true end)'MSqbA'and l[0x2](0x2cf+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x42);end return true end)'njRuR'and l[0x1](o+0x157))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x52);d[2]=(d[2]*(y(function()c()end,h(t))-y(d[1],h(t))))+1;c[f]={};d=d[2];f=f+d;end return true end)'ULKlr'and l[0x3](o+0x2ad))or o end),(function(t)if r>0x2b then return t end r=r+1 e=(e+0xa0e-t)%0x4f return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xae);end return true end)'XLkoT'and l[0x3](0x94+t))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe3);end return true end)'EkuuV'and l[0x2](t+0x3dc))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x73);c[f]=ee();f=f+d;end return true end)'MMnvn'and l[0x1](t+0x2d9))or t end)}l[0x1](0x1b9b)end){};local e=j(h(c));return e(...);end return j((function()local n={}local e=0x01;local l;if o.tPPdZAzU then l=o.tPPdZAzU(j)else l=''end if o.TWTlkHhP(l,o.RkveHMiL)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<4 then if 2>e then if e~=-2 then for o=33,74 do if e~=0 then 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;do return n(1),n(4,d,t,l,n),n(5,d,t,l)end;break;end;else 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;end else if e==3 then do return n(1),n(4,d,t,l,n),n(5,d,t,l)end;else do return 16777216,65536,256 end;end end else if 5<e then if 7<=e then if e~=8 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 else do return l(e,nil,l);end end else do return d[l]end;end else if e==4 then local e=t;local f,r,t=d(2);do return function()local n,l,o,d=n(l,e(e,e),e(e,e)+3);e(4);return(d*f)+(o*r)+(l*t)+n;end;end;else local e=t;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;end end end end),...)