Find this useful? Enter your email to receive occasional updates for securing PHP code.
Signing you up...
Thank you for signing up!
PHP Decode
([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _KrwyRonnmnSD = a; e..
Decoded Output download
<? ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _KrwyRonnmnSD = a; end)); return(function(f,...)local g;local o;local t;local h;local l;local r;local e=24915;local n=0;local d={};while n<302 do n=n+1;while n<0x104 and e%0x23fa<0x11fd do n=n+1 e=(e*255)%35422 local u=n+e if(e%0x138a)>0x9c5 then e=(e-0x222)%0x2ffc while n<0x35d and e%0x4b50<0x25a8 do n=n+1 e=(e+81)%16865 local o=n+e if(e%0x4bde)>=0x25ef then e=(e+0x33b)%0xafa2 local e=18301 if not d[e]then d[e]=0x1 end elseif e%2~=0 then e=(e*0x2d8)%0x35a5 local e=34572 if not d[e]then d[e]=0x1 r={};end else e=(e-0x3ad)%0x1752 n=n+1 local e=97007 if not d[e]then d[e]=0x1 t=function(d)local e=0x01 local function n(n)e=e+n return d:sub(e-n,e-0x01)end while true do local d=n(0x01)if(d=="")then break end local e=h.byte(n(0x01))local e=n(e)if d==""then e=r.aetMnBzF(e)elseif d==""then e=e~=""elseif d==""then l[e]=function(n,e)return f(8,nil,f,e,n)end elseif d==""then e=l[e]elseif d==""then e=l[e][n(h.byte(n(0x01)))];end local n=n(0x08)r[n]=e end end end end end elseif e%2~=0 then e=(e+0x1e7)%0xae3c while n<0x67 and e%0xa5a<0x52d do n=n+1 e=(e-433)%28480 local l=n+e if(e%0x38f8)<=0x1c7c then e=(e-0x3d7)%0xbf41 local e=21508 if not d[e]then d[e]=0x1 end elseif e%2~=0 then e=(e+0x244)%0x5aa9 local e=31075 if not d[e]then d[e]=0x1 g=tonumber;end else e=(e+0xb5)%0x7a41 n=n+1 local e=54752 if not d[e]then d[e]=0x1 o="\8NIHO9\98AL\97AN?H6R8MNLEHC\99D\97L9QH\83E\87E 8MNLEHCMO\98\80\83?\8095>6MNLEHC\98QNA 8?\98O5<D:N\97\988A\99IH\99\97N\81\8877<8:NN\97\988AEHMALN??6P9M\817";end end end else e=(e*0x2f8)%0x5ead n=n+1 while n<0x28a and e%0x1a50<0xd28 do n=n+1 e=(e*534)%26347 local t=n+e if(e%0x1a7c)<0xd3e then e=(e*0x394)%0xa71 local e=9921 if not d[e]then d[e]=0x1 h=string;end elseif e%2~=0 then e=(e*0x88)%0x2a10 local e=39641 if not d[e]then d[e]=0x1 l=getfenv and getfenv();end else e=(e*0x9b)%0x608f n=n+1 local e=1400 if not d[e]then d[e]=0x1 l=(not l)and _ENV or l;end end end end end e=(e+979)%43199 end t(o);local e={};for n=0x0,0xff do local d=r.EynSiWiv(n);e[n]=d;e[d]=n;end local function u(n)return e[n];end local h=(function(f,h)local o,d=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local t=f while true do n[0x03][r.PSMPmALB(h,e,(function()e=o+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""d=0x000 break end end local l=#h while e<l+0x01 do n[0x02][d]=r.PSMPmALB(h,e,(function()e=o+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 r.MMBxOsQC(n[0x01],(u((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=f+t;end end return r.QXCCJDHt(n[0x01])end);t(h(11,"7rGZ1_usWo/D0fqaa/"));t(h(95,"95xDdI8snCLm<ip}L5dnI8}nCsx}iI8}LiLp8T}CCiDimx88JmCndI{mnLiLs<nn5<mm8s+nnpIspLnDEiid8sEId8pm}sCLDxins}piCpDm}5LdD}mD8nmdIm8CvmLLdxpnnx<5<LI}5DLDdC<iCI#LiLI8(inmIdnLx}DC<pnx5sIIIi}8Cnd<pI8x5pL5Ii}5nid}<<xx<miD8858m=dC}CnsDm<C8m58m2II}sn85{iLnx}8ms}nC<n<D<imnixC<ix}}4LidCpDs5xC<IdILCdLIppCCxDpm}dp}5CCIxpDLDx8sI5Ipp<x8xpDCnID<58DxD8xes5dmJII}sC8xpid8pxxnLI8p<L8dDmdsImUI888}dC8d5im5ixi<s8L}<C}dn}ns8Dnisd}}Dnsx<nLxiDiissLM<L}InpiLD5<<LnCxnms8CCLD<dnpmnDxCi/dCpmmnDI<L8I3}mLeCL<mLdi}In}xppAsd}8LndnRUCmdDmL5ImL<dICKiLxp-pxnCxi<psx%LnDDCiD8nxi<58pLp"));local e=(-601+(function()local l,n=0,1;(function(e,n)n(n(e,e),e(e,e))end)(function(e,d)if l>368 then return d end l=l+1 n=(n+443)%10413 if(n%1950)>975 then n=(n*392)%616 return e(e(d,d),d(e,e))else return d end return e end,function(d,e)if l>305 then return e end l=l+1 n=(n*657)%5585 if(n%760)>380 then return e(e(e,e)and d(e,d),e(d,e)and d(d,e))else return d end return d end)return n;end)())local a=r._tLYwuct or r.zWxvMPCG;local ee=(getfenv)or(function()return _ENV end);local l=2;local o=4;local t=3;local ne=1;local function j(s,...)local u=h(e," u(,miJCg+X%hdNwL+NhN(dghNhN%X%ZXJr7LmwuNhdwgXhd%w%gXd,g,((muXuyC,JiiNi,dNd%hXh1%JwmuJchwNh%dwNmJJJqi(mg,N+%g%gdC%khGhwgNNNm(g,i,dWwuC6%u(wdw+NNCJgiJ(igmN+uX++w+mJwCCJ%idmCiNi(,w,X(+(%wJMdwNwmN%NX%,dhd(hJmXmg,J(h((ghJwJJ(%iNmCm+,Chgh(%mXXXnH+whN%NJCuJiiXigmJ,h,(JwCwguJwmNiCi+mCdgd%hm%X%Vu,wd6mwCwudCdhh+hJhz%iJNJC(m(,uF3JwhmPmdii(%,,(NuXu%u++g+(gmCXC_d,%d%%%J,N,N(X(#uJCgCui+i(iCmNm((w(Xu+XgXX+mgXgS%+dNhC%+h(X+gN+wgdg,CNJdwN?uNXNjdJ(%;d(X(iudNhwwwmNXdwdJ%u+gmXgX,J(h((g6g(CgJXJ,(I!%:u,Xuw(%dgFCww=_NXNddld+hd%i%g+wXu+J+(C+CgCm(mmwiumiwd(J(JuwuiW_wmN+NXNl++gd%gXdXiX,i%++gXg,,,J(JuiX3%m*,,(((+d%6ww+wCw(X+NChwdJ%,%XX(,m(h(GuJFhJu,wNND%dXdEhJuTuXuuuu%mw{N+N(dug(hwXw%CiXXv+gg%gJJdJuJgmwmmwJm,(%(huJhmNCwwwiNXhihdhuCmXIC,,Jig((ugsN4m(,wcNJdhd,hg%N%m%h%J+Jghg(CNJNJmiXJ(mw,h,((g(Num&X;0uhw=N(dghNhX%X%uXJXw+(ghgNCmJXJlihmhm,,g,(,muXuR)J>,w(N+dNdmNJh2%JXhX,+ggNgmghg%JJihi(iX,N,m(XikuwFhY(wgwFNmN,d)dghu%(Xg+NXJgXgkCJ+hCiigmNmmm(,:(wuhumuNwNwmNXN,dJhhh(hXNeXm+X+qggChC(JgJ_JXmXm_,J(N((ugjNuJ_ww.NJdhdXhg%N%m%hXC+Jghg(C+JNJmiXJ(mN,h,((g(gum<XojtgkmN(dghNdu%X%cXJXNX(ggCNCmCuJFiJmhimmh(N(muXuNLJwhw(wXwJdmh%ho%XXhX(+gXNg+CXCuJJidi(m%,NmJ,m(Vu+Ghu,wgNNNmdXN+hJ%d%(X%+N+mgXg=gCJhJ(igmNmm,h,_(J(,u(_gwNwiNXN(dJNhdN%gXwXm+X+Q+(ChgmC%iNiCmXmX,J(h((ugurbmw%wQN+dhdmhgdN%+XXX(+Jgdg(CdJNCJg8i_mX,h,+(guNum)X:JwJNNN(dhhNhJ%Xd9XN+h+iggg0CmC+JFJgiim(,d(N(JuXuo#JwNygNgNmdmhXhv%JXhX(+NgNgCCXCJJJidi(JgmC,m(d(Rugohuuwg53w(dXdihJhm%(Xg+N+JX2g3ChJhJ,igmNmm,Xmw(Juwu(GNwNwiNX.kNihhhi%gXwXm+w+P+g+,C(JdiNiwmXmL,J(h,JuguunmwwwBNgdhd(hw%N%mXXXu+Jghg(ChJNJmiXi(mJ,h,((g(num&X0;ii,,N(dhhNhm%Xudnwlgwdg+g,CmJXJ?JgC,m(,+(N(iuXu.RJWhehNgdwdmhhh}%JXh%mXdgNgiCXC(JJihi(mgmg,m(%(9uC:h6,wgNNNgdXdjhJ%d%(Xg+N+mgXgKCJJNJ(igmNmm,N,3(JuhgiCgJCJ(NXN(dJhhh(uCwiXi+w+EgJChgmgwiNiimXm(,J(h(((g(%nmw%wtNCdhd(hgd?%CXXXu+Jgdg(CgJNJmJgiTmC,h,,(guwumOX^NwJNhN(d+hNhm%X%/XJ+h+(+,CNCmJXJViXmhm(,g+igigCCi/Jy8w(NgdNmC,X(+(mXh%,+ggNgmhhdidJhg%%X%+wXggwgmJ+g-CuJXmwm%,wdLhX%h%(Xguiwiw,wmCJCgJ(igmNgdXgXJ+igCCCi%J,JJJWmimghhhh%gXNXmNuwiwXhwdCdXdm%dXdXi,+(d((uX7NLmwXmw(ddNJhJuiCmdm,,+mwh%g(guJNJmiX+J%%XX+i+hgCg,CgC,wJwzN(dghNuC(Xu+um+hXmggCNCmChC%iJmhm(m;(N(muX,D,iwhw(NgdNdmhhh/dhdhX(+ggNg+CXCuJJJ,i(mhmN,m(X(Zu%Rhn,wgw(wmdXd;hJhd%(X++NXJXig^CJJhJ,igmNmmiX,#(Juhu(qgwNwXNXw(Ndhhhm%g%uXm+X+}gJgJC(JgiNiJmXm(,Jmh(hug5NImwXwVwVdhw(Nm%N%mXXXU+J+Cg(+ggmJmiXi8mJ,h,C(guN(i0XUSwJNNN(d+hNdJdi%sXJ+h+JggCNCmChg(iJmdm(mu(N(muXuTyNwhw(NgNGdmh%hL%X%hX(+ggNgmCXCuJJihJNmg,N,m(%(<uJ?hz(wgNNNmN,dLhJ%h%(%(+N+mgXhJdwdNhCX%%,%J%G+i+guhu+RgwNwm(%mm,Xu+(%(mu+XC+%+2gwChC(JgX%%i%,XNC%X(gCgJg(nm?,wjNJdhm+,C,>uwudupwCNwNCCgC(JmiXi^%,Xi+N+,uNuJ<X&?wJm%(+dgd(hm%X%Vudwdw%whgGDN#,w+NwNid%wuJd(m(+uGfJwhImW,dNdmhXhC%JXhX(%g%dgmCXCxJJihigmgJmJm(X(EuJuuW(w+NNNCdXdmdJ%h%(XgX,+mg%gGCXChJ(igmNi(,X,u(J(N(d{gwNwmNwN1dJhhN(hiXNXm+X+UgJgQC(ggJXimmXmy,J(h(mug(N(uwXw7NJdhd(h+%N%m%dXI+JghgmCgJwJmJhJ%mJ,h,(,SuNumAXu(o(NhN,dgdChm%X%aXJ%i+(ggCNCJJXJuiJiZi(,g(N(muXu-ACwhw(!mdNdmhXhu%JXhX(+ggNgmCX");local n=0;r.QykcLrda(function()r.TBDKcSrT()n=n+1 end)local function e(e,d)if d then return n end;n=e+n;end local d,n,m=f(0,f,e,u,r.vMbuAJhH);local function h()local d,n=r.vMbuAJhH(u,e(1,3),e(5,6)+2);e(2);return(n*256)+d;end;local c=true;local c=0 local function p()local l=n();local e=n();local t=1;local l=(d(e,1,20)*(2^32))+l;local n=d(e,21,31);local e=((-1)^d(e,32));if(n==0)then if(l==c)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return r.LgIdWRsO(e,n-1023)*(t+(l/(2^52)));end;local b=n;local function k(n)local d;if(not n)then n=b();if(n==0)then return'';end;end;d=r.PSMPmALB(u,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+c),#d do e=e..r.PSMPmALB(d,n,n)end return e;end;local b=#r.zAlazvFf(g('9.8'))~=1 local e=n;local function z(...)return{...},r.gHYXoipF('#',...)end local function y()local e={};local a={};local c={};local g={c,a,nil,e};local e=n()local u={}for l=1,e do local d=m();local n;if(d==3)then n=(m()~=#{});elseif(d==2)then local e=p();if b and r.KrFuPfCk(r.zAlazvFf(e),'.(8+)$')then e=r.iAVOCgZf(e);end n=e;elseif(d==0)then n=k();end;u[l]=n;end;g[3]=m();for a=1,n()do local e=m();if(d(e,1,1)==0)then local f=d(e,2,3);local r=d(e,4,6);local e={h(),h(),nil,nil};if(f==0)then e[t]=h();e[o]=h();elseif(f==#{1})then e[t]=n();elseif(f==s[2])then e[t]=n()-(2^16)elseif(f==s[3])then e[t]=n()-(2^16)e[o]=h();end;if(d(r,1,1)==1)then e[l]=u[e[l]]end if(d(r,2,2)==1)then e[t]=u[e[t]]end if(d(r,3,3)==1)then e[o]=u[e[o]]end c[a]=e;end end;for e=1,n()do a[e-(#{1})]=y();end;return g;end;local function j(d,e,n)local l=e;local l=n;return g(r.KrFuPfCk(r.KrFuPfCk(({r.QykcLrda(d)})[2],e),n))end local function _(s,e,u)local function ee(...)local h,p,g,j,c,n,m,y,b,k,ee,d;local e=0;while-1<e do if 2<e then if 5>e then if e==4 then k=r.gHYXoipF('#',...)-1;ee={};else y={};b={...};end else if e<6 then d=f(7);else e=-2;end end else if e>=1 then if e>=-1 then for d=30,75 do if e>1 then n=-41;m=-1;break;end;g=f(6,63,3,64,s);c=z j=0;break;end;else g=f(6,63,3,64,s);c=z j=0;end else h=f(6,63,1,9,s);p=f(6,46,2,66,s);end end e=e+1;end;for e=0,k do if(e>=g)then y[e-g]=b[e+1];else d[e]=b[e+1];end;end;local e=k-g+1 local e;local f;local function r(...)while true do end end while true do if n<-40 then n=n+42 end e=h[n];f=e[ne];if f<25 then if 12>f then if 6>f then if f<3 then if 0<f then if 0<=f then for n=35,77 do if 1<f then local e=e[l]d[e]=d[e]()break;end;d[e[l]]=(e[t]~=0);break;end;else local e=e[l]d[e]=d[e]()end else local u,r,g,c,m,b,s,f;for f=0,6 do if 3<=f then if f>=5 then if 2<=f then repeat if 5<f then u=e[l]d[u](d[u+1])break;end;u=e[l];r=d[e[t]];d[u+1]=r;d[u]=r[e[o]];n=n+1;e=h[n];until true;else u=e[l]d[u](d[u+1])end else if-1<=f then repeat if 3~=f then d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];break;end;d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];until true;else d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];end end else if 1>f then u=e[l];r=d[e[t]];d[u+1]=r;d[u]=r[e[o]];n=n+1;e=h[n];else if-3~=f then repeat if f<2 then f=0;while f>-1 do if f<=2 then if 0<f then if f~=-3 then repeat if 1<f then m=t;break;end;c=l;until true;else m=t;end else g=e;end else if 4>=f then if 3==f then b=g[m];else s=g[c];end else if f>4 then for e=43,90 do if 5~=f then f=-2;break;end;d(s,b);break;end;else f=-2;end end end f=f+1 end n=n+1;e=h[n];break;end;u=e[l]d[u]=d[u](a(d,u+1,e[t]))n=n+1;e=h[n];until true;else f=0;while f>-1 do if f<=2 then if 0<f then if f~=-3 then repeat if 1<f then m=t;break;end;c=l;until true;else m=t;end else g=e;end else if 4>=f then if 3==f then b=g[m];else s=g[c];end else if f>4 then for e=43,90 do if 5~=f then f=-2;break;end;d(s,b);break;end;else f=-2;end end end f=f+1 end n=n+1;e=h[n];end end end end end else if f>3 then if f>2 then repeat if f~=5 then local n=e[l]d[n](a(d,n+1,e[t]))break;end;local n=e[l];local l=d[e[t]];d[n+1]=l;d[n]=l[e[o]];until true;else local n=e[l]d[n](a(d,n+1,e[t]))end else d[e[l]]=_(p[e[t]],nil,u);end end else if 9>f then if f<7 then local f,u;for r=0,2 do if 1>r then f=e[l]d[f](a(d,f+1,e[t]))n=n+1;e=h[n];else if r>=-1 then repeat if 1~=r then d(e[l],e[t]);break;end;f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[o]];n=n+1;e=h[n];until true;else f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[o]];n=n+1;e=h[n];end end end else if f<8 then d[e[l]]=(e[t]~=0);else local e=e[l]d[e](d[e+1])end end else if 9>=f then for f=0,2 do if 0>=f then d[e[l]][e[t]]=e[o];n=n+1;e=h[n];else if f>=0 then for r=48,57 do if f<2 then d[e[l]]=u[e[t]];n=n+1;e=h[n];break;end;d[e[l]][e[t]]=e[o];break;end;else d[e[l]]=u[e[t]];n=n+1;e=h[n];end end end else if 9~=f then repeat if f~=11 then local f,b,s,r,k;for g=0,6 do if g>2 then if g>4 then if 5~=g then f=e[l]d[f]=d[f](a(d,f+1,e[t]))else d[e[l]]=u[e[t]];n=n+1;e=h[n];end else if g<4 then f=e[l]d[f]=d[f]()n=n+1;e=h[n];else f=e[l];k=d[e[t]];d[f+1]=k;d[f]=k[e[o]];n=n+1;e=h[n];end end else if 1>g then d(e[l],e[t]);n=n+1;e=h[n];else if g>=-1 then for o=22,52 do if 2>g then f=e[l]b,s=c(d[f](a(d,f+1,e[t])))m=s+f-1 r=0;for e=f,m do r=r+1;d[e]=b[r];end;n=n+1;e=h[n];break;end;f=e[l]d[f]=d[f](a(d,f+1,m))n=n+1;e=h[n];break;end;else f=e[l]b,s=c(d[f](a(d,f+1,e[t])))m=s+f-1 r=0;for e=f,m do r=r+1;d[e]=b[r];end;n=n+1;e=h[n];end end end end break;end;if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;until true;else if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;end end end end else if f>17 then if 21>f then if 18>=f then u[e[t]]=d[e[l]];else if 17<f then repeat if 20>f then d[e[l]]=u[e[t]];break;end;local e=e[l]d[e]=d[e](a(d,e+1,m))until true;else d[e[l]]=u[e[t]];end end else if 23<=f then if 24>f then d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]][e[t]]=d[e[o]];n=n+1;e=h[n];d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]]();n=n+1;e=h[n];do return end;else local n=e[l]d[n]=d[n](a(d,n+1,e[t]))end else if f~=20 then repeat if f<22 then for f=0,6 do if f>=3 then if f>4 then if 5==f then d[e[l]]=u[e[t]];n=n+1;e=h[n];else d[e[l]]=u[e[t]];end else if 0~=f then for o=14,85 do if 3<f then u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;d(e[l],e[t]);n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end else if 0>=f then u[e[t]]=d[e[l]];n=n+1;e=h[n];else if-3<=f then for o=33,57 do if 2~=f then d(e[l],e[t]);n=n+1;e=h[n];break;end;u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end end end break;end;d[e[l]]=_(p[e[t]],nil,u);until true;else for f=0,6 do if f>=3 then if f>4 then if 5==f then d[e[l]]=u[e[t]];n=n+1;e=h[n];else d[e[l]]=u[e[t]];end else if 0~=f then for o=14,85 do if 3<f then u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;d(e[l],e[t]);n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end else if 0>=f then u[e[t]]=d[e[l]];n=n+1;e=h[n];else if-3<=f then for o=33,57 do if 2~=f then d(e[l],e[t]);n=n+1;e=h[n];break;end;u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end end end end end end else if f<15 then if f<13 then if(d[e[l]]~=e[o])then n=n+1;else n=e[t];end;else if 14~=f then local f,a;for r=0,6 do if r>2 then if 4>=r then if r<4 then f=e[l]d[f](d[f+1])n=n+1;e=h[n];else d[e[l]]=u[e[t]];n=n+1;e=h[n];end else if r>5 then f=e[l]d[f](d[f+1])else d(e[l],e[t]);n=n+1;e=h[n];end end else if r<1 then d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];else if r>0 then repeat if r<2 then d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];break;end;f=e[l];a=d[e[t]];d[f+1]=a;d[f]=a[e[o]];n=n+1;e=h[n];until true;else f=e[l];a=d[e[t]];d[f+1]=a;d[f]=a[e[o]];n=n+1;e=h[n];end end end end else do return end;end end else if f>15 then if 12~=f then repeat if 16~=f then local n=e[l]d[n](a(d,n+1,e[t]))break;end;n=e[t];until true;else local n=e[l]d[n](a(d,n+1,e[t]))end else local e=e[l]d[e]=d[e]()end end end end else if f>37 then if f<44 then if 41>f then if f>38 then if f~=40 then d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]][e[t]]=d[e[o]];n=n+1;e=h[n];d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]]();n=n+1;e=h[n];do return end;else local e=e[l]d[e](d[e+1])end else local f,m;for r=0,3 do if 1>=r then if-2~=r then repeat if r<1 then d[e[l]]=u[e[t]];n=n+1;e=h[n];break;end;f=e[l]d[f]=d[f](a(d,f+1,e[t]))n=n+1;e=h[n];until true;else d[e[l]]=u[e[t]];n=n+1;e=h[n];end else if r<3 then f=e[l];m=d[e[t]];d[f+1]=m;d[f]=m[e[o]];n=n+1;e=h[n];else d(e[l],e[t]);end end end end else if f>=42 then if 42~=f then local n=e[l];local l=d[e[t]];d[n+1]=l;d[n]=l[e[o]];else d[e[l]][e[t]]=d[e[o]];end else for f=0,3 do if f<=1 then if-3~=f then repeat if f<1 then d[e[l]]=(e[t]~=0);n=n+1;e=h[n];break;end;u[e[t]]=d[e[l]];n=n+1;e=h[n];until true;else d[e[l]]=(e[t]~=0);n=n+1;e=h[n];end else if f~=3 then d[e[l]]=u[e[t]];n=n+1;e=h[n];else if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;end end end end end else if f>=47 then if 49<=f then if f~=47 then repeat if 50~=f then d[e[l]][e[t]]=d[e[o]];break;end;u[e[t]]=d[e[l]];until true;else u[e[t]]=d[e[l]];end else if f~=43 then repeat if f<48 then d[e[l]]=d[e[t]][e[o]];break;end;if(d[e[l]]~=e[o])then n=n+1;else n=e[t];end;until true;else d[e[l]]=d[e[t]][e[o]];end end else if 44>=f then local e=e[l]d[e]=d[e](a(d,e+1,m))else if 42<f then for n=15,85 do if f~=46 then d[e[l]][e[t]]=e[o];break;end;local n=e[l]local l,e=c(d[n](a(d,n+1,e[t])))m=e+n-1 local e=0;for n=n,m do e=e+1;d[n]=l[e];end;break;end;else d[e[l]][e[t]]=e[o];end end end end else if 31<=f then if 33>=f then if f<=31 then local f,u;f=e[l]d[f](a(d,f+1,e[t]))n=n+1;e=h[n];f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[o]];n=n+1;e=h[n];d(e[l],e[t]);n=n+1;e=h[n];f=e[l]d[f]=d[f](a(d,f+1,e[t]))n=n+1;e=h[n];do return end;else if f==32 then d[e[l]]();else d(e[l],e[t]);end end else if 36<=f then if 36<f then local n=e[l]d[n]=d[n](a(d,n+1,e[t]))else n=e[t];end else if 33<f then repeat if f<35 then local h,u,o,r,f;local n=0;while n>-1 do if 2<n then if n<5 then if 1<=n then repeat if n<4 then r=h[o];break;end;f=h[u];until true;else f=h[u];end else if 6>n then d(f,r);else n=-2;end end else if n<=0 then h=e;else if-3<=n then for e=44,58 do if 2>n then u=l;break;end;o=t;break;end;else o=t;end end end n=n+1 end break;end;d[e[l]]=d[e[t]][e[o]];until true;else d[e[l]]=d[e[t]][e[o]];end end end else if 28>f then if 25>=f then d[e[l]][e[t]]=e[o];else if 25~=f then for n=45,73 do if 26<f then d[e[l]]=u[e[t]];break;end;local n=e[l]local l,e=c(d[n](a(d,n+1,e[t])))m=e+n-1 local e=0;for n=n,m do e=e+1;d[n]=l[e];end;break;end;else d[e[l]]=u[e[t]];end end else if 29>f then do return end;else if 27<=f then repeat if 29<f then d[e[l]]();break;end;if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;until true;else if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;end end end end end end n=1+n;end;end;return ee end;local t=0xff;local u={};local f=(1);local l='';(function(n)local d=n local h=0x00 local e=0x00 d={(function(o)if h>0x24 then return o end h=h+1 e=(e+0x7f3-o)%0x2b return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x9e);l='';t={function()t()end};l=l..'@#';end return true end)'gAqhy'and d[0x1](0x71+o))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x18);end return true end)'IAcfX'and d[0x3](o+0xa9))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x26);l={l..'8 a',l};u[f]=y();f=f+((not r.oCVZFRwU)and 1 or 0);l[1]='8'..l[1];t[2]=0xff;end return true end)'mGABB'and d[0x2](o+0xcd))or o end),(function(o)if h>0x25 then return o end h=h+1 e=(e+0x586-o)%0x38 return(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xac);end return true end)'QWDZf'and d[0x2](0x35d+o))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x6a);t[2]=(t[2]*(j(function()u()end,a(l))-j(t[1],a(l))))+1;u[f]={};t=t[2];f=f+t;end return true end)'oQrqA'and d[0x3](o+0x13b))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x22);end return true end)'uecsC'and d[0x1](o+0x3cd))or o end),(function(l)if h>0x2d then return l end h=h+1 e=(e+0xf1b-l)%0x2e return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x98);end return true end)'llKxE'and d[0x2](0x2f3+l))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x91);end return true end)'zFBOB'and d[0x1](l+0x1e8))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x78);u[f]=ee();f=f+t;end return true end)'lRlQi'and d[0x3](l+0x21f))or l end)}d[0x1](0x2056)end){};local e=_(a(u));return e(...);end return j((function()local n={}local e=0x01;local d;if r.oCVZFRwU then d=r.oCVZFRwU(j)else d=''end if r.KrFuPfCk(d,r.AQMbtnAU)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(d,e,n,l,t,h)local h;if d>=4 then if d>5 then if 7<=d then if 6<d then for e=22,57 do if d<8 then do return setmetatable({},{['__\99\9788']=function(e,t,d,l,n)if n then return e[n]elseif l then return e else e[t]=d end end})end break;end;do return n(d,nil,n);end break;end;else do return n(d,nil,n);end end else do return t[n]end;end else if 4<d then local d=l;do return function()local e=e(n,d(d,d),d(d,d));d(1);return e;end;end;else local d=l;local h,o,f=t(2);do return function()local l,t,n,e=e(n,d(d,d),d(d,d)+3);d(4);return(e*h)+(n*o)+(t*f)+l;end;end;end end else if 2>d then if-1<=d then repeat if 0<d then do return function(n,e,d)if d then local e=(n/2^(e-1))%2^((d-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,t,l,n,e),e(5,t,l,n)end;until true;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end else if 0<=d then repeat if 3~=d then do return 16777216,65536,256 end;break;end;do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;until true;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end end end end),...) ?>
Did this file decode correctly?
Original Code
([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _KrwyRonnmnSD = a; end)); return(function(f,...)local g;local o;local t;local h;local l;local r;local e=24915;local n=0;local d={};while n<302 do n=n+1;while n<0x104 and e%0x23fa<0x11fd do n=n+1 e=(e*255)%35422 local u=n+e if(e%0x138a)>0x9c5 then e=(e-0x222)%0x2ffc while n<0x35d and e%0x4b50<0x25a8 do n=n+1 e=(e+81)%16865 local o=n+e if(e%0x4bde)>=0x25ef then e=(e+0x33b)%0xafa2 local e=18301 if not d[e]then d[e]=0x1 end elseif e%2~=0 then e=(e*0x2d8)%0x35a5 local e=34572 if not d[e]then d[e]=0x1 r={};end else e=(e-0x3ad)%0x1752 n=n+1 local e=97007 if not d[e]then d[e]=0x1 t=function(d)local e=0x01 local function n(n)e=e+n return d:sub(e-n,e-0x01)end while true do local d=n(0x01)if(d=="\5")then break end local e=h.byte(n(0x01))local e=n(e)if d=="\2"then e=r.aetMnBzF(e)elseif d=="\3"then e=e~="\0"elseif d=="\6"then l[e]=function(n,e)return f(8,nil,f,e,n)end elseif d=="\4"then e=l[e]elseif d=="\0"then e=l[e][n(h.byte(n(0x01)))];end local n=n(0x08)r[n]=e end end end end end elseif e%2~=0 then e=(e+0x1e7)%0xae3c while n<0x67 and e%0xa5a<0x52d do n=n+1 e=(e-433)%28480 local l=n+e if(e%0x38f8)<=0x1c7c then e=(e-0x3d7)%0xbf41 local e=21508 if not d[e]then d[e]=0x1 end elseif e%2~=0 then e=(e+0x244)%0x5aa9 local e=31075 if not d[e]then d[e]=0x1 g=tonumber;end else e=(e+0xb5)%0x7a41 n=n+1 local e=54752 if not d[e]then d[e]=0x1 o="\4\8\116\111\110\117\109\98\101\114\97\101\116\77\110\66\122\70\0\6\115\116\114\105\110\103\4\99\104\97\114\69\121\110\83\105\87\105\118\0\6\115\116\114\105\110\103\3\115\117\98\80\83\77\80\109\65\76\66\0\6\115\116\114\105\110\103\4\98\121\116\101\118\77\98\117\65\74\104\72\0\5\116\97\98\108\101\6\99\111\110\99\97\116\81\88\67\67\74\68\72\116\0\5\116\97\98\108\101\6\105\110\115\101\114\116\77\77\66\120\79\115\81\67\5";end end end else e=(e*0x2f8)%0x5ead n=n+1 while n<0x28a and e%0x1a50<0xd28 do n=n+1 e=(e*534)%26347 local t=n+e if(e%0x1a7c)<0xd3e then e=(e*0x394)%0xa71 local e=9921 if not d[e]then d[e]=0x1 h=string;end elseif e%2~=0 then e=(e*0x88)%0x2a10 local e=39641 if not d[e]then d[e]=0x1 l=getfenv and getfenv();end else e=(e*0x9b)%0x608f n=n+1 local e=1400 if not d[e]then d[e]=0x1 l=(not l)and _ENV or l;end end end end end e=(e+979)%43199 end t(o);local e={};for n=0x0,0xff do local d=r.EynSiWiv(n);e[n]=d;e[d]=n;end local function u(n)return e[n];end local h=(function(f,h)local o,d=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local t=f while true do n[0x03][r.PSMPmALB(h,e,(function()e=o+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""d=0x000 break end end local l=#h while e<l+0x01 do n[0x02][d]=r.PSMPmALB(h,e,(function()e=o+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 r.MMBxOsQC(n[0x01],(u((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=f+t;end end return r.QXCCJDHt(n[0x01])end);t(h(11,"7rGZ1_usWo/D0fqaa/"));t(h(95,"95xDdI8snCLm<ip}L5dnI8}nCsx}iI8}LiLp8T}CCiDimx88JmCndI{mnLiLs<nn5<mm8s+nnpIspLnDEiid8sEId8pm}sCLDxins}piCpDm}5LdD}mD8nmdIm8CvmLLdxpnnx<5<LI}5DLDdC<iCI#LiLI8(inmIdnLx}DC<pnx5sIIIi}8Cnd<pI8x5pL5Ii}5nid}<<xx<miD8858m=dC}CnsDm<C8m58m2II}sn85{iLnx}8ms}nC<n<D<imnixC<ix}}4LidCpDs5xC<IdILCdLIppCCxDpm}dp}5CCIxpDLDx8sI5Ipp<x8xpDCnID<58DxD8xes5dmJII}sC8xpid8pxxnLI8p<L8dDmdsImUI888}dC8d5im5ixi<s8L}<C}dn}ns8Dnisd}}Dnsx<nLxiDiissLM<L}InpiLD5<<LnCxnms8CCLD<dnpmnDxCi/dCpmmnDI<L8I3}mLeCL<mLdi}In}xppAsd}8LndnRUCmdDmL5ImL<dICKiLxp-pxnCxi<psx%LnDDCiD8nxi<58pLp"));local e=(-601+(function()local l,n=0,1;(function(e,n)n(n(e,e),e(e,e))end)(function(e,d)if l>368 then return d end l=l+1 n=(n+443)%10413 if(n%1950)>975 then n=(n*392)%616 return e(e(d,d),d(e,e))else return d end return e end,function(d,e)if l>305 then return e end l=l+1 n=(n*657)%5585 if(n%760)>380 then return e(e(e,e)and d(e,d),e(d,e)and d(d,e))else return d end return d end)return n;end)())local a=r._tLYwuct or r.zWxvMPCG;local ee=(getfenv)or(function()return _ENV end);local l=2;local o=4;local t=3;local ne=1;local function j(s,...)local u=h(e," u(,miJCg+X%hdNwL+NhN(dghNhN%X%ZXJr7LmwuNhdwgXhd%w%gXd,g,((muXuyC,JiiNi,dNd%hXh1%JwmuJchwNh%dwNmJJJqi(mg,N+%g%gdC%khGhwgNNNm(g,i,dWwuC6%u(wdw+NNCJgiJ(igmN+uX++w+mJwCCJ%idmCiNi(,w,X(+(%wJMdwNwmN%NX%,dhd(hJmXmg,J(h((ghJwJJ(%iNmCm+,Chgh(%mXXXnH+whN%NJCuJiiXigmJ,h,(JwCwguJwmNiCi+mCdgd%hm%X%Vu,wd6mwCwudCdhh+hJhz%iJNJC(m(,uF3JwhmPmdii(%,,(NuXu%u++g+(gmCXC_d,%d%%%J,N,N(X(#uJCgCui+i(iCmNm((w(Xu+XgXX+mgXgS%+dNhC%+h(X+gN+wgdg,CNJdwN?uNXNjdJ(%;d(X(iudNhwwwmNXdwdJ%u+gmXgX,J(h((g6g(CgJXJ,(I!%:u,Xuw(%dgFCww=_NXNddld+hd%i%g+wXu+J+(C+CgCm(mmwiumiwd(J(JuwuiW_wmN+NXNl++gd%gXdXiX,i%++gXg,,,J(JuiX3%m*,,(((+d%6ww+wCw(X+NChwdJ%,%XX(,m(h(GuJFhJu,wNND%dXdEhJuTuXuuuu%mw{N+N(dug(hwXw%CiXXv+gg%gJJdJuJgmwmmwJm,(%(huJhmNCwwwiNXhihdhuCmXIC,,Jig((ugsN4m(,wcNJdhd,hg%N%m%h%J+Jghg(CNJNJmiXJ(mw,h,((g(Num&X;0uhw=N(dghNhX%X%uXJXw+(ghgNCmJXJlihmhm,,g,(,muXuR)J>,w(N+dNdmNJh2%JXhX,+ggNgmghg%JJihi(iX,N,m(XikuwFhY(wgwFNmN,d)dghu%(Xg+NXJgXgkCJ+hCiigmNmmm(,:(wuhumuNwNwmNXN,dJhhh(hXNeXm+X+qggChC(JgJ_JXmXm_,J(N((ugjNuJ_ww.NJdhdXhg%N%m%hXC+Jghg(C+JNJmiXJ(mN,h,((g(gum<XojtgkmN(dghNdu%X%cXJXNX(ggCNCmCuJFiJmhimmh(N(muXuNLJwhw(wXwJdmh%ho%XXhX(+gXNg+CXCuJJidi(m%,NmJ,m(Vu+Ghu,wgNNNmdXN+hJ%d%(X%+N+mgXg=gCJhJ(igmNmm,h,_(J(,u(_gwNwiNXN(dJNhdN%gXwXm+X+Q+(ChgmC%iNiCmXmX,J(h((ugurbmw%wQN+dhdmhgdN%+XXX(+Jgdg(CdJNCJg8i_mX,h,+(guNum)X:JwJNNN(dhhNhJ%Xd9XN+h+iggg0CmC+JFJgiim(,d(N(JuXuo#JwNygNgNmdmhXhv%JXhX(+NgNgCCXCJJJidi(JgmC,m(d(Rugohuuwg53w(dXdihJhm%(Xg+N+JX2g3ChJhJ,igmNmm,Xmw(Juwu(GNwNwiNX.kNihhhi%gXwXm+w+P+g+,C(JdiNiwmXmL,J(h,JuguunmwwwBNgdhd(hw%N%mXXXu+Jghg(ChJNJmiXi(mJ,h,((g(num&X0;ii,,N(dhhNhm%Xudnwlgwdg+g,CmJXJ?JgC,m(,+(N(iuXu.RJWhehNgdwdmhhh}%JXh%mXdgNgiCXC(JJihi(mgmg,m(%(9uC:h6,wgNNNgdXdjhJ%d%(Xg+N+mgXgKCJJNJ(igmNmm,N,3(JuhgiCgJCJ(NXN(dJhhh(uCwiXi+w+EgJChgmgwiNiimXm(,J(h(((g(%nmw%wtNCdhd(hgd?%CXXXu+Jgdg(CgJNJmJgiTmC,h,,(guwumOX^NwJNhN(d+hNhm%X%/XJ+h+(+,CNCmJXJViXmhm(,g+igigCCi/Jy8w(NgdNmC,X(+(mXh%,+ggNgmhhdidJhg%%X%+wXggwgmJ+g-CuJXmwm%,wdLhX%h%(Xguiwiw,wmCJCgJ(igmNgdXgXJ+igCCCi%J,JJJWmimghhhh%gXNXmNuwiwXhwdCdXdm%dXdXi,+(d((uX7NLmwXmw(ddNJhJuiCmdm,,+mwh%g(guJNJmiX+J%%XX+i+hgCg,CgC,wJwzN(dghNuC(Xu+um+hXmggCNCmChC%iJmhm(m;(N(muX,D,iwhw(NgdNdmhhh/dhdhX(+ggNg+CXCuJJJ,i(mhmN,m(X(Zu%Rhn,wgw(wmdXd;hJhd%(X++NXJXig^CJJhJ,igmNmmiX,#(Juhu(qgwNwXNXw(Ndhhhm%g%uXm+X+}gJgJC(JgiNiJmXm(,Jmh(hug5NImwXwVwVdhw(Nm%N%mXXXU+J+Cg(+ggmJmiXi8mJ,h,C(guN(i0XUSwJNNN(d+hNdJdi%sXJ+h+JggCNCmChg(iJmdm(mu(N(muXuTyNwhw(NgNGdmh%hL%X%hX(+ggNgmCXCuJJihJNmg,N,m(%(<uJ?hz(wgNNNmN,dLhJ%h%(%(+N+mgXhJdwdNhCX%%,%J%G+i+guhu+RgwNwm(%mm,Xu+(%(mu+XC+%+2gwChC(JgX%%i%,XNC%X(gCgJg(nm?,wjNJdhm+,C,>uwudupwCNwNCCgC(JmiXi^%,Xi+N+,uNuJ<X&?wJm%(+dgd(hm%X%Vudwdw%whgGDN#,w+NwNid%wuJd(m(+uGfJwhImW,dNdmhXhC%JXhX(%g%dgmCXCxJJihigmgJmJm(X(EuJuuW(w+NNNCdXdmdJ%h%(XgX,+mg%gGCXChJ(igmNi(,X,u(J(N(d{gwNwmNwN1dJhhN(hiXNXm+X+UgJgQC(ggJXimmXmy,J(h(mug(N(uwXw7NJdhd(h+%N%m%dXI+JghgmCgJwJmJhJ%mJ,h,(,SuNumAXu(o(NhN,dgdChm%X%aXJ%i+(ggCNCJJXJuiJiZi(,g(N(muXu-ACwhw(!mdNdmhXhu%JXhX(+ggNgmCX");local n=0;r.QykcLrda(function()r.TBDKcSrT()n=n+1 end)local function e(e,d)if d then return n end;n=e+n;end local d,n,m=f(0,f,e,u,r.vMbuAJhH);local function h()local d,n=r.vMbuAJhH(u,e(1,3),e(5,6)+2);e(2);return(n*256)+d;end;local c=true;local c=0 local function p()local l=n();local e=n();local t=1;local l=(d(e,1,20)*(2^32))+l;local n=d(e,21,31);local e=((-1)^d(e,32));if(n==0)then if(l==c)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return r.LgIdWRsO(e,n-1023)*(t+(l/(2^52)));end;local b=n;local function k(n)local d;if(not n)then n=b();if(n==0)then return'';end;end;d=r.PSMPmALB(u,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+c),#d do e=e..r.PSMPmALB(d,n,n)end return e;end;local b=#r.zAlazvFf(g('\49.\48'))~=1 local e=n;local function z(...)return{...},r.gHYXoipF('#',...)end local function y()local e={};local a={};local c={};local g={c,a,nil,e};local e=n()local u={}for l=1,e do local d=m();local n;if(d==3)then n=(m()~=#{});elseif(d==2)then local e=p();if b and r.KrFuPfCk(r.zAlazvFf(e),'.(\48+)$')then e=r.iAVOCgZf(e);end n=e;elseif(d==0)then n=k();end;u[l]=n;end;g[3]=m();for a=1,n()do local e=m();if(d(e,1,1)==0)then local f=d(e,2,3);local r=d(e,4,6);local e={h(),h(),nil,nil};if(f==0)then e[t]=h();e[o]=h();elseif(f==#{1})then e[t]=n();elseif(f==s[2])then e[t]=n()-(2^16)elseif(f==s[3])then e[t]=n()-(2^16)e[o]=h();end;if(d(r,1,1)==1)then e[l]=u[e[l]]end if(d(r,2,2)==1)then e[t]=u[e[t]]end if(d(r,3,3)==1)then e[o]=u[e[o]]end c[a]=e;end end;for e=1,n()do a[e-(#{1})]=y();end;return g;end;local function j(d,e,n)local l=e;local l=n;return g(r.KrFuPfCk(r.KrFuPfCk(({r.QykcLrda(d)})[2],e),n))end local function _(s,e,u)local function ee(...)local h,p,g,j,c,n,m,y,b,k,ee,d;local e=0;while-1<e do if 2<e then if 5>e then if e==4 then k=r.gHYXoipF('#',...)-1;ee={};else y={};b={...};end else if e<6 then d=f(7);else e=-2;end end else if e>=1 then if e>=-1 then for d=30,75 do if e>1 then n=-41;m=-1;break;end;g=f(6,63,3,64,s);c=z j=0;break;end;else g=f(6,63,3,64,s);c=z j=0;end else h=f(6,63,1,9,s);p=f(6,46,2,66,s);end end e=e+1;end;for e=0,k do if(e>=g)then y[e-g]=b[e+1];else d[e]=b[e+1];end;end;local e=k-g+1 local e;local f;local function r(...)while true do end end while true do if n<-40 then n=n+42 end e=h[n];f=e[ne];if f<25 then if 12>f then if 6>f then if f<3 then if 0<f then if 0<=f then for n=35,77 do if 1<f then local e=e[l]d[e]=d[e]()break;end;d[e[l]]=(e[t]~=0);break;end;else local e=e[l]d[e]=d[e]()end else local u,r,g,c,m,b,s,f;for f=0,6 do if 3<=f then if f>=5 then if 2<=f then repeat if 5<f then u=e[l]d[u](d[u+1])break;end;u=e[l];r=d[e[t]];d[u+1]=r;d[u]=r[e[o]];n=n+1;e=h[n];until true;else u=e[l]d[u](d[u+1])end else if-1<=f then repeat if 3~=f then d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];break;end;d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];until true;else d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];end end else if 1>f then u=e[l];r=d[e[t]];d[u+1]=r;d[u]=r[e[o]];n=n+1;e=h[n];else if-3~=f then repeat if f<2 then f=0;while f>-1 do if f<=2 then if 0<f then if f~=-3 then repeat if 1<f then m=t;break;end;c=l;until true;else m=t;end else g=e;end else if 4>=f then if 3==f then b=g[m];else s=g[c];end else if f>4 then for e=43,90 do if 5~=f then f=-2;break;end;d(s,b);break;end;else f=-2;end end end f=f+1 end n=n+1;e=h[n];break;end;u=e[l]d[u]=d[u](a(d,u+1,e[t]))n=n+1;e=h[n];until true;else f=0;while f>-1 do if f<=2 then if 0<f then if f~=-3 then repeat if 1<f then m=t;break;end;c=l;until true;else m=t;end else g=e;end else if 4>=f then if 3==f then b=g[m];else s=g[c];end else if f>4 then for e=43,90 do if 5~=f then f=-2;break;end;d(s,b);break;end;else f=-2;end end end f=f+1 end n=n+1;e=h[n];end end end end end else if f>3 then if f>2 then repeat if f~=5 then local n=e[l]d[n](a(d,n+1,e[t]))break;end;local n=e[l];local l=d[e[t]];d[n+1]=l;d[n]=l[e[o]];until true;else local n=e[l]d[n](a(d,n+1,e[t]))end else d[e[l]]=_(p[e[t]],nil,u);end end else if 9>f then if f<7 then local f,u;for r=0,2 do if 1>r then f=e[l]d[f](a(d,f+1,e[t]))n=n+1;e=h[n];else if r>=-1 then repeat if 1~=r then d(e[l],e[t]);break;end;f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[o]];n=n+1;e=h[n];until true;else f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[o]];n=n+1;e=h[n];end end end else if f<8 then d[e[l]]=(e[t]~=0);else local e=e[l]d[e](d[e+1])end end else if 9>=f then for f=0,2 do if 0>=f then d[e[l]][e[t]]=e[o];n=n+1;e=h[n];else if f>=0 then for r=48,57 do if f<2 then d[e[l]]=u[e[t]];n=n+1;e=h[n];break;end;d[e[l]][e[t]]=e[o];break;end;else d[e[l]]=u[e[t]];n=n+1;e=h[n];end end end else if 9~=f then repeat if f~=11 then local f,b,s,r,k;for g=0,6 do if g>2 then if g>4 then if 5~=g then f=e[l]d[f]=d[f](a(d,f+1,e[t]))else d[e[l]]=u[e[t]];n=n+1;e=h[n];end else if g<4 then f=e[l]d[f]=d[f]()n=n+1;e=h[n];else f=e[l];k=d[e[t]];d[f+1]=k;d[f]=k[e[o]];n=n+1;e=h[n];end end else if 1>g then d(e[l],e[t]);n=n+1;e=h[n];else if g>=-1 then for o=22,52 do if 2>g then f=e[l]b,s=c(d[f](a(d,f+1,e[t])))m=s+f-1 r=0;for e=f,m do r=r+1;d[e]=b[r];end;n=n+1;e=h[n];break;end;f=e[l]d[f]=d[f](a(d,f+1,m))n=n+1;e=h[n];break;end;else f=e[l]b,s=c(d[f](a(d,f+1,e[t])))m=s+f-1 r=0;for e=f,m do r=r+1;d[e]=b[r];end;n=n+1;e=h[n];end end end end break;end;if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;until true;else if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;end end end end else if f>17 then if 21>f then if 18>=f then u[e[t]]=d[e[l]];else if 17<f then repeat if 20>f then d[e[l]]=u[e[t]];break;end;local e=e[l]d[e]=d[e](a(d,e+1,m))until true;else d[e[l]]=u[e[t]];end end else if 23<=f then if 24>f then d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]][e[t]]=d[e[o]];n=n+1;e=h[n];d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]]();n=n+1;e=h[n];do return end;else local n=e[l]d[n]=d[n](a(d,n+1,e[t]))end else if f~=20 then repeat if f<22 then for f=0,6 do if f>=3 then if f>4 then if 5==f then d[e[l]]=u[e[t]];n=n+1;e=h[n];else d[e[l]]=u[e[t]];end else if 0~=f then for o=14,85 do if 3<f then u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;d(e[l],e[t]);n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end else if 0>=f then u[e[t]]=d[e[l]];n=n+1;e=h[n];else if-3<=f then for o=33,57 do if 2~=f then d(e[l],e[t]);n=n+1;e=h[n];break;end;u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end end end break;end;d[e[l]]=_(p[e[t]],nil,u);until true;else for f=0,6 do if f>=3 then if f>4 then if 5==f then d[e[l]]=u[e[t]];n=n+1;e=h[n];else d[e[l]]=u[e[t]];end else if 0~=f then for o=14,85 do if 3<f then u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;d(e[l],e[t]);n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end else if 0>=f then u[e[t]]=d[e[l]];n=n+1;e=h[n];else if-3<=f then for o=33,57 do if 2~=f then d(e[l],e[t]);n=n+1;e=h[n];break;end;u[e[t]]=d[e[l]];n=n+1;e=h[n];break;end;else d(e[l],e[t]);n=n+1;e=h[n];end end end end end end end else if f<15 then if f<13 then if(d[e[l]]~=e[o])then n=n+1;else n=e[t];end;else if 14~=f then local f,a;for r=0,6 do if r>2 then if 4>=r then if r<4 then f=e[l]d[f](d[f+1])n=n+1;e=h[n];else d[e[l]]=u[e[t]];n=n+1;e=h[n];end else if r>5 then f=e[l]d[f](d[f+1])else d(e[l],e[t]);n=n+1;e=h[n];end end else if r<1 then d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];else if r>0 then repeat if r<2 then d[e[l]]=d[e[t]][e[o]];n=n+1;e=h[n];break;end;f=e[l];a=d[e[t]];d[f+1]=a;d[f]=a[e[o]];n=n+1;e=h[n];until true;else f=e[l];a=d[e[t]];d[f+1]=a;d[f]=a[e[o]];n=n+1;e=h[n];end end end end else do return end;end end else if f>15 then if 12~=f then repeat if 16~=f then local n=e[l]d[n](a(d,n+1,e[t]))break;end;n=e[t];until true;else local n=e[l]d[n](a(d,n+1,e[t]))end else local e=e[l]d[e]=d[e]()end end end end else if f>37 then if f<44 then if 41>f then if f>38 then if f~=40 then d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]][e[t]]=d[e[o]];n=n+1;e=h[n];d[e[l]]=u[e[t]];n=n+1;e=h[n];d[e[l]]();n=n+1;e=h[n];do return end;else local e=e[l]d[e](d[e+1])end else local f,m;for r=0,3 do if 1>=r then if-2~=r then repeat if r<1 then d[e[l]]=u[e[t]];n=n+1;e=h[n];break;end;f=e[l]d[f]=d[f](a(d,f+1,e[t]))n=n+1;e=h[n];until true;else d[e[l]]=u[e[t]];n=n+1;e=h[n];end else if r<3 then f=e[l];m=d[e[t]];d[f+1]=m;d[f]=m[e[o]];n=n+1;e=h[n];else d(e[l],e[t]);end end end end else if f>=42 then if 42~=f then local n=e[l];local l=d[e[t]];d[n+1]=l;d[n]=l[e[o]];else d[e[l]][e[t]]=d[e[o]];end else for f=0,3 do if f<=1 then if-3~=f then repeat if f<1 then d[e[l]]=(e[t]~=0);n=n+1;e=h[n];break;end;u[e[t]]=d[e[l]];n=n+1;e=h[n];until true;else d[e[l]]=(e[t]~=0);n=n+1;e=h[n];end else if f~=3 then d[e[l]]=u[e[t]];n=n+1;e=h[n];else if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;end end end end end else if f>=47 then if 49<=f then if f~=47 then repeat if 50~=f then d[e[l]][e[t]]=d[e[o]];break;end;u[e[t]]=d[e[l]];until true;else u[e[t]]=d[e[l]];end else if f~=43 then repeat if f<48 then d[e[l]]=d[e[t]][e[o]];break;end;if(d[e[l]]~=e[o])then n=n+1;else n=e[t];end;until true;else d[e[l]]=d[e[t]][e[o]];end end else if 44>=f then local e=e[l]d[e]=d[e](a(d,e+1,m))else if 42<f then for n=15,85 do if f~=46 then d[e[l]][e[t]]=e[o];break;end;local n=e[l]local l,e=c(d[n](a(d,n+1,e[t])))m=e+n-1 local e=0;for n=n,m do e=e+1;d[n]=l[e];end;break;end;else d[e[l]][e[t]]=e[o];end end end end else if 31<=f then if 33>=f then if f<=31 then local f,u;f=e[l]d[f](a(d,f+1,e[t]))n=n+1;e=h[n];f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[o]];n=n+1;e=h[n];d(e[l],e[t]);n=n+1;e=h[n];f=e[l]d[f]=d[f](a(d,f+1,e[t]))n=n+1;e=h[n];do return end;else if f==32 then d[e[l]]();else d(e[l],e[t]);end end else if 36<=f then if 36<f then local n=e[l]d[n]=d[n](a(d,n+1,e[t]))else n=e[t];end else if 33<f then repeat if f<35 then local h,u,o,r,f;local n=0;while n>-1 do if 2<n then if n<5 then if 1<=n then repeat if n<4 then r=h[o];break;end;f=h[u];until true;else f=h[u];end else if 6>n then d(f,r);else n=-2;end end else if n<=0 then h=e;else if-3<=n then for e=44,58 do if 2>n then u=l;break;end;o=t;break;end;else o=t;end end end n=n+1 end break;end;d[e[l]]=d[e[t]][e[o]];until true;else d[e[l]]=d[e[t]][e[o]];end end end else if 28>f then if 25>=f then d[e[l]][e[t]]=e[o];else if 25~=f then for n=45,73 do if 26<f then d[e[l]]=u[e[t]];break;end;local n=e[l]local l,e=c(d[n](a(d,n+1,e[t])))m=e+n-1 local e=0;for n=n,m do e=e+1;d[n]=l[e];end;break;end;else d[e[l]]=u[e[t]];end end else if 29>f then do return end;else if 27<=f then repeat if 29<f then d[e[l]]();break;end;if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;until true;else if(d[e[l]]==e[o])then n=n+1;else n=e[t];end;end end end end end end n=1+n;end;end;return ee end;local t=0xff;local u={};local f=(1);local l='';(function(n)local d=n local h=0x00 local e=0x00 d={(function(o)if h>0x24 then return o end h=h+1 e=(e+0x7f3-o)%0x2b return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x9e);l='\37';t={function()t()end};l=l..'\100\43';end return true end)'gAqhy'and d[0x1](0x71+o))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x18);end return true end)'IAcfX'and d[0x3](o+0xa9))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x26);l={l..'\58 a',l};u[f]=y();f=f+((not r.oCVZFRwU)and 1 or 0);l[1]='\58'..l[1];t[2]=0xff;end return true end)'mGABB'and d[0x2](o+0xcd))or o end),(function(o)if h>0x25 then return o end h=h+1 e=(e+0x586-o)%0x38 return(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xac);end return true end)'QWDZf'and d[0x2](0x35d+o))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x6a);t[2]=(t[2]*(j(function()u()end,a(l))-j(t[1],a(l))))+1;u[f]={};t=t[2];f=f+t;end return true end)'oQrqA'and d[0x3](o+0x13b))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x22);end return true end)'uecsC'and d[0x1](o+0x3cd))or o end),(function(l)if h>0x2d then return l end h=h+1 e=(e+0xf1b-l)%0x2e return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x98);end return true end)'llKxE'and d[0x2](0x2f3+l))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x91);end return true end)'zFBOB'and d[0x1](l+0x1e8))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x78);u[f]=ee();f=f+t;end return true end)'lRlQi'and d[0x3](l+0x21f))or l end)}d[0x1](0x2056)end){};local e=_(a(u));return e(...);end return j((function()local n={}local e=0x01;local d;if r.oCVZFRwU then d=r.oCVZFRwU(j)else d=''end if r.KrFuPfCk(d,r.AQMbtnAU)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(d,e,n,l,t,h)local h;if d>=4 then if d>5 then if 7<=d then if 6<d then for e=22,57 do if d<8 then do return setmetatable({},{['__\99\97\108\108']=function(e,t,d,l,n)if n then return e[n]elseif l then return e else e[t]=d end end})end break;end;do return n(d,nil,n);end break;end;else do return n(d,nil,n);end end else do return t[n]end;end else if 4<d then local d=l;do return function()local e=e(n,d(d,d),d(d,d));d(1);return e;end;end;else local d=l;local h,o,f=t(2);do return function()local l,t,n,e=e(n,d(d,d),d(d,d)+3);d(4);return(e*h)+(n*o)+(t*f)+l;end;end;end end else if 2>d then if-1<=d then repeat if 0<d then do return function(n,e,d)if d then local e=(n/2^(e-1))%2^((d-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,t,l,n,e),e(5,t,l,n)end;until true;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end else if 0<=d then repeat if 3~=d then do return 16777216,65536,256 end;break;end;do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;until true;else do return e(1),e(4,t,l,n,e),e(5,t,l,n)end;end end end end),...)
Function Calls
None |
Stats
MD5 | aa7fdaee852ad169a57d5f0a4499ae2b |
Eval Count | 0 |
Decode Time | 88 ms |