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) _LFgbLHKVzVhV = a; e..
Decoded Output download
<? ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _LFgbLHKVzVhV = a; end)); return(function(f,...)local a;local l;local u;local o;local d;local r;local e=24915;local n=0;local t={};while n<731 do n=n+1;while n<0x1f4 and e%0x39bc<0x1cde do n=n+1 e=(e*678)%15825 local c=n+e if(e%0x1dae)<0xed7 then e=(e*0x2d0)%0x784f while n<0x312 and e%0x341e<0x1a0f do n=n+1 e=(e-22)%27695 local o=n+e if(e%0xe04)>=0x702 then e=(e+0x2d3)%0x203c local e=40003 if not t[e]then t[e]=0x1 r={};end elseif e%2~=0 then e=(e+0x23)%0x4122 local e=10356 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end else e=(e*0x53)%0x585d n=n+1 local e=39792 if not t[e]then t[e]=0x1 d=string;end end end elseif e%2~=0 then e=(e*0x2e8)%0x96d1 while n<0x130 and e%0x25e4<0x12f2 do n=n+1 e=(e+784)%35516 local a=n+e if(e%0x3bfe)<=0x1dff then e=(e*0xf9)%0x6e62 local e=85182 if not t[e]then t[e]=0x1 end elseif e%2~=0 then e=(e*0x1f1)%0xac16 local e=3333 if not t[e]then t[e]=0x1 o=function(o)local e=0x01 local function t(n)e=e+n return o:sub(e-n,e-0x01)end while true do local n=t(0x01)if(n=="")then break end local e=d.byte(t(0x01))local e=t(e)if n==""then e=r.xacmuEGs(e)elseif n==""then e=e~=""elseif n==""then l[e]=function(n,e)return f(8,nil,f,e,n)end elseif n==""then e=l[e]elseif n==""then e=l[e][t(d.byte(t(0x01)))];end local n=t(0x08)r[n]=e end end end else e=(e+0x2ce)%0x68be n=n+1 local e=71985 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end end end else e=(e-0x26e)%0x20b1 n=n+1 while n<0x216 and e%0xc94<0x64a do n=n+1 e=(e-920)%43075 local l=n+e if(e%0x123e)<0x91f then e=(e*0x3ea)%0x8b8f local e=84834 if not t[e]then t[e]=0x1 end elseif e%2~=0 then e=(e*0xdc)%0x5d99 local e=97121 if not t[e]then t[e]=0x1 a="\8NIHO9\98ALP\97\999O99MMNLEHC\99D\97LCR\87JN\87 9LMNLEHCMO\98\97B>;6L\986MNLEHC\98QNA\95OJ8\83P\82QN\97\988A\99IH\99\97N9:GJR9>\99N\97\988AEHMALN\80;\98K:8\90\85";end else e=(e+0x39d)%0x357b n=n+1 local e=20382 if not t[e]then t[e]=0x1 u=tonumber;end end end end end e=(e*418)%33188 end o(a);local n={};for e=0x0,0xff do local t=r.gzWptWwr(e);n[e]=t;n[t]=e;end local function c(e)return n[e];end local h=(function(a,o)local f,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local d=a while true do n[0x03][r.afLIBrbB(o,e,(function()e=f+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#o while e<l+0x01 do n[0x02][t]=r.afLIBrbB(o,e,(function()e=f+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 r.PIbqHlZU(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 r.EHkpzOLc(n[0x01])end);o(h(43,"s=!PzgTrw,Up0x.(xU"));o(h(150,"La2?7qefAJ,sd4mHe,4,saadA7mqq7sfsmAA_?eq427qsW-HfqmAq7,46q23Ase(s42qJ,/77s4t?q,e+7qm427aq?daJeh2e?4272Jdz4fJs42as5HqeJAAHAdH?,,2*?f24q44,H_4A,m?q2ss24fHHseedJ?s,4,7a2mq7?dIam2qHeqAd?7c,2m27mmq24J?27edmmH}e2??AH)Aesd47eJ4a,fa4dqws?adAdma74d,1sf4ae0dfJ?2,sa?AmH?eEAs?afqmd7A4A2JfHaHaeAQq4sa2?JA4feAs772JdmaeHmamO7JmsJq4e?4s4?m,?Sme7fr4ms7aJAfH2q,ss2,A44qee,e?sJ,a27msdmR7H2AfHm,qmdadd,q)Af7dH?s,4aqqHHeq,d4a4A2mJ3Ued7q,Aa7eH4s74daksA4Hsedda?4fe,O=smQ7d,4adAd427esd?2faKmq4m24e72aJfqme7Jsa2dfqN77e,7YdAJ&aAaf2mBs?aaAmmdH?sm2mJs_qf2ss7,AsHAAddHq7dAsH"));local e=(-24437+(function()local o,e=0,1;(function(l,e,t,n)e(n(t and t,e,e,e),n(l,t,t,t),e(e,n,e,n),l(n,l,l,t and n))end)(function(d,n,t,l)if o>311 then return l end o=o+1 e=(e-835)%42379 if(e%1090)<=545 then e=(e+967)%26031 return n else return t(d(t,n,n,l),t(t and t,n,d,d),t(d,l,n,n),t(t,n and n,l and n,l))end return d(l(n,n,n and l,n and n),l(t,n,n,d)and t(t,n,t,l),l(d,d,t,t),t(l,l,n,t))end,function(d,t,l,n)if o>495 then return t end o=o+1 e=(e-798)%3470 if(e%1522)<761 then e=(e*18)%34631 return n else return t(n(d,l,t,l and t),t(d,n,t,t),l(l,l,d,d and n),d(l,t,n,t)and l(t,d,t,d))end return d(n(n,n,l,t),d(n,l,n and n,t),l(d,d,n,n and n),t(d and l,l and t,n,n))end,function(n,d,t,l)if o>213 then return n end o=o+1 e=(e+756)%45902 if(e%1236)<=618 then e=(e+455)%404 return n else return t(n(d,d,l,l),d(t and l,t,d,t),n(n and d,l,n and l,n),n(d,d,t,n))end return n(l(t,t,l,l),t(d,t,n and n,l),l(n,d and d,n,t),t(l,t,t,l))end,function(n,t,l,d)if o>487 then return t end o=o+1 e=(e+270)%696 if(e%1566)>=783 then return t(n(l,l,d,t),n(n,l,t,l),t(t and n,l,n,t and l),d(d,d,n,n))else return d end return n end)return e;end)())local c=r.uUmqxcuD or r.iIvpy_ZW;local te=(getfenv)or(function()return _ENV end);local _=1;local l=3;local a=4;local o=2;local function ne(k,...)local s=h(e,"/kpSt*20&?Fboemc*Z&&ook%*0?ceopN2tc&*&?kmeke2mbS&0e?+o*{?tp2&betLetm?*eSk*2oF*mcSpteopc*tp&o*cFemtp&2o_ctz0mmSpp*+?^e0p2&mFmAtS2p00pFocAStbcpk0t?0meSm&2becbtkpS0kF&moSnoSp2tcF*c2Sm0kope?tm&komk&mbSR0:btc&FSmkSk2etc?oetk&*oc0t*?kmVc22SFFbcp&2ebtcReSpE*&?om{0pe0ps*??Fck}o2oF*EkSk&p*0bceop(2tco*t??m0e&2pF?cDpepoo0c*tbSoexk2*0FZe*k02oFkmtmt0cb*3tSoS&F?9c*S?2bck**0*&epcSn0*?&oeZktFFqk*V?qekic*kF&eep(*Sb&c0Sm0kbbceecp02tF&mo0SmSp22FF*m0SoTc2??te&koFekS*0?FoSk?*b?beSS&0Fb*cmSb&bFt,?t&&oekkmS*FocqSpV*t&&oe k?*&?omUp00pFoczStbmp*0pF?obS&0?b?r2*_pS2&F&moSKmbk?2mFm&0ooUo*y?tp20eoe4?mbSF0rbtc&&pm?Sp2o?pc?t2&beMmSto?ke&ktc0te0ooZ;t?FckSS0eo&u*t*?peooo*mFSmoeo22bSceSF0t&mb&eopq2tF&mmt?0tb&cot{Fko&lm* ?te&ko29otcbpo0pbtcFSo&totR&*&?ge&k&*eFPmtp&2ob*ctSF0oot!ttF&oe2k?*&?mm,S02&FecrSt0&oZpttt&&oopS*t??eop.0FF&mcSO0*b&cotuFtmcXo*S?tebko2kFtm&Sm0Kb?c&Sm&_ota&2oF!etkm*oF{mtpb2ob=coS&&SoKf*t&&oe6kt06?omSpt2cFockSt0&o?{Yt0&&oek *t?&cop&2tFbmoSS0tb?cot,&oo&kk*C?te&ko2 Ftcrpo02btc?So&Oot1&*c?aebk&*oFGmtp&2obcctSb0oo0Ttt?&oetk&*&?om-So2&FecMt2?eboEStt&FookO*tFFc&p!2&F&ckSQ0tb&cote&toe1o*k?te&ko29o*m&SD0:b&c&tk& otk?to?SetkF*oFkmtp&0FbEctS&0eoZ tt&&omokt*&?omzSS2&FochS*0&boss*2&mookv*tFteop.2tbF.4SJ0tb&cct)&to&Sp*m?te&ko22Ftm?po0?btco2L&%ots&*p?re*k&2Uotmtp&2ob0ctS?0ooYkpt&&oeOk**&?om{S2&eFoc5St0mbo8{ttF&emkA*t?&eopx2&F&cmSt0tbFcotF&to&Wo*8FSe&ko2rF2m&pm0fo2,bSo&kotUmto?>etS&*cFUm*p&2ebDc&S&&mopzttb&oekkt*&?omVp&2&FecBS00&bm<i2t&?ookp*t?&eop02tbFc*SM0&b&cmt:&to&Co*p?teFko2tFtmFpo?Pb2c&Sc&)otr&*S?Am2kb*oF*mtS:2ob:ctS&?So7-0t&?keCk2*&boctpt2oFocpSt0eboprtm&&eIk9*&?&m0pv2FoKmoS20tb&cotk&toF9o*_Fce&ko2#F*m&po0>btkSSo&lotibto?Betk&2oF;m&p&0pbGc*S&0oeeXtt&&oekkt*&?o");local n=0;r.Id_fZJTY(function()r.IpRvfAem()n=n+1 end)local function e(e,t)if t then return n end;n=e+n;end local t,n,h=f(0,f,e,s,r._upFSxRy);local function d()local n,t=r._upFSxRy(s,e(1,3),e(5,6)+2);e(2);return(t*256)+n;end;local b=true;local b=0 local function z()local l=n();local e=n();local o=1;local l=(t(e,1,20)*(2^32))+l;local n=t(e,21,31);local e=((-1)^t(e,32));if(n==0)then if(l==b)then return e*0;else n=1;o=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return r.FHuSOvTl(e,n-1023)*(o+(l/(2^52)));end;local m=n;local function p(n)local t;if(not n)then n=m();if(n==0)then return'';end;end;t=r.afLIBrbB(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#t do e=e..r.afLIBrbB(t,n,n)end return e;end;local b=#r.ElBmbpBF(u('9.8'))~=1 local e=n;local function le(...)return{...},r.SxPDBUcy('#',...)end local function ee()local s={};local e={};local f={};local u={s,f,nil,e};local e=n()local c={}for l=1,e do local t=h();local n;if(t==2)then n=(h()~=#{});elseif(t==0)then local e=z();if b and r.goWijcks(r.ElBmbpBF(e),'.(8+)$')then e=r.QvMPzSnx(e);end n=e;elseif(t==3)then n=p();end;c[l]=n;end;for e=1,n()do f[e-(#{1})]=ee();end;u[3]=h();for u=1,n()do local e=h();if(t(e,1,1)==0)then local f=t(e,2,3);local r=t(e,4,6);local e={d(),d(),nil,nil};if(f==0)then e[l]=d();e[a]=d();elseif(f==#{1})then e[l]=n();elseif(f==k[2])then e[l]=n()-(2^16)elseif(f==k[3])then e[l]=n()-(2^16)e[a]=d();end;if(t(r,1,1)==1)then e[o]=c[e[o]]end if(t(r,2,2)==1)then e[l]=c[e[l]]end if(t(r,3,3)==1)then e[a]=c[e[a]]end s[u]=e;end end;return u;end;local function j(t,e,n)local l=e;local l=n;return u(r.goWijcks(r.goWijcks(({r.Id_fZJTY(t)})[2],e),n))end local function b(z,s,h)local function te(...)local d,m,k,ne,ee,n,j,y,p,g,u,t;local e=0;while-1<e do if 3>e then if 1<=e then if e~=-3 then repeat if 1<e then n=-41;j=-1;break;end;k=f(6,1,3,63,z);ee=le ne=0;until true;else n=-41;j=-1;end else d=f(6,4,1,33,z);m=f(6,40,2,45,z);end else if 5>e then if e~=0 then repeat if e~=3 then g=r.SxPDBUcy('#',...)-1;u={};break;end;y={};p={...};until true;else y={};p={...};end else if 5<e then e=-2;else t=f(7);end end end e=e+1;end;for e=0,g do if(e>=k)then y[e-k]=p[e+1];else t[e]=p[e+1];end;end;local e=g-k+1 local e;local f;local function k(...)while true do end end while true do if n<-40 then n=n+42 end e=d[n];f=e[_];if f>=20 then if 30>f then if 24>=f then if f<22 then if 16<=f then for n=28,97 do if 21~=f then local n=e[o]t[n]=t[n](c(t,n+1,e[l]))break;end;t[e[o]]=t[e[l]][e[a]];break;end;else local n=e[o]t[n]=t[n](c(t,n+1,e[l]))end else if f>22 then if f<24 then t(e[o],e[l]);else local k=m[e[l]];local c;local f={};c=r.djUWjAIx({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=f[e]e[1][e[2]]=n;end;});for o=1,e[a]do n=n+1;local e=d[n];if e[_]==27 then f[o-1]={t,e[l]};else f[o-1]={s,e[l]};end;u[#u+1]=f;end;t[e[o]]=b(k,c,h);end else t[e[o]]=s[e[l]];end end else if 27<=f then if 27<f then if 28==f then local f,d,c,r,a;local n=0;while n>-1 do if n<=2 then if 1>n then f=e;else if-3~=n then for e=23,52 do if n>1 then c=l;break;end;d=o;break;end;else d=o;end end else if n>=5 then if n<6 then t(a,r);else n=-2;end else if n>-1 then repeat if 3~=n then a=f[d];break;end;r=f[c];until true;else a=f[d];end end end n=n+1 end else local f,r;for h=0,4 do if 2>h then if h>-4 then for c=11,58 do if h<1 then t[e[o]]=s[e[l]];n=n+1;e=d[n];break;end;f=e[o];r=t[e[l]];t[f+1]=r;t[f]=r[e[a]];n=n+1;e=d[n];break;end;else f=e[o];r=t[e[l]];t[f+1]=r;t[f]=r[e[a]];n=n+1;e=d[n];end else if h>=3 then if 1<=h then for a=39,94 do if 3~=h then if t[e[o]]then n=n+1;else n=e[l];end;break;end;f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;else if t[e[o]]then n=n+1;else n=e[l];end;end else t[e[o]]=t[e[l]];n=n+1;e=d[n];end end end end else local d,a,h,c,r,f;local n=0;while n>-1 do if n<=3 then if 1<n then if 2==n then h=l;else c=t;end else if 0==n then d=e;else a=o;end end else if n<=5 then if 0<=n then repeat if 5~=n then r=c[d[h]];break;end;f=d[a];until true;else f=d[a];end else if 6~=n then n=-2;else t[f]=r;end end end n=n+1 end end else if 23<f then repeat if 25<f then local n=e[o]t[n](c(t,n+1,e[l]))break;end;t[e[o]]=s[e[l]];until true;else local n=e[o]t[n](c(t,n+1,e[l]))end end end else if 35<=f then if 37>=f then if 36<=f then if 36==f then n=e[l];else t[e[o]]=h[e[l]];end else t[e[o]]=t[e[l]][e[a]];end else if f>=39 then if f>=37 then for r=17,98 do if f<40 then local f,h;for r=0,6 do if 3<=r then if 5>r then if 0<r then repeat if 3~=r then f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t[e[o]]=(e[l]~=0);n=n+1;e=d[n];until true;else f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];end else if r~=4 then repeat if r>5 then f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];break;end;t[e[o]]=s[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=s[e[l]];n=n+1;e=d[n];end end else if 1<=r then if-3<=r then repeat if 1~=r then t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];break;end;t[e[o]]=t[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];end else f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];n=n+1;e=d[n];end end end break;end;t[e[o]]=h[e[l]];break;end;else local f,h;for r=0,6 do if 3<=r then if 5>r then if 0<r then repeat if 3~=r then f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t[e[o]]=(e[l]~=0);n=n+1;e=d[n];until true;else f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];end else if r~=4 then repeat if r>5 then f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];break;end;t[e[o]]=s[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=s[e[l]];n=n+1;e=d[n];end end else if 1<=r then if-3<=r then repeat if 1~=r then t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];break;end;t[e[o]]=t[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];end else f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];n=n+1;e=d[n];end end end end else if t[e[o]]then n=n+1;else n=e[l];end;end end else if 32<=f then if f>=33 then if f==34 then do return end;else local l=e[l];local n=t[l]for e=l+1,e[a]do n=n..t[e];end;t[e[o]]=n;end else local n=e[o]t[n](c(t,n+1,e[l]))end else if 28~=f then repeat if f~=30 then local k=m[e[l]];local c;local f={};c=r.djUWjAIx({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=f[e]e[1][e[2]]=n;end;});for o=1,e[a]do n=n+1;local e=d[n];if e[_]==27 then f[o-1]={t,e[l]};else f[o-1]={s,e[l]};end;u[#u+1]=f;end;t[e[o]]=b(k,c,h);break;end;t[e[o]]=(e[l]~=0);until true;else local k=m[e[l]];local c;local f={};c=r.djUWjAIx({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=f[e]e[1][e[2]]=n;end;});for o=1,e[a]do n=n+1;local e=d[n];if e[_]==27 then f[o-1]={t,e[l]};else f[o-1]={s,e[l]};end;u[#u+1]=f;end;t[e[o]]=b(k,c,h);end end end end else if f<=9 then if f>4 then if f>=7 then if 7>=f then if t[e[o]]then n=n+1;else n=e[l];end;else if 8<f then local f,h;for r=0,6 do if 3>r then if 0<r then if 0<=r then repeat if 1~=r then f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];n=n+1;e=d[n];break;end;f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];until true;else f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];end else t(e[o],e[l]);n=n+1;e=d[n];end else if r<5 then if-1<=r then for a=12,54 do if r<4 then t(e[o],e[l]);n=n+1;e=d[n];break;end;f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else if r==5 then t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];else f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];end end end end else local a;for f=0,4 do if f<2 then if f>-3 then for a=47,67 do if f>0 then t[e[o]]=t[e[l]];n=n+1;e=d[n];break;end;t[e[o]]=t[e[l]];n=n+1;e=d[n];break;end;else t[e[o]]=t[e[l]];n=n+1;e=d[n];end else if 2<f then if f>=0 then for r=17,78 do if 3~=f then n=e[l];break;end;a=e[o]t[a](c(t,a+1,e[l]))n=n+1;e=d[n];break;end;else n=e[l];end else t[e[o]]=(e[l]~=0);n=n+1;e=d[n];end end end end end else if f~=3 then repeat if f<6 then t[e[o]]=(e[l]~=0);break;end;local e=e[o]t[e](t[e+1])until true;else local e=e[o]t[e](t[e+1])end end else if 2<=f then if 3>f then local l=e[l];local n=t[l]for e=l+1,e[a]do n=n..t[e];end;t[e[o]]=n;else if 2<f then for d=28,64 do if 4>f then n=e[l];break;end;h[e[l]]=t[e[o]];break;end;else n=e[l];end end else if-3~=f then repeat if f>0 then local n=e[o];local l=t[e[l]];t[n+1]=l;t[n]=l[e[a]];break;end;local o=e[o];local n=t[e[l]];t[o+1]=n;t[o]=n[e[a]];until true;else local n=e[o];local l=t[e[l]];t[n+1]=l;t[n]=l[e[a]];end end end else if 14<f then if f>16 then if 17<f then if f~=16 then repeat if 19~=f then local f,s;for r=0,6 do if r>2 then if 4<r then if 4<r then for a=19,94 do if 5~=r then f=e[o]t[f]=t[f](c(t,f+1,e[l]))break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else if 0<r then repeat if r<4 then t[e[o]]=h[e[l]];n=n+1;e=d[n];break;end;f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];until true;else t[e[o]]=h[e[l]];n=n+1;e=d[n];end end else if r>=1 then if r~=-2 then for a=43,70 do if r~=1 then f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];end end end break;end;local n=e[o]t[n]=t[n](c(t,n+1,e[l]))until true;else local f,s;for r=0,6 do if r>2 then if 4<r then if 4<r then for a=19,94 do if 5~=r then f=e[o]t[f]=t[f](c(t,f+1,e[l]))break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else if 0<r then repeat if r<4 then t[e[o]]=h[e[l]];n=n+1;e=d[n];break;end;f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];until true;else t[e[o]]=h[e[l]];n=n+1;e=d[n];end end else if r>=1 then if r~=-2 then for a=43,70 do if r~=1 then f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];end end end end else local e=e[o]t[e](t[e+1])end else if 12~=f then for r=28,96 do if f~=15 then local f;f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];do return end;break;end;for f=0,3 do if f>=2 then if f>=0 then repeat if 3~=f then t[e[o]]=h[e[l]];n=n+1;e=d[n];break;end;if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;until true;else if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;end else if f>-1 then repeat if f<1 then t[e[o]]=(e[l]~=0);n=n+1;e=d[n];break;end;h[e[l]]=t[e[o]];n=n+1;e=d[n];until true;else h[e[l]]=t[e[o]];n=n+1;e=d[n];end end end break;end;else local f;f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];do return end;end end else if f>=12 then if f>=13 then if f~=11 then repeat if f>13 then do return end;break;end;local d,a,r,c,h,f;local n=0;while n>-1 do if 4<=n then if n<6 then if 0<=n then repeat if n~=4 then f=d[a];break;end;h=c[d[r]];until true;else f=d[a];end else if n~=6 then n=-2;else t[f]=h;end end else if n<2 then if 1~=n then d=e;else a=o;end else if n==3 then c=t;else r=l;end end end n=n+1 end until true;else local d,f,r,c,h,a;local n=0;while n>-1 do if 4<=n then if n<6 then if 0<=n then repeat if n~=4 then a=d[f];break;end;h=c[d[r]];until true;else a=d[f];end else if n~=6 then n=-2;else t[a]=h;end end else if n<2 then if 1~=n then d=e;else f=o;end else if n==3 then c=t;else r=l;end end end n=n+1 end end else h[e[l]]=t[e[o]];end else if 11>f then if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;else if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;end end end end end n=1+n;end;end;return te end;local l=0xff;local r={};local f=(1);local o='';(function(n)local t=n local d=0x00 local e=0x00 t={(function(a)if d>0x24 then return a end d=d+1 e=(e+0x7f1-a)%0x4c return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x49);end return true end)'wLOJk'and t[0x1](0x19e+a))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xa0);o={o..'8 a',o};r[f]=ee();f=f+(1);o[1]='8'..o[1];l[2]=0xff;end return true end)'KGCFe'and t[0x2](a+0x230))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x5b);end return true end)'woVTT'and t[0x3](a+0x27b))or a end),(function(a)if d>0x30 then return a end d=d+1 e=(e+0xb3b-a)%0x30 return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x3a);end return true end)'qGpaT'and t[0x1](0x296+a))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd7);l[2]=(l[2]*(j(function()r()end,c(o))-j(l[1],c(o))))+1;r[f]={};l=l[2];f=f+l;end return true end)'HfV_o'and t[0x3](a+0x105))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xdf);end return true end)'uqLiY'and t[0x2](a+0x15c))or a end),(function(a)if d>0x25 then return a end d=d+1 e=(e+0x121a-a)%0x44 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xa1);o='';l={function()l()end};o=o..'@#';end return true end)'rbzFs'and t[0x1](0x263+a))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xad);r[f]=te();f=f+l;end return true end)'avGke'and t[0x2](a+0x291))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x3c);end return true end)'iSlIT'and t[0x3](a+0x1b4))or a end)}t[0x3](0xb19)end){};local e=b(c(r));return e(...);end return ne((function()local n={}local e=0x01;local t;if r.yzoktveS then t=r.yzoktveS(ne)else t=''end if r.goWijcks(t,r.dkmGAfAK)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,t,o,l,d)local d;if 4>e then if e<=1 then if-3<e then for d=42,81 do if e~=1 then do return n(1),n(4,l,o,t,n),n(5,l,o,t)end;break;end;do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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~=0 then repeat if 2~=e then do return n(1),n(4,l,o,t,n),n(5,l,o,t)end;break;end;do return 16777216,65536,256 end;until true;else do return 16777216,65536,256 end;end end else if e>=6 then if e>6 then if e~=7 then do return t(e,nil,t);end else do return setmetatable({},{['__\99\9788']=function(e,t,l,o,n)if n then return e[n]elseif o then return e else e[t]=l end end})end end else do return l[t]end;end else if 3<=e then repeat if e<5 then local e=o;local d,l,o=l(2);do return function()local f,a,t,n=n(t,e(e,e),e(e,e)+3);e(4);return(n*d)+(t*l)+(a*o)+f;end;end;break;end;local e=o;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;until true;else local e=o;local o,l,d=l(2);do return function()local t,n,a,f=n(t,e(e,e),e(e,e)+3);e(4);return(f*o)+(a*l)+(n*d)+t;end;end;end end end end),...)
Did this file decode correctly?
Original Code
([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _LFgbLHKVzVhV = a; end)); return(function(f,...)local a;local l;local u;local o;local d;local r;local e=24915;local n=0;local t={};while n<731 do n=n+1;while n<0x1f4 and e%0x39bc<0x1cde do n=n+1 e=(e*678)%15825 local c=n+e if(e%0x1dae)<0xed7 then e=(e*0x2d0)%0x784f while n<0x312 and e%0x341e<0x1a0f do n=n+1 e=(e-22)%27695 local o=n+e if(e%0xe04)>=0x702 then e=(e+0x2d3)%0x203c local e=40003 if not t[e]then t[e]=0x1 r={};end elseif e%2~=0 then e=(e+0x23)%0x4122 local e=10356 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end else e=(e*0x53)%0x585d n=n+1 local e=39792 if not t[e]then t[e]=0x1 d=string;end end end elseif e%2~=0 then e=(e*0x2e8)%0x96d1 while n<0x130 and e%0x25e4<0x12f2 do n=n+1 e=(e+784)%35516 local a=n+e if(e%0x3bfe)<=0x1dff then e=(e*0xf9)%0x6e62 local e=85182 if not t[e]then t[e]=0x1 end elseif e%2~=0 then e=(e*0x1f1)%0xac16 local e=3333 if not t[e]then t[e]=0x1 o=function(o)local e=0x01 local function t(n)e=e+n return o:sub(e-n,e-0x01)end while true do local n=t(0x01)if(n=="\5")then break end local e=d.byte(t(0x01))local e=t(e)if n=="\2"then e=r.xacmuEGs(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then l[e]=function(n,e)return f(8,nil,f,e,n)end elseif n=="\4"then e=l[e]elseif n=="\0"then e=l[e][t(d.byte(t(0x01)))];end local n=t(0x08)r[n]=e end end end else e=(e+0x2ce)%0x68be n=n+1 local e=71985 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end end end else e=(e-0x26e)%0x20b1 n=n+1 while n<0x216 and e%0xc94<0x64a do n=n+1 e=(e-920)%43075 local l=n+e if(e%0x123e)<0x91f then e=(e*0x3ea)%0x8b8f local e=84834 if not t[e]then t[e]=0x1 end elseif e%2~=0 then e=(e*0xdc)%0x5d99 local e=97121 if not t[e]then t[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\120\97\99\109\117\69\71\115\0\6\115\116\114\105\110\103\4\99\104\97\114\103\122\87\112\116\87\119\114\0\6\115\116\114\105\110\103\3\115\117\98\97\102\76\73\66\114\98\66\0\6\115\116\114\105\110\103\4\98\121\116\101\95\117\112\70\83\120\82\121\0\5\116\97\98\108\101\6\99\111\110\99\97\116\69\72\107\112\122\79\76\99\0\5\116\97\98\108\101\6\105\110\115\101\114\116\80\73\98\113\72\108\90\85\5";end else e=(e+0x39d)%0x357b n=n+1 local e=20382 if not t[e]then t[e]=0x1 u=tonumber;end end end end end e=(e*418)%33188 end o(a);local n={};for e=0x0,0xff do local t=r.gzWptWwr(e);n[e]=t;n[t]=e;end local function c(e)return n[e];end local h=(function(a,o)local f,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local d=a while true do n[0x03][r.afLIBrbB(o,e,(function()e=f+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#o while e<l+0x01 do n[0x02][t]=r.afLIBrbB(o,e,(function()e=f+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 r.PIbqHlZU(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 r.EHkpzOLc(n[0x01])end);o(h(43,"s=!PzgTrw,Up0x.(xU"));o(h(150,"La2?7qefAJ,sd4mHe,4,saadA7mqq7sfsmAA_?eq427qsW-HfqmAq7,46q23Ase(s42qJ,/77s4t?q,e+7qm427aq?daJeh2e?4272Jdz4fJs42as5HqeJAAHAdH?,,2*?f24q44,H_4A,m?q2ss24fHHseedJ?s,4,7a2mq7?dIam2qHeqAd?7c,2m27mmq24J?27edmmH}e2??AH)Aesd47eJ4a,fa4dqws?adAdma74d,1sf4ae0dfJ?2,sa?AmH?eEAs?afqmd7A4A2JfHaHaeAQq4sa2?JA4feAs772JdmaeHmamO7JmsJq4e?4s4?m,?Sme7fr4ms7aJAfH2q,ss2,A44qee,e?sJ,a27msdmR7H2AfHm,qmdadd,q)Af7dH?s,4aqqHHeq,d4a4A2mJ3Ued7q,Aa7eH4s74daksA4Hsedda?4fe,O=smQ7d,4adAd427esd?2faKmq4m24e72aJfqme7Jsa2dfqN77e,7YdAJ&aAaf2mBs?aaAmmdH?sm2mJs_qf2ss7,AsHAAddHq7dAsH"));local e=(-24437+(function()local o,e=0,1;(function(l,e,t,n)e(n(t and t,e,e,e),n(l,t,t,t),e(e,n,e,n),l(n,l,l,t and n))end)(function(d,n,t,l)if o>311 then return l end o=o+1 e=(e-835)%42379 if(e%1090)<=545 then e=(e+967)%26031 return n else return t(d(t,n,n,l),t(t and t,n,d,d),t(d,l,n,n),t(t,n and n,l and n,l))end return d(l(n,n,n and l,n and n),l(t,n,n,d)and t(t,n,t,l),l(d,d,t,t),t(l,l,n,t))end,function(d,t,l,n)if o>495 then return t end o=o+1 e=(e-798)%3470 if(e%1522)<761 then e=(e*18)%34631 return n else return t(n(d,l,t,l and t),t(d,n,t,t),l(l,l,d,d and n),d(l,t,n,t)and l(t,d,t,d))end return d(n(n,n,l,t),d(n,l,n and n,t),l(d,d,n,n and n),t(d and l,l and t,n,n))end,function(n,d,t,l)if o>213 then return n end o=o+1 e=(e+756)%45902 if(e%1236)<=618 then e=(e+455)%404 return n else return t(n(d,d,l,l),d(t and l,t,d,t),n(n and d,l,n and l,n),n(d,d,t,n))end return n(l(t,t,l,l),t(d,t,n and n,l),l(n,d and d,n,t),t(l,t,t,l))end,function(n,t,l,d)if o>487 then return t end o=o+1 e=(e+270)%696 if(e%1566)>=783 then return t(n(l,l,d,t),n(n,l,t,l),t(t and n,l,n,t and l),d(d,d,n,n))else return d end return n end)return e;end)())local c=r.uUmqxcuD or r.iIvpy_ZW;local te=(getfenv)or(function()return _ENV end);local _=1;local l=3;local a=4;local o=2;local function ne(k,...)local s=h(e,"/kpSt*20&?Fboemc*Z&&ook%*0?ceopN2tc&*&?kmeke2mbS&0e?+o*{?tp2&betLetm?*eSk*2oF*mcSpteopc*tp&o*cFemtp&2o_ctz0mmSpp*+?^e0p2&mFmAtS2p00pFocAStbcpk0t?0meSm&2becbtkpS0kF&moSnoSp2tcF*c2Sm0kope?tm&komk&mbSR0:btc&FSmkSk2etc?oetk&*oc0t*?kmVc22SFFbcp&2ebtcReSpE*&?om{0pe0ps*??Fck}o2oF*EkSk&p*0bceop(2tco*t??m0e&2pF?cDpepoo0c*tbSoexk2*0FZe*k02oFkmtmt0cb*3tSoS&F?9c*S?2bck**0*&epcSn0*?&oeZktFFqk*V?qekic*kF&eep(*Sb&c0Sm0kbbceecp02tF&mo0SmSp22FF*m0SoTc2??te&koFekS*0?FoSk?*b?beSS&0Fb*cmSb&bFt,?t&&oekkmS*FocqSpV*t&&oe k?*&?omUp00pFoczStbmp*0pF?obS&0?b?r2*_pS2&F&moSKmbk?2mFm&0ooUo*y?tp20eoe4?mbSF0rbtc&&pm?Sp2o?pc?t2&beMmSto?ke&ktc0te0ooZ;t?FckSS0eo&u*t*?peooo*mFSmoeo22bSceSF0t&mb&eopq2tF&mmt?0tb&cot{Fko&lm* ?te&ko29otcbpo0pbtcFSo&totR&*&?ge&k&*eFPmtp&2ob*ctSF0oot!ttF&oe2k?*&?mm,S02&FecrSt0&oZpttt&&oopS*t??eop.0FF&mcSO0*b&cotuFtmcXo*S?tebko2kFtm&Sm0Kb?c&Sm&_ota&2oF!etkm*oF{mtpb2ob=coS&&SoKf*t&&oe6kt06?omSpt2cFockSt0&o?{Yt0&&oek *t?&cop&2tFbmoSS0tb?cot,&oo&kk*C?te&ko2 Ftcrpo02btc?So&Oot1&*c?aebk&*oFGmtp&2obcctSb0oo0Ttt?&oetk&*&?om-So2&FecMt2?eboEStt&FookO*tFFc&p!2&F&ckSQ0tb&cote&toe1o*k?te&ko29o*m&SD0:b&c&tk& otk?to?SetkF*oFkmtp&0FbEctS&0eoZ tt&&omokt*&?omzSS2&FochS*0&boss*2&mookv*tFteop.2tbF.4SJ0tb&cct)&to&Sp*m?te&ko22Ftm?po0?btco2L&%ots&*p?re*k&2Uotmtp&2ob0ctS?0ooYkpt&&oeOk**&?om{S2&eFoc5St0mbo8{ttF&emkA*t?&eopx2&F&cmSt0tbFcotF&to&Wo*8FSe&ko2rF2m&pm0fo2,bSo&kotUmto?>etS&*cFUm*p&2ebDc&S&&mopzttb&oekkt*&?omVp&2&FecBS00&bm<i2t&?ookp*t?&eop02tbFc*SM0&b&cmt:&to&Co*p?teFko2tFtmFpo?Pb2c&Sc&)otr&*S?Am2kb*oF*mtS:2ob:ctS&?So7-0t&?keCk2*&boctpt2oFocpSt0eboprtm&&eIk9*&?&m0pv2FoKmoS20tb&cotk&toF9o*_Fce&ko2#F*m&po0>btkSSo&lotibto?Betk&2oF;m&p&0pbGc*S&0oeeXtt&&oekkt*&?o");local n=0;r.Id_fZJTY(function()r.IpRvfAem()n=n+1 end)local function e(e,t)if t then return n end;n=e+n;end local t,n,h=f(0,f,e,s,r._upFSxRy);local function d()local n,t=r._upFSxRy(s,e(1,3),e(5,6)+2);e(2);return(t*256)+n;end;local b=true;local b=0 local function z()local l=n();local e=n();local o=1;local l=(t(e,1,20)*(2^32))+l;local n=t(e,21,31);local e=((-1)^t(e,32));if(n==0)then if(l==b)then return e*0;else n=1;o=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return r.FHuSOvTl(e,n-1023)*(o+(l/(2^52)));end;local m=n;local function p(n)local t;if(not n)then n=m();if(n==0)then return'';end;end;t=r.afLIBrbB(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#t do e=e..r.afLIBrbB(t,n,n)end return e;end;local b=#r.ElBmbpBF(u('\49.\48'))~=1 local e=n;local function le(...)return{...},r.SxPDBUcy('#',...)end local function ee()local s={};local e={};local f={};local u={s,f,nil,e};local e=n()local c={}for l=1,e do local t=h();local n;if(t==2)then n=(h()~=#{});elseif(t==0)then local e=z();if b and r.goWijcks(r.ElBmbpBF(e),'.(\48+)$')then e=r.QvMPzSnx(e);end n=e;elseif(t==3)then n=p();end;c[l]=n;end;for e=1,n()do f[e-(#{1})]=ee();end;u[3]=h();for u=1,n()do local e=h();if(t(e,1,1)==0)then local f=t(e,2,3);local r=t(e,4,6);local e={d(),d(),nil,nil};if(f==0)then e[l]=d();e[a]=d();elseif(f==#{1})then e[l]=n();elseif(f==k[2])then e[l]=n()-(2^16)elseif(f==k[3])then e[l]=n()-(2^16)e[a]=d();end;if(t(r,1,1)==1)then e[o]=c[e[o]]end if(t(r,2,2)==1)then e[l]=c[e[l]]end if(t(r,3,3)==1)then e[a]=c[e[a]]end s[u]=e;end end;return u;end;local function j(t,e,n)local l=e;local l=n;return u(r.goWijcks(r.goWijcks(({r.Id_fZJTY(t)})[2],e),n))end local function b(z,s,h)local function te(...)local d,m,k,ne,ee,n,j,y,p,g,u,t;local e=0;while-1<e do if 3>e then if 1<=e then if e~=-3 then repeat if 1<e then n=-41;j=-1;break;end;k=f(6,1,3,63,z);ee=le ne=0;until true;else n=-41;j=-1;end else d=f(6,4,1,33,z);m=f(6,40,2,45,z);end else if 5>e then if e~=0 then repeat if e~=3 then g=r.SxPDBUcy('#',...)-1;u={};break;end;y={};p={...};until true;else y={};p={...};end else if 5<e then e=-2;else t=f(7);end end end e=e+1;end;for e=0,g do if(e>=k)then y[e-k]=p[e+1];else t[e]=p[e+1];end;end;local e=g-k+1 local e;local f;local function k(...)while true do end end while true do if n<-40 then n=n+42 end e=d[n];f=e[_];if f>=20 then if 30>f then if 24>=f then if f<22 then if 16<=f then for n=28,97 do if 21~=f then local n=e[o]t[n]=t[n](c(t,n+1,e[l]))break;end;t[e[o]]=t[e[l]][e[a]];break;end;else local n=e[o]t[n]=t[n](c(t,n+1,e[l]))end else if f>22 then if f<24 then t(e[o],e[l]);else local k=m[e[l]];local c;local f={};c=r.djUWjAIx({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=f[e]e[1][e[2]]=n;end;});for o=1,e[a]do n=n+1;local e=d[n];if e[_]==27 then f[o-1]={t,e[l]};else f[o-1]={s,e[l]};end;u[#u+1]=f;end;t[e[o]]=b(k,c,h);end else t[e[o]]=s[e[l]];end end else if 27<=f then if 27<f then if 28==f then local f,d,c,r,a;local n=0;while n>-1 do if n<=2 then if 1>n then f=e;else if-3~=n then for e=23,52 do if n>1 then c=l;break;end;d=o;break;end;else d=o;end end else if n>=5 then if n<6 then t(a,r);else n=-2;end else if n>-1 then repeat if 3~=n then a=f[d];break;end;r=f[c];until true;else a=f[d];end end end n=n+1 end else local f,r;for h=0,4 do if 2>h then if h>-4 then for c=11,58 do if h<1 then t[e[o]]=s[e[l]];n=n+1;e=d[n];break;end;f=e[o];r=t[e[l]];t[f+1]=r;t[f]=r[e[a]];n=n+1;e=d[n];break;end;else f=e[o];r=t[e[l]];t[f+1]=r;t[f]=r[e[a]];n=n+1;e=d[n];end else if h>=3 then if 1<=h then for a=39,94 do if 3~=h then if t[e[o]]then n=n+1;else n=e[l];end;break;end;f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;else if t[e[o]]then n=n+1;else n=e[l];end;end else t[e[o]]=t[e[l]];n=n+1;e=d[n];end end end end else local d,a,h,c,r,f;local n=0;while n>-1 do if n<=3 then if 1<n then if 2==n then h=l;else c=t;end else if 0==n then d=e;else a=o;end end else if n<=5 then if 0<=n then repeat if 5~=n then r=c[d[h]];break;end;f=d[a];until true;else f=d[a];end else if 6~=n then n=-2;else t[f]=r;end end end n=n+1 end end else if 23<f then repeat if 25<f then local n=e[o]t[n](c(t,n+1,e[l]))break;end;t[e[o]]=s[e[l]];until true;else local n=e[o]t[n](c(t,n+1,e[l]))end end end else if 35<=f then if 37>=f then if 36<=f then if 36==f then n=e[l];else t[e[o]]=h[e[l]];end else t[e[o]]=t[e[l]][e[a]];end else if f>=39 then if f>=37 then for r=17,98 do if f<40 then local f,h;for r=0,6 do if 3<=r then if 5>r then if 0<r then repeat if 3~=r then f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t[e[o]]=(e[l]~=0);n=n+1;e=d[n];until true;else f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];end else if r~=4 then repeat if r>5 then f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];break;end;t[e[o]]=s[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=s[e[l]];n=n+1;e=d[n];end end else if 1<=r then if-3<=r then repeat if 1~=r then t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];break;end;t[e[o]]=t[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];end else f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];n=n+1;e=d[n];end end end break;end;t[e[o]]=h[e[l]];break;end;else local f,h;for r=0,6 do if 3<=r then if 5>r then if 0<r then repeat if 3~=r then f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t[e[o]]=(e[l]~=0);n=n+1;e=d[n];until true;else f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];end else if r~=4 then repeat if r>5 then f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];break;end;t[e[o]]=s[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=s[e[l]];n=n+1;e=d[n];end end else if 1<=r then if-3<=r then repeat if 1~=r then t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];break;end;t[e[o]]=t[e[l]];n=n+1;e=d[n];until true;else t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];end else f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];n=n+1;e=d[n];end end end end else if t[e[o]]then n=n+1;else n=e[l];end;end end else if 32<=f then if f>=33 then if f==34 then do return end;else local l=e[l];local n=t[l]for e=l+1,e[a]do n=n..t[e];end;t[e[o]]=n;end else local n=e[o]t[n](c(t,n+1,e[l]))end else if 28~=f then repeat if f~=30 then local k=m[e[l]];local c;local f={};c=r.djUWjAIx({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=f[e]e[1][e[2]]=n;end;});for o=1,e[a]do n=n+1;local e=d[n];if e[_]==27 then f[o-1]={t,e[l]};else f[o-1]={s,e[l]};end;u[#u+1]=f;end;t[e[o]]=b(k,c,h);break;end;t[e[o]]=(e[l]~=0);until true;else local k=m[e[l]];local c;local f={};c=r.djUWjAIx({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=f[e]e[1][e[2]]=n;end;});for o=1,e[a]do n=n+1;local e=d[n];if e[_]==27 then f[o-1]={t,e[l]};else f[o-1]={s,e[l]};end;u[#u+1]=f;end;t[e[o]]=b(k,c,h);end end end end else if f<=9 then if f>4 then if f>=7 then if 7>=f then if t[e[o]]then n=n+1;else n=e[l];end;else if 8<f then local f,h;for r=0,6 do if 3>r then if 0<r then if 0<=r then repeat if 1~=r then f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];n=n+1;e=d[n];break;end;f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];until true;else f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];end else t(e[o],e[l]);n=n+1;e=d[n];end else if r<5 then if-1<=r then for a=12,54 do if r<4 then t(e[o],e[l]);n=n+1;e=d[n];break;end;f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else if r==5 then t[e[o]]=t[e[l]][e[a]];n=n+1;e=d[n];else f=e[o];h=t[e[l]];t[f+1]=h;t[f]=h[e[a]];end end end end else local a;for f=0,4 do if f<2 then if f>-3 then for a=47,67 do if f>0 then t[e[o]]=t[e[l]];n=n+1;e=d[n];break;end;t[e[o]]=t[e[l]];n=n+1;e=d[n];break;end;else t[e[o]]=t[e[l]];n=n+1;e=d[n];end else if 2<f then if f>=0 then for r=17,78 do if 3~=f then n=e[l];break;end;a=e[o]t[a](c(t,a+1,e[l]))n=n+1;e=d[n];break;end;else n=e[l];end else t[e[o]]=(e[l]~=0);n=n+1;e=d[n];end end end end end else if f~=3 then repeat if f<6 then t[e[o]]=(e[l]~=0);break;end;local e=e[o]t[e](t[e+1])until true;else local e=e[o]t[e](t[e+1])end end else if 2<=f then if 3>f then local l=e[l];local n=t[l]for e=l+1,e[a]do n=n..t[e];end;t[e[o]]=n;else if 2<f then for d=28,64 do if 4>f then n=e[l];break;end;h[e[l]]=t[e[o]];break;end;else n=e[l];end end else if-3~=f then repeat if f>0 then local n=e[o];local l=t[e[l]];t[n+1]=l;t[n]=l[e[a]];break;end;local o=e[o];local n=t[e[l]];t[o+1]=n;t[o]=n[e[a]];until true;else local n=e[o];local l=t[e[l]];t[n+1]=l;t[n]=l[e[a]];end end end else if 14<f then if f>16 then if 17<f then if f~=16 then repeat if 19~=f then local f,s;for r=0,6 do if r>2 then if 4<r then if 4<r then for a=19,94 do if 5~=r then f=e[o]t[f]=t[f](c(t,f+1,e[l]))break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else if 0<r then repeat if r<4 then t[e[o]]=h[e[l]];n=n+1;e=d[n];break;end;f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];until true;else t[e[o]]=h[e[l]];n=n+1;e=d[n];end end else if r>=1 then if r~=-2 then for a=43,70 do if r~=1 then f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];end end end break;end;local n=e[o]t[n]=t[n](c(t,n+1,e[l]))until true;else local f,s;for r=0,6 do if r>2 then if 4<r then if 4<r then for a=19,94 do if 5~=r then f=e[o]t[f]=t[f](c(t,f+1,e[l]))break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else if 0<r then repeat if r<4 then t[e[o]]=h[e[l]];n=n+1;e=d[n];break;end;f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];until true;else t[e[o]]=h[e[l]];n=n+1;e=d[n];end end else if r>=1 then if r~=-2 then for a=43,70 do if r~=1 then f=e[o]t[f]=t[f](c(t,f+1,e[l]))n=n+1;e=d[n];break;end;t(e[o],e[l]);n=n+1;e=d[n];break;end;else t(e[o],e[l]);n=n+1;e=d[n];end else f=e[o];s=t[e[l]];t[f+1]=s;t[f]=s[e[a]];n=n+1;e=d[n];end end end end else local e=e[o]t[e](t[e+1])end else if 12~=f then for r=28,96 do if f~=15 then local f;f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];do return end;break;end;for f=0,3 do if f>=2 then if f>=0 then repeat if 3~=f then t[e[o]]=h[e[l]];n=n+1;e=d[n];break;end;if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;until true;else if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;end else if f>-1 then repeat if f<1 then t[e[o]]=(e[l]~=0);n=n+1;e=d[n];break;end;h[e[l]]=t[e[o]];n=n+1;e=d[n];until true;else h[e[l]]=t[e[o]];n=n+1;e=d[n];end end end break;end;else local f;f=e[o]t[f](c(t,f+1,e[l]))n=n+1;e=d[n];do return end;end end else if f>=12 then if f>=13 then if f~=11 then repeat if f>13 then do return end;break;end;local d,a,r,c,h,f;local n=0;while n>-1 do if 4<=n then if n<6 then if 0<=n then repeat if n~=4 then f=d[a];break;end;h=c[d[r]];until true;else f=d[a];end else if n~=6 then n=-2;else t[f]=h;end end else if n<2 then if 1~=n then d=e;else a=o;end else if n==3 then c=t;else r=l;end end end n=n+1 end until true;else local d,f,r,c,h,a;local n=0;while n>-1 do if 4<=n then if n<6 then if 0<=n then repeat if n~=4 then a=d[f];break;end;h=c[d[r]];until true;else a=d[f];end else if n~=6 then n=-2;else t[a]=h;end end else if n<2 then if 1~=n then d=e;else f=o;end else if n==3 then c=t;else r=l;end end end n=n+1 end end else h[e[l]]=t[e[o]];end else if 11>f then if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;else if(t[e[o]]==e[a])then n=n+1;else n=e[l];end;end end end end end n=1+n;end;end;return te end;local l=0xff;local r={};local f=(1);local o='';(function(n)local t=n local d=0x00 local e=0x00 t={(function(a)if d>0x24 then return a end d=d+1 e=(e+0x7f1-a)%0x4c return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x49);end return true end)'wLOJk'and t[0x1](0x19e+a))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xa0);o={o..'\58 a',o};r[f]=ee();f=f+(1);o[1]='\58'..o[1];l[2]=0xff;end return true end)'KGCFe'and t[0x2](a+0x230))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x5b);end return true end)'woVTT'and t[0x3](a+0x27b))or a end),(function(a)if d>0x30 then return a end d=d+1 e=(e+0xb3b-a)%0x30 return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x3a);end return true end)'qGpaT'and t[0x1](0x296+a))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd7);l[2]=(l[2]*(j(function()r()end,c(o))-j(l[1],c(o))))+1;r[f]={};l=l[2];f=f+l;end return true end)'HfV_o'and t[0x3](a+0x105))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xdf);end return true end)'uqLiY'and t[0x2](a+0x15c))or a end),(function(a)if d>0x25 then return a end d=d+1 e=(e+0x121a-a)%0x44 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xa1);o='\37';l={function()l()end};o=o..'\100\43';end return true end)'rbzFs'and t[0x1](0x263+a))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xad);r[f]=te();f=f+l;end return true end)'avGke'and t[0x2](a+0x291))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x3c);end return true end)'iSlIT'and t[0x3](a+0x1b4))or a end)}t[0x3](0xb19)end){};local e=b(c(r));return e(...);end return ne((function()local n={}local e=0x01;local t;if r.yzoktveS then t=r.yzoktveS(ne)else t=''end if r.goWijcks(t,r.dkmGAfAK)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,t,o,l,d)local d;if 4>e then if e<=1 then if-3<e then for d=42,81 do if e~=1 then do return n(1),n(4,l,o,t,n),n(5,l,o,t)end;break;end;do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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~=0 then repeat if 2~=e then do return n(1),n(4,l,o,t,n),n(5,l,o,t)end;break;end;do return 16777216,65536,256 end;until true;else do return 16777216,65536,256 end;end end else if e>=6 then if e>6 then if e~=7 then do return t(e,nil,t);end else do return setmetatable({},{['__\99\97\108\108']=function(e,t,l,o,n)if n then return e[n]elseif o then return e else e[t]=l end end})end end else do return l[t]end;end else if 3<=e then repeat if e<5 then local e=o;local d,l,o=l(2);do return function()local f,a,t,n=n(t,e(e,e),e(e,e)+3);e(4);return(n*d)+(t*l)+(a*o)+f;end;end;break;end;local e=o;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;until true;else local e=o;local o,l,d=l(2);do return function()local t,n,a,f=n(t,e(e,e),e(e,e)+3);e(4);return(f*o)+(a*l)+(n*d)+t;end;end;end end end end),...)
Function Calls
None |
Stats
MD5 | 71e74256d8bc8d9ef6e61bfabd762c22 |
Eval Count | 0 |
Decode Time | 66 ms |