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) _FdJfeCOKYKZG = a; e..

Decoded Output download

<?  ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _FdJfeCOKYKZG = a; end)); return(function(r,...)local c;local h;local f;local o;local t;local d;local e=24915;local n=0;local l={};while n<581 do n=n+1;while n<0x20d and e%0x1dda<0xeed do n=n+1 e=(e-373)%28800 local a=n+e if(e%0x39c6)<0x1ce3 then e=(e*0xb7)%0x8901 while n<0x31a and e%0xc1a<0x60d do n=n+1 e=(e+560)%4935 local a=n+e if(e%0x3fa2)>0x1fd1 then e=(e*0x305)%0xae55 local e=7913 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x2ca)%0x5362 local e=68826 if not l[e]then l[e]=0x1 d=function(l)local e=0x01 local function n(n)e=e+n return l:sub(e-n,e-0x01)end while true do local l=n(0x01)if(l=="")then break end local e=f.byte(n(0x01))local e=n(e)if l==""then e=o.xvCKpiGX(e)elseif l==""then e=e~=""elseif l==""then t[e]=function(n,e)return r(8,nil,r,e,n)end elseif l==""then e=t[e]elseif l==""then e=t[e][n(f.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end else e=(e+0x32b)%0x6f85 n=n+1 local e=48485 if not l[e]then l[e]=0x1 c="\8NIHO9\98ALP	87=JE9\88MNLEHC\99D\97L89B\98BBNLMNLEHCMO\989\999H5@7?MNLEHC\98QNA\90\8297O=	9	9N\97\988A\99IH\99\97N9\85C;\979\83GN\97\988AEHMALN87RP\88BJM";end end end elseif e%2~=0 then e=(e*0x140)%0x4779 while n<0x3cd and e%0x3d0e<0x1e87 do n=n+1 e=(e+890)%42138 local d=n+e if(e%0x3612)>0x1b09 then e=(e*0x333)%0xaff9 local e=34248 if not l[e]then l[e]=0x1 h=tonumber;end elseif e%2~=0 then e=(e-0x173)%0x6115 local e=83403 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e-0x377)%0x3f82 n=n+1 local e=99523 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end else e=(e+0x83)%0x9ab6 n=n+1 while n<0x18e and e%0x25ba<0x12dd do n=n+1 e=(e*991)%387 local t=n+e if(e%0x402e)>0x2017 then e=(e+0x12a)%0xc127 local e=50384 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x329)%0x9aa8 local e=97060 if not l[e]then l[e]=0x1 f=string;end else e=(e-0x1d0)%0x5112 n=n+1 local e=91905 if not l[e]then l[e]=0x1 o={};end end end end end e=(e-102)%18402 end d(c);local n={};for e=0x0,0xff do local l=o.FOfbfftr(e);n[e]=l;n[l]=e;end local function a(e)return n[e];end local c=(function(r,f)local c,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=r while true do n[0x03][o.GcOnAdCM(f,e,(function()e=c+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#f while e<t+0x01 do n[0x02][l]=o.GcOnAdCM(f,e,(function()e=c+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.lCzxXfps(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=r+d;end end return o.mUgIaESk(n[0x01])end);d(c(168,"C_89fI.Fl+bUZP:pIP"));d(c(120,"&3Pcsvf2uC;V^HO#uu3fIVCs3;CCPf;2^^VssH^HvuVCc#^22VHufY#CCvVscHct;Vc3^ss^Huvf^VvCH#2;O#2C;CcvPuVPc3VOs^^ff3H;sC^22vHvuu;nPOPc;^cPV3cOV#OvHvv3O^fc#,2fFOCd3C;sPvCc ^vkH^^HsCOsf_uv2s#s2H3uCuPcVP3;;O3s^#c#Hs#sus2cOHusJvuv3^C3P^;3P;V^cHHCcOH22XH#2sS9fC;sP#KfCHPcV^c#^;3cH2sPOHfH#3227;fv;^csP#;3c3^s3;;fs2HHcC^vvhHc3;;3f33HuvcvV#3c^3s2OP#su_2s#2ucJ^CP33CO3#u3E^V;cC^#s3H2vOuQ9HJs2CpPCs3vcOcvVfspVCscHcfcVC2uH2v^Ovu#3CcsVOVvcf^RcC^cvc^fv#^32#H2f3#mu2VscHc<V;cC^fvsHVv^^Hf#t3v3js2f;^cfPV;vcsVvcVHss;Hcv2OvuMOP2PEVPuVs;vP3V^cuvHsfHsv#O22PO#v3#Vuc#sCC33uC^H"));local e=(-1013+(function()local d,n=0,1;(function(e,n,l,t)e(t(l,t,n and l,n)and l(n,e and n,e,t),e(n,n,e,e),n(n,e and l,l,l),n(n and e,e,e,l))end)(function(l,t,o,e)if d>269 then return l end d=d+1 n=(n-469)%22562 if(n%1836)>=918 then n=(n+442)%33743 return o else return t(l(o,t,l,l),e(l,e and l,e,t),e(e,e,e,t),t(e,e,t,e and o))end return t(e(e,t,e,o),o(e,l,e,l),l(t,e,l,o),l(e,e and o,t,o))end,function(t,e,o,l)if d>379 then return e end d=d+1 n=(n-803)%22845 if(n%628)>314 then return l(t(l,l,e,t),l(t,l,t,t),o(o,o,o,l),e(e,e,e,l))else return e end return e end,function(o,e,l,t)if d>269 then return l end d=d+1 n=(n*631)%15552 if(n%1932)>966 then return e(l(e,o,l,e),l(t,o,e,o)and e(e,l,t,o),t(e,l,t,t),l(e,l,l,o))else return e end return t end,function(o,l,e,t)if d>337 then return l end d=d+1 n=(n*752)%25293 if(n%1374)<=687 then n=(n+983)%32655 return l else return l(l(l and e,t,e,l)and t(e,o and e,l,l),o(t,e,l,o)and e(t,t,o,e),o(e and t,t,l,e and e),l(e,l,e,t and e))end return o(l(t,l,e,e),t(t,e,e,t),l(l,l,t,e),o(t and e,o,o,t))end)return n;end)())local u=o.VgAwGIP_ or o.sAxOLMoq;local le=(getfenv)or(function()return _ENV end);local y=1;local t=3;local f=4;local d=2;local function g(b,...)local s=c(e,"=nDp+X;5P!x<>7W_X{!67PDt;P<5_P+-PPDsP+>nDnXXxx_p>Pn7XPx*WPP_<WD+XD<;_7Dp55<<nn+<xD757Ppn;P<z_P!pW<+DPn7*n>nl5>WXp+5X>>OX+>XWx;WW,PX+!PW3DP75n!;7x7!U7>Dh;P<i+px!W<p<nP;<xP_1pP>>p55p<!:>pP!>7!p!;7>D!Pj5DP5U<PX+<9_!+<+#>Wn!;+xXxP+55!7p>P;.xxW_p>5X<<n++7!+!Pp55n>+j{{v5X7_D5;W!<_Xp<+#<WWp_PX!PP7anPx7n5X_x;7pD75p<5_pX>xDWnDW;_>pWi+!P>7+n7;WP!s++>!D;P<7_P+ PP7iD5;mxP_lp!Py>Pnl;x<pWPp/5P>P#PX^!P_Dp>5A<PCk+x!N7PD(PW<p_P+SPP7;nP;nxP_5pPP+7+nGXPx1WWp*5!>Q8PXD!PWrDP5n<PVA+PxD7WDr;P<^_>+:PP7^pP;WxP_kpPP,>PnnXP>._np,5P>1SPX*!WWL+P5!<PBH+P!j7PDX;P>D8p+:Px7tn<;2xP_RpPP;>Pn(XPxDWPpn5P>vnxXS!PWyD!5b<Pkj+P!z7PD2");local n=0;o.pfSYWjWY(function()o.BF_mAEHC()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,a=r(0,r,e,s,o.ZRECuKww);local function c()local n,l=o.ZRECuKww(s,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local p=true;local p=0 local function m()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==p)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.szZfDw_l(e,n-1023)*(d+(t/(2^52)));end;local k=n;local function _(n)local l;if(not n)then n=k();if(n==0)then return'';end;end;l=o.GcOnAdCM(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+p),#l do e=e..o.GcOnAdCM(l,n,n)end return e;end;local p=#o.ADjaoYgf(h('9.8'))~=1 local e=n;local function j(...)return{...},o.bc_exRZk('#',...)end local function g()local e={};local s={};local h={};local u={s,h,nil,e};local e=n()local r={}for t=1,e do local l=a();local n;if(l==2)then n=(a()~=#{});elseif(l==3)then local e=m();if p and o.fvpqtmSD(o.ADjaoYgf(e),'.(8+)$')then e=o.gAccLiYI(e);end n=e;elseif(l==0)then n=_();end;r[t]=n;end;u[3]=a();for u=1,n()do local e=a();if(l(e,1,1)==0)then local o=l(e,2,3);local a=l(e,4,6);local e={c(),c(),nil,nil};if(o==0)then e[t]=c();e[f]=c();elseif(o==#{1})then e[t]=n();elseif(o==b[2])then e[t]=n()-(2^16)elseif(o==b[3])then e[t]=n()-(2^16)e[f]=c();end;if(l(a,1,1)==1)then e[d]=r[e[d]]end if(l(a,2,2)==1)then e[t]=r[e[t]]end if(l(a,3,3)==1)then e[f]=r[e[f]]end s[u]=e;end end;for e=1,n()do h[e-(#{1})]=g();end;return u;end;local function k(l,n,e)local t=n;local t=e;return h(o.fvpqtmSD(o.fvpqtmSD(({o.pfSYWjWY(l)})[2],n),e))end local function ne(p,e,a)local function ee(...)local c,g,h,k,m,l,ee,_,s,b,z,n;local e=0;while-1<e do if 3<=e then if e>4 then if 2~=e then for l=10,57 do if e~=6 then n=r(7);break;end;e=-2;break;end;else e=-2;end else if 0~=e then repeat if e<4 then _={};s={...};break;end;b=o.bc_exRZk('#',...)-1;z={};until true;else _={};s={...};end end else if 1>e then c=r(6,59,1,52,p);g=r(6,80,2,30,p);else if-3<e then repeat if 1~=e then l=-41;ee=-1;break;end;h=r(6,46,3,53,p);m=j k=0;until true;else h=r(6,46,3,53,p);m=j k=0;end end end e=e+1;end;for e=0,b do if(e>=h)then _[e-h]=s[e+1];else n[e]=s[e+1];end;end;local e=b-h+1 local e;local o;local function r(...)while true do end end while true do if l<-40 then l=l+42 end e=c[l];o=e[y];if o>10 then if o>=16 then if o>=19 then if 19<o then if o>19 then repeat if o~=20 then n[e[d]]=(e[t]~=0);break;end;if(n[e[d]]~=e[f])then l=l+1;else l=e[t];end;until true;else n[e[d]]=(e[t]~=0);end else n[e[d]]=n[e[t]][e[f]];end else if 17>o then local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[f]];else if o~=15 then repeat if 18~=o then a[e[t]]=n[e[d]];break;end;local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[f]];until true;else local l=e[d];local t=n[e[t]];n[l+1]=t;n[l]=t[e[f]];end end end else if o<=12 then if 11~=o then l=e[t];else local l=e[d]n[l](u(n,l+1,e[t]))end else if o<14 then a[e[t]]=n[e[d]];else if o>14 then for o=0,3 do if o<2 then if o>-1 then repeat if 1>o then n[e[d]]=(e[t]~=0);l=l+1;e=c[l];break;end;a[e[t]]=n[e[d]];l=l+1;e=c[l];until true;else a[e[t]]=n[e[d]];l=l+1;e=c[l];end else if 3>o then n[e[d]]=a[e[t]];l=l+1;e=c[l];else if(n[e[d]]~=e[f])then l=l+1;else l=e[t];end;end end end else local o,r;n[e[d]]=n[e[t]][e[f]];l=l+1;e=c[l];n[e[d]]=n[e[t]][e[f]];l=l+1;e=c[l];o=e[d];r=n[e[t]];n[o+1]=r;n[o]=r[e[f]];l=l+1;e=c[l];n(e[d],e[t]);l=l+1;e=c[l];o=e[d]n[o](u(n,o+1,e[t]))l=l+1;e=c[l];do return end;end end end end else if 5<=o then if o<=7 then if 5>=o then do return end;else if 4<o then repeat if 7>o then n[e[d]]=a[e[t]];break;end;local o,c,a,f,r;local l=0;while l>-1 do if 2>=l then if 0<l then if 0<=l then for e=24,76 do if 1<l then a=t;break;end;c=d;break;end;else c=d;end else o=e;end else if l>4 then if l>4 then repeat if 6~=l then n(r,f);break;end;l=-2;until true;else n(r,f);end else if l~=-1 then repeat if l>3 then r=o[c];break;end;f=o[a];until true;else f=o[a];end end end l=l+1 end until true;else n[e[d]]=a[e[t]];end end else if o<=8 then n[e[d]]=a[e[t]];else if 10==o then n[e[d]]=(e[t]~=0);else local o,f,r,a,c;local l=0;while l>-1 do if l<3 then if 1<=l then if 2==l then r=t;else f=d;end else o=e;end else if l<5 then if 0~=l then for e=29,65 do if l~=3 then c=o[f];break;end;a=o[r];break;end;else c=o[f];end else if 3<=l then for e=49,61 do if l~=5 then l=-2;break;end;n(c,a);break;end;else l=-2;end end end l=l+1 end end end end else if 2<=o then if o>=3 then if-1<=o then repeat if 3<o then l=e[t];break;end;if(n[e[d]]~=e[f])then l=l+1;else l=e[t];end;until true;else l=e[t];end else do return end;end else if o~=-1 then repeat if 1>o then local l=e[d]n[l](u(n,l+1,e[t]))break;end;n[e[d]]=n[e[t]][e[f]];until true;else local l=e[d]n[l](u(n,l+1,e[t]))end end end end l=1+l;end;end;return ee end;local t=0xff;local a={};local c=(1);local d='';(function(n)local l=n local f=0x00 local e=0x00 l={(function(r)if f>0x25 then return r end f=f+1 e=(e+0x635-r)%0x12 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc5);t[2]=(t[2]*(k(function()a()end,u(d))-k(t[1],u(d))))+1;a[c]={};t=t[2];c=c+t;end return true end)'yUvfU'and l[0x2](0x84+r))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x66);end return true end)'ypSXI'and l[0x3](r+0x31c))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7b);d={d..'8 a',d};a[c]=g();c=c+((not o.IGGsHHYm)and 1 or 0);d[1]='8'..d[1];t[2]=0xff;end return true end)'AHuwL'and l[0x1](r+0x2c9))or r end),(function(d)if f>0x27 then return d end f=f+1 e=(e+0xe79-d)%0x15 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb9);end return true end)'fqqwA'and l[0x2](0xed+d))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x97);a[c]=le();c=c+t;end return true end)'ZCkAO'and l[0x1](d+0x33c))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb7);end return true end)'SGUji'and l[0x3](d+0x36a))or d end),(function(o)if f>0x25 then return o end f=f+1 e=(e+0xd0f-o)%0x45 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb0);d='';t={function()t()end};d=d..'@#';end return true end)'sZPIw'and l[0x1](0x3c1+o))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xac);end return true end)'xJvaG'and l[0x3](o+0xf7))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x96);end return true end)'DAsXJ'and l[0x2](o+0x252))or o end)}l[0x3](0x2563)end){};local e=ne(u(a));return e(...);end return g((function()local n={}local e=0x01;local l;if o.IGGsHHYm then l=o.IGGsHHYm(g)else l=''end if o.fvpqtmSD(l,o.fyjQGmEp)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(l,e,n,t,d,o)local o;if 4<=l then if 5<l then if l>=7 then if 7<l then do return n(l,nil,n);end else do return setmetatable({},{['__\99\9788']=function(e,d,l,t,n)if n then return e[n]elseif t then return e else e[d]=l end end})end end else do return d[n]end;end else if l<5 then local l=t;local t,d,o=d(2);do return function()local e,c,f,n=e(n,l(l,l),l(l,l)+3);l(4);return(n*t)+(f*d)+(c*o)+e;end;end;else local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;end end else if l<2 then if l==0 then do return e(1),e(4,d,t,n,e),e(5,d,t,n)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 l~=-2 then repeat if l~=3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;until true;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end end end end),...) ?>

Did this file decode correctly?

Original Code

([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _FdJfeCOKYKZG = a; end)); return(function(r,...)local c;local h;local f;local o;local t;local d;local e=24915;local n=0;local l={};while n<581 do n=n+1;while n<0x20d and e%0x1dda<0xeed do n=n+1 e=(e-373)%28800 local a=n+e if(e%0x39c6)<0x1ce3 then e=(e*0xb7)%0x8901 while n<0x31a and e%0xc1a<0x60d do n=n+1 e=(e+560)%4935 local a=n+e if(e%0x3fa2)>0x1fd1 then e=(e*0x305)%0xae55 local e=7913 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x2ca)%0x5362 local e=68826 if not l[e]then l[e]=0x1 d=function(l)local e=0x01 local function n(n)e=e+n return l:sub(e-n,e-0x01)end while true do local l=n(0x01)if(l=="\5")then break end local e=f.byte(n(0x01))local e=n(e)if l=="\2"then e=o.xvCKpiGX(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then t[e]=function(n,e)return r(8,nil,r,e,n)end elseif l=="\4"then e=t[e]elseif l=="\0"then e=t[e][n(f.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end else e=(e+0x32b)%0x6f85 n=n+1 local e=48485 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\120\118\67\75\112\105\71\88\0\6\115\116\114\105\110\103\4\99\104\97\114\70\79\102\98\102\102\116\114\0\6\115\116\114\105\110\103\3\115\117\98\71\99\79\110\65\100\67\77\0\6\115\116\114\105\110\103\4\98\121\116\101\90\82\69\67\117\75\119\119\0\5\116\97\98\108\101\6\99\111\110\99\97\116\109\85\103\73\97\69\83\107\0\5\116\97\98\108\101\6\105\110\115\101\114\116\108\67\122\120\88\102\112\115\5";end end end elseif e%2~=0 then e=(e*0x140)%0x4779 while n<0x3cd and e%0x3d0e<0x1e87 do n=n+1 e=(e+890)%42138 local d=n+e if(e%0x3612)>0x1b09 then e=(e*0x333)%0xaff9 local e=34248 if not l[e]then l[e]=0x1 h=tonumber;end elseif e%2~=0 then e=(e-0x173)%0x6115 local e=83403 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e-0x377)%0x3f82 n=n+1 local e=99523 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end else e=(e+0x83)%0x9ab6 n=n+1 while n<0x18e and e%0x25ba<0x12dd do n=n+1 e=(e*991)%387 local t=n+e if(e%0x402e)>0x2017 then e=(e+0x12a)%0xc127 local e=50384 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x329)%0x9aa8 local e=97060 if not l[e]then l[e]=0x1 f=string;end else e=(e-0x1d0)%0x5112 n=n+1 local e=91905 if not l[e]then l[e]=0x1 o={};end end end end end e=(e-102)%18402 end d(c);local n={};for e=0x0,0xff do local l=o.FOfbfftr(e);n[e]=l;n[l]=e;end local function a(e)return n[e];end local c=(function(r,f)local c,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=r while true do n[0x03][o.GcOnAdCM(f,e,(function()e=c+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#f while e<t+0x01 do n[0x02][l]=o.GcOnAdCM(f,e,(function()e=c+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.lCzxXfps(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=r+d;end end return o.mUgIaESk(n[0x01])end);d(c(168,"C_89fI.Fl+bUZP:pIP"));d(c(120,"&3Pcsvf2uC;V^HO#uu3fIVCs3;CCPf;2^^VssH^HvuVCc#^22VHufY#CCvVscHct;Vc3^ss^Huvf^VvCH#2;O#2C;CcvPuVPc3VOs^^ff3H;sC^22vHvuu;nPOPc;^cPV3cOV#OvHvv3O^fc#,2fFOCd3C;sPvCc ^vkH^^HsCOsf_uv2s#s2H3uCuPcVP3;;O3s^#c#Hs#sus2cOHusJvuv3^C3P^;3P;V^cHHCcOH22XH#2sS9fC;sP#KfCHPcV^c#^;3cH2sPOHfH#3227;fv;^csP#;3c3^s3;;fs2HHcC^vvhHc3;;3f33HuvcvV#3c^3s2OP#su_2s#2ucJ^CP33CO3#u3E^V;cC^#s3H2vOuQ9HJs2CpPCs3vcOcvVfspVCscHcfcVC2uH2v^Ovu#3CcsVOVvcf^RcC^cvc^fv#^32#H2f3#mu2VscHc<V;cC^fvsHVv^^Hf#t3v3js2f;^cfPV;vcsVvcVHss;Hcv2OvuMOP2PEVPuVs;vP3V^cuvHsfHsv#O22PO#v3#Vuc#sCC33uC^H"));local e=(-1013+(function()local d,n=0,1;(function(e,n,l,t)e(t(l,t,n and l,n)and l(n,e and n,e,t),e(n,n,e,e),n(n,e and l,l,l),n(n and e,e,e,l))end)(function(l,t,o,e)if d>269 then return l end d=d+1 n=(n-469)%22562 if(n%1836)>=918 then n=(n+442)%33743 return o else return t(l(o,t,l,l),e(l,e and l,e,t),e(e,e,e,t),t(e,e,t,e and o))end return t(e(e,t,e,o),o(e,l,e,l),l(t,e,l,o),l(e,e and o,t,o))end,function(t,e,o,l)if d>379 then return e end d=d+1 n=(n-803)%22845 if(n%628)>314 then return l(t(l,l,e,t),l(t,l,t,t),o(o,o,o,l),e(e,e,e,l))else return e end return e end,function(o,e,l,t)if d>269 then return l end d=d+1 n=(n*631)%15552 if(n%1932)>966 then return e(l(e,o,l,e),l(t,o,e,o)and e(e,l,t,o),t(e,l,t,t),l(e,l,l,o))else return e end return t end,function(o,l,e,t)if d>337 then return l end d=d+1 n=(n*752)%25293 if(n%1374)<=687 then n=(n+983)%32655 return l else return l(l(l and e,t,e,l)and t(e,o and e,l,l),o(t,e,l,o)and e(t,t,o,e),o(e and t,t,l,e and e),l(e,l,e,t and e))end return o(l(t,l,e,e),t(t,e,e,t),l(l,l,t,e),o(t and e,o,o,t))end)return n;end)())local u=o.VgAwGIP_ or o.sAxOLMoq;local le=(getfenv)or(function()return _ENV end);local y=1;local t=3;local f=4;local d=2;local function g(b,...)local s=c(e,"=nDp+X;5P!x<>7W_X{!67PDt;P<5_P+-PPDsP+>nDnXXxx_p>Pn7XPx*WPP_<WD+XD<;_7Dp55<<nn+<xD757Ppn;P<z_P!pW<+DPn7*n>nl5>WXp+5X>>OX+>XWx;WW,PX+!PW3DP75n!;7x7!U7>Dh;P<i+px!W<p<nP;<xP_1pP>>p55p<!:>pP!>7!p!;7>D!Pj5DP5U<PX+<9_!+<+#>Wn!;+xXxP+55!7p>P;.xxW_p>5X<<n++7!+!Pp55n>+j{{v5X7_D5;W!<_Xp<+#<WWp_PX!PP7anPx7n5X_x;7pD75p<5_pX>xDWnDW;_>pWi+!P>7+n7;WP!s++>!D;P<7_P+ PP7iD5;mxP_lp!Py>Pnl;x<pWPp/5P>P#PX^!P_Dp>5A<PCk+x!N7PD(PW<p_P+SPP7;nP;nxP_5pPP+7+nGXPx1WWp*5!>Q8PXD!PWrDP5n<PVA+PxD7WDr;P<^_>+:PP7^pP;WxP_kpPP,>PnnXP>._np,5P>1SPX*!WWL+P5!<PBH+P!j7PDX;P>D8p+:Px7tn<;2xP_RpPP;>Pn(XPxDWPpn5P>vnxXS!PWyD!5b<Pkj+P!z7PD2");local n=0;o.pfSYWjWY(function()o.BF_mAEHC()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,a=r(0,r,e,s,o.ZRECuKww);local function c()local n,l=o.ZRECuKww(s,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local p=true;local p=0 local function m()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==p)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.szZfDw_l(e,n-1023)*(d+(t/(2^52)));end;local k=n;local function _(n)local l;if(not n)then n=k();if(n==0)then return'';end;end;l=o.GcOnAdCM(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+p),#l do e=e..o.GcOnAdCM(l,n,n)end return e;end;local p=#o.ADjaoYgf(h('\49.\48'))~=1 local e=n;local function j(...)return{...},o.bc_exRZk('#',...)end local function g()local e={};local s={};local h={};local u={s,h,nil,e};local e=n()local r={}for t=1,e do local l=a();local n;if(l==2)then n=(a()~=#{});elseif(l==3)then local e=m();if p and o.fvpqtmSD(o.ADjaoYgf(e),'.(\48+)$')then e=o.gAccLiYI(e);end n=e;elseif(l==0)then n=_();end;r[t]=n;end;u[3]=a();for u=1,n()do local e=a();if(l(e,1,1)==0)then local o=l(e,2,3);local a=l(e,4,6);local e={c(),c(),nil,nil};if(o==0)then e[t]=c();e[f]=c();elseif(o==#{1})then e[t]=n();elseif(o==b[2])then e[t]=n()-(2^16)elseif(o==b[3])then e[t]=n()-(2^16)e[f]=c();end;if(l(a,1,1)==1)then e[d]=r[e[d]]end if(l(a,2,2)==1)then e[t]=r[e[t]]end if(l(a,3,3)==1)then e[f]=r[e[f]]end s[u]=e;end end;for e=1,n()do h[e-(#{1})]=g();end;return u;end;local function k(l,n,e)local t=n;local t=e;return h(o.fvpqtmSD(o.fvpqtmSD(({o.pfSYWjWY(l)})[2],n),e))end local function ne(p,e,a)local function ee(...)local c,g,h,k,m,l,ee,_,s,b,z,n;local e=0;while-1<e do if 3<=e then if e>4 then if 2~=e then for l=10,57 do if e~=6 then n=r(7);break;end;e=-2;break;end;else e=-2;end else if 0~=e then repeat if e<4 then _={};s={...};break;end;b=o.bc_exRZk('#',...)-1;z={};until true;else _={};s={...};end end else if 1>e then c=r(6,59,1,52,p);g=r(6,80,2,30,p);else if-3<e then repeat if 1~=e then l=-41;ee=-1;break;end;h=r(6,46,3,53,p);m=j k=0;until true;else h=r(6,46,3,53,p);m=j k=0;end end end e=e+1;end;for e=0,b do if(e>=h)then _[e-h]=s[e+1];else n[e]=s[e+1];end;end;local e=b-h+1 local e;local o;local function r(...)while true do end end while true do if l<-40 then l=l+42 end e=c[l];o=e[y];if o>10 then if o>=16 then if o>=19 then if 19<o then if o>19 then repeat if o~=20 then n[e[d]]=(e[t]~=0);break;end;if(n[e[d]]~=e[f])then l=l+1;else l=e[t];end;until true;else n[e[d]]=(e[t]~=0);end else n[e[d]]=n[e[t]][e[f]];end else if 17>o then local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[f]];else if o~=15 then repeat if 18~=o then a[e[t]]=n[e[d]];break;end;local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[f]];until true;else local l=e[d];local t=n[e[t]];n[l+1]=t;n[l]=t[e[f]];end end end else if o<=12 then if 11~=o then l=e[t];else local l=e[d]n[l](u(n,l+1,e[t]))end else if o<14 then a[e[t]]=n[e[d]];else if o>14 then for o=0,3 do if o<2 then if o>-1 then repeat if 1>o then n[e[d]]=(e[t]~=0);l=l+1;e=c[l];break;end;a[e[t]]=n[e[d]];l=l+1;e=c[l];until true;else a[e[t]]=n[e[d]];l=l+1;e=c[l];end else if 3>o then n[e[d]]=a[e[t]];l=l+1;e=c[l];else if(n[e[d]]~=e[f])then l=l+1;else l=e[t];end;end end end else local o,r;n[e[d]]=n[e[t]][e[f]];l=l+1;e=c[l];n[e[d]]=n[e[t]][e[f]];l=l+1;e=c[l];o=e[d];r=n[e[t]];n[o+1]=r;n[o]=r[e[f]];l=l+1;e=c[l];n(e[d],e[t]);l=l+1;e=c[l];o=e[d]n[o](u(n,o+1,e[t]))l=l+1;e=c[l];do return end;end end end end else if 5<=o then if o<=7 then if 5>=o then do return end;else if 4<o then repeat if 7>o then n[e[d]]=a[e[t]];break;end;local o,c,a,f,r;local l=0;while l>-1 do if 2>=l then if 0<l then if 0<=l then for e=24,76 do if 1<l then a=t;break;end;c=d;break;end;else c=d;end else o=e;end else if l>4 then if l>4 then repeat if 6~=l then n(r,f);break;end;l=-2;until true;else n(r,f);end else if l~=-1 then repeat if l>3 then r=o[c];break;end;f=o[a];until true;else f=o[a];end end end l=l+1 end until true;else n[e[d]]=a[e[t]];end end else if o<=8 then n[e[d]]=a[e[t]];else if 10==o then n[e[d]]=(e[t]~=0);else local o,f,r,a,c;local l=0;while l>-1 do if l<3 then if 1<=l then if 2==l then r=t;else f=d;end else o=e;end else if l<5 then if 0~=l then for e=29,65 do if l~=3 then c=o[f];break;end;a=o[r];break;end;else c=o[f];end else if 3<=l then for e=49,61 do if l~=5 then l=-2;break;end;n(c,a);break;end;else l=-2;end end end l=l+1 end end end end else if 2<=o then if o>=3 then if-1<=o then repeat if 3<o then l=e[t];break;end;if(n[e[d]]~=e[f])then l=l+1;else l=e[t];end;until true;else l=e[t];end else do return end;end else if o~=-1 then repeat if 1>o then local l=e[d]n[l](u(n,l+1,e[t]))break;end;n[e[d]]=n[e[t]][e[f]];until true;else local l=e[d]n[l](u(n,l+1,e[t]))end end end end l=1+l;end;end;return ee end;local t=0xff;local a={};local c=(1);local d='';(function(n)local l=n local f=0x00 local e=0x00 l={(function(r)if f>0x25 then return r end f=f+1 e=(e+0x635-r)%0x12 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc5);t[2]=(t[2]*(k(function()a()end,u(d))-k(t[1],u(d))))+1;a[c]={};t=t[2];c=c+t;end return true end)'yUvfU'and l[0x2](0x84+r))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x66);end return true end)'ypSXI'and l[0x3](r+0x31c))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7b);d={d..'\58 a',d};a[c]=g();c=c+((not o.IGGsHHYm)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'AHuwL'and l[0x1](r+0x2c9))or r end),(function(d)if f>0x27 then return d end f=f+1 e=(e+0xe79-d)%0x15 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb9);end return true end)'fqqwA'and l[0x2](0xed+d))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x97);a[c]=le();c=c+t;end return true end)'ZCkAO'and l[0x1](d+0x33c))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb7);end return true end)'SGUji'and l[0x3](d+0x36a))or d end),(function(o)if f>0x25 then return o end f=f+1 e=(e+0xd0f-o)%0x45 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb0);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'sZPIw'and l[0x1](0x3c1+o))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xac);end return true end)'xJvaG'and l[0x3](o+0xf7))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x96);end return true end)'DAsXJ'and l[0x2](o+0x252))or o end)}l[0x3](0x2563)end){};local e=ne(u(a));return e(...);end return g((function()local n={}local e=0x01;local l;if o.IGGsHHYm then l=o.IGGsHHYm(g)else l=''end if o.fvpqtmSD(l,o.fyjQGmEp)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(l,e,n,t,d,o)local o;if 4<=l then if 5<l then if l>=7 then if 7<l then do return n(l,nil,n);end else do return setmetatable({},{['__\99\97\108\108']=function(e,d,l,t,n)if n then return e[n]elseif t then return e else e[d]=l end end})end end else do return d[n]end;end else if l<5 then local l=t;local t,d,o=d(2);do return function()local e,c,f,n=e(n,l(l,l),l(l,l)+3);l(4);return(n*t)+(f*d)+(c*o)+e;end;end;else local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;end end else if l<2 then if l==0 then do return e(1),e(4,d,t,n,e),e(5,d,t,n)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 l~=-2 then repeat if l~=3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;until true;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end end end end),...)

Function Calls

None

Variables

None

Stats

MD5 6b8e4fbb2c7c90c0ff358e775bd02004
Eval Count 0
Decode Time 47 ms