-
Notifications
You must be signed in to change notification settings - Fork 0
/
Psx
1 lines (1 loc) · 15.8 KB
/
Psx
1
([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _VAtYDDyascAW = a; end)); return(function(o,...)local h;local r;local d;local l;local u;local f;local e=24915;local n=0;local t={};while n<979 do n=n+1;while n<0xfb and e%0x1b9e<0xdcf do n=n+1 e=(e+427)%49388 local a=n+e if(e%0x479e)<0x23cf then e=(e-0x3e3)%0x86d0 while n<0x11c and e%0x3cb4<0x1e5a do n=n+1 e=(e*927)%35054 local r=n+e if(e%0x39c6)<=0x1ce3 then e=(e-0x35d)%0x888a local e=61425 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end elseif e%2~=0 then e=(e*0x2f6)%0x7e94 local e=95222 if not t[e]then t[e]=0x1 d=string;end else e=(e+0x11d)%0xfe8 n=n+1 local e=38470 if not t[e]then t[e]=0x1 h={};end end end elseif e%2~=0 then e=(e+0x27c)%0xccd while n<0x119 and e%0x35c4<0x1ae2 do n=n+1 e=(e*573)%12016 local r=n+e if(e%0x3d3c)<0x1e9e then e=(e+0x2ee)%0xb11e local e=53096 if not t[e]then t[e]=0x1 f=tonumber;end elseif e%2~=0 then e=(e*0x2b8)%0x8022 local e=69595 if not t[e]then t[e]=0x1 u="\4\8\116\111\110\117\109\98\101\114\81\82\84\98\109\88\66\66\0\6\115\116\114\105\110\103\4\99\104\97\114\86\80\68\65\83\106\70\85\0\6\115\116\114\105\110\103\3\115\117\98\79\76\115\79\71\88\118\112\0\6\115\116\114\105\110\103\4\98\121\116\101\115\65\110\110\83\99\101\82\0\5\116\97\98\108\101\6\99\111\110\99\97\116\115\118\109\83\82\111\74\80\0\5\116\97\98\108\101\6\105\110\115\101\114\116\75\70\85\86\66\75\65\85\5";end else e=(e-0x1f9)%0xa9d n=n+1 local e=73908 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end end end else e=(e-0x5a)%0x1676 n=n+1 while n<0x2ce and e%0x219c<0x10ce do n=n+1 e=(e-708)%1849 local u=n+e if(e%0x2b7e)>0x15bf then e=(e+0x111)%0x8bd3 local e=70270 if not t[e]then t[e]=0x1 end elseif e%2~=0 then e=(e-0x15a)%0x75d6 local e=27192 if not t[e]then t[e]=0x1 r=function(t)local e=0x01 local function n(n)e=e+n return t:sub(e-n,e-0x01)end while true do local t=n(0x01)if(t=="\5")then break end local e=d.byte(n(0x01))local e=n(e)if t=="\2"then e=h.QRTbmXBB(e)elseif t=="\3"then e=e~="\0"elseif t=="\6"then l[e]=function(n,e)return o(8,nil,o,e,n)end elseif t=="\4"then e=l[e]elseif t=="\0"then e=l[e][n(d.byte(n(0x01)))];end local n=n(0x08)h[n]=e end end end else e=(e*0x12)%0x3e73 n=n+1 local e=70450 if not t[e]then t[e]=0x1 end end end end end e=(e*568)%43603 end r(u);local n={};for e=0x0,0xff do local t=h.VPDASjFU(e);n[e]=t;n[t]=e;end local function a(e)return n[e];end local d=(function(o,r)local u,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local d=o while true do n[0x03][h.OLsOGXvp(r,e,(function()e=u+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#r while e<l+0x01 do n[0x02][t]=h.OLsOGXvp(r,e,(function()e=u+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 h.KFUVBKAU(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=o+d;end end return h.svmSRoJP(n[0x01])end);r(d(63,"la3Kot;G2(E<01D#0;"));r(d(98,"(avc.O}t_<2Q/N%J<%.v.N%/__aN/BOt<v<ScJNOt}aO<vva/NtO9%2/O_<_ct.ZNa}Na}Q.OQJ<}.vN/v.Jav_%Ntt<_vvvQtO2J%2ao/Nc.2%<<OOI/va_Q//t}}ov<tc2NanNac2OO}%c_}ccNcc/J%_tac/.Ot2/.%OO%t<_v2}O}2AW<JOr%}}/Jt2c.OJ.2accQc8_2%Qc.cJi_taN/2OO1}<acTN_}J0J/scc/%_OmN2}}%</cNv2NttcvvQQO/QQ<Nz%Q..Qat2cv}/2a2Q_/<OaJt2Si%/Q.tM_Q_._%v<aQ/O<vJ%ct_c</c_}a/Qpc<__v2c./N}JS%22cJ%vt<J_<ac%%a<%aT2}.N2Y.cO&NQt2vvQ<J_mO</c//Q}Qaa2%.cJ.}sv/<JOrJ%c_N_%Ot/a/2Q.QJa__vNN}}t%Q2<v%/aa_Qt/m}VJO<_c/QO}c%__NOvJatvv}O2J2MO<Oc2Na}Na/2QcQN}}/ N<N.vN%c}N_NJtavvQ.%J%%<vccNatvav2/c./t_}e}<}ca<c"));local e=(-46569+(function()local l,n=0,1;(function(e,t,n)t(e(n,n and e,e and n),e(n,e and e,n),t(n,e,t))end)(function(r,t,e)if l>108 then return e end l=l+1 n=(n*170)%20080 if(n%1800)>900 then return r(t(e and t,e and e,r)and t(e and e,t and r,t),r(e,e,e),r(r,t,t))else return e end return e end,function(e,t,r)if l>409 then return t end l=l+1 n=(n-649)%46864 if(n%850)<=425 then n=(n*588)%44731 return t(e(r,r,r),e(e,e,e),t(e,t,e))else return e end return t end,function(r,e,t)if l>123 then return e end l=l+1 n=(n-558)%16405 if(n%984)<492 then return e else return e(t(e and t,e and e,e and r)and e(t,e,e),r(r,e,r),t(t,e,e and t))end return t(r(t and e,t,t),e(t,r,e),e(r,r,e))end)return n;end)())local c=h.dkviOoVK or h.jatBpEXh;local z=(getfenv)or(function()return _ENV end);local r=3;local u=4;local l=2;local ee=1;local function j(y,...)local s=d(e,"9R1ruHyI}&#>,4h5}hhhyH4,HuURuR>}155#}H54Ih#1H54&Hr,r5H,r1u#44R&}RR}H_Ry&4hyy,huuIIuH#hr(&>,#yh?IIh5uHU4&uh}115}rhI#G1hu,h&I55Hy45RHI4&QI&u_>}15&r},R1H&,Rr,4y&44H14Ruy,1r1y1+,&rR&}I)H}A5y1}&5Ryy_4>u4,ur>!y}hR}}>>5byIh5ry#hR>IRyuI,uru#>115wIHh&uyhuH>,h4>HH,}r5>y&uZH}}5I:#}45IyhhH>>1&}>rH&R5ry#RyIH5hyH>#uIy}hrHH,,ur%h&y1_&r,&_h}>5>I1h&>uuy,-rq#RlrIy#1yI}5QyI4H,45Hy,&ur}Rh4yuRh}uRRr5h5y}h#HH4&r4,Ir,#H1&&RRu}#fIy5h5y,&4u&,,uRI#L,#h1r&>55}r5>IIh1Hy4#ur,rr1Ir1>&IR4&rmgI>541h#HR&,hr&>}ruy,1u&JRy},5&IuhHy#4HHy,455>uru&I#h1h&>R1}&y,hyu5,&u5,Ir,##1y&y#I1H&u8>}1uhhru,4bur#4r+&5>115&5Ry}4u,h5yy4&1I>,u1uy4Hrr##1RhHIh5Hy>,IHB,Hr}#rr>>XRh&#S#}44&IRhrH#41H1&,uy>4r1r}1I1H&,Rr51IHh,H54&RI}r5##y11#rz#}43II%>RH4hYHH}hrI>414y#1&}hL1I554IuhIyy&&R1}}Y}I45yy,44H}4Su&,QrH#IR,&&7>}r5,IrhH}hh}u55Hrh,1u}huR}&muI&ukyI#U1&,,4uu,,H&5Z1&4r1h,ru!#&1>#yR4yR54H#,>yR,Hrh>H/4,rr4##55Iy.4u&:ur5>5y&&5ry,h54>y1}}hhryy5>Hh5huH,hH}&uu&,#,#HZ>I1h#HH5(}I45HyI4,r&,Xuy>ur1#45h}}n>I#}4RrI#5Ry}15>>uRyuVh&>RyuEO51h4}H5hHHr4Ru,H.4}r4>u1>5H}45RI&51Hh4#u#I#1u#>rR&5R4&},&uo>IpR},hhyH4,##1>##1,&}Ru}u>uIR5Ry>&pr#,RuI>Hrr#h45Hy,4RI&1MuI>51>4uH,5u1II>4r}##1R&}yrh>IHh}R5yrh&HU,Irh/}}5RH}rlRI,&5u14,uH>5rI#4hhyH4,1y#&Rr}#eRhuHh,IuR>4r&#&1,&rR&}r5#I#}r5#IRh}H55uu4,ur>>1r>#!RI}h+yI,5ry#5rH5,5uy>4u1#>11&&11#u5hIHh,y#4#HR,}yH,&14#uR>&}S&}R5Iy5hHyi4#u#,Rr}>H1y&hRu}>RyI&5cyI45HH,,ur,,u,#}R5&yRy}u5>I15>I#4Iuh,Hu}>r1##R1##RvyI45uI#h1H&4sH&4srH#,1r&5RR}}55Iy5Iyu4>H1,#uV>I1h>IrI&rt#}R25y5hyH4hyyR,1r&>31>&hRH},rr}R5Ry}45yy,4HH>>uu>R13&I?h}&5,Irh#&R5Ru5,yr4>I1>>}RR,Ih5Hy,hIH#4Ru}h5u)u&>1y}&RrIIU_y}4,Hr,#uH>}15#yu4&#t>}15&I}hIyQ4HHh,hr#>R1}#rRy}4iu#>5uy&h)HIhruH,hrr>,1&&} 5}yj}Iuh>y1h>HH,Ir5>Hr1#rR#&R1}}55yyhhuH,41Hy,Au&>41H&5Rr&uDRI}h5yyh,Hu,,u1>,rz#IRh&HR&}r5#IRh}H54}u4,uuh>11&#PR}}hvyI,5rIRhRH},5uI>4ru#>");local n=0;h.uuBmdSxV(function()h.DcAdvhdu()n=n+1 end)local function e(e,t)if t then return n end;n=e+n;end local t,n,a=o(0,o,e,s,h.sAnnSceR);local function d()local n,t=h.sAnnSceR(s,e(1,3),e(5,6)+2);e(2);return(t*256)+n;end;local b=true;local b=0 local function k()local l=n();local e=n();local r=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;r=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return h.XESWhwkM(e,n-1023)*(r+(l/(2^52)));end;local _=n;local function p(n)local t;if(not n)then n=_();if(n==0)then return'';end;end;t=h.OLsOGXvp(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#t do e=e..h.OLsOGXvp(t,n,n)end return e;end;local b=#h.HCRWvJBK(f('\49.\48'))~=1 local e=n;local function ne(...)return{...},h.eWTLOAHF('#',...)end local function g()local s={};local e={};local c={};local f={s,c,nil,e};local e=n()local o={}for l=1,e do local t=a();local n;if(t==3)then n=(a()~=#{});elseif(t==2)then local e=k();if b and h.wyDhSATI(h.HCRWvJBK(e),'.(\48+)$')then e=h.tpZOpRDA(e);end n=e;elseif(t==1)then n=p();end;o[l]=n;end;f[3]=a();for e=1,n()do c[e-(#{1})]=g();end;for f=1,n()do local e=a();if(t(e,1,1)==0)then local h=t(e,2,3);local a=t(e,4,6);local e={d(),d(),nil,nil};if(h==0)then e[r]=d();e[u]=d();elseif(h==#{1})then e[r]=n();elseif(h==y[2])then e[r]=n()-(2^16)elseif(h==y[3])then e[r]=n()-(2^16)e[u]=d();end;if(t(a,1,1)==1)then e[l]=o[e[l]]end if(t(a,2,2)==1)then e[r]=o[e[r]]end if(t(a,3,3)==1)then e[u]=o[e[u]]end s[f]=e;end end;return f;end;local function m(t,e,n)local l=e;local l=n;return f(h.wyDhSATI(h.wyDhSATI(({h.uuBmdSxV(t)})[2],e),n))end local function j(_,e,a)local function m(...)local d,g,b,j,s,n,f,k,y,p,m,t;local e=0;while-1<e do if 3<=e then if e<5 then if 2<e then repeat if e~=4 then k={};y={...};break;end;p=h.eWTLOAHF('#',...)-1;m={};until true;else k={};y={...};end else if e>3 then repeat if 6>e then t=o(7);break;end;e=-2;until true;else e=-2;end end else if e<=0 then d=o(6,40,1,25,_);g=o(6,17,2,28,_);else if e>1 then n=-41;f=-1;else b=o(6,30,3,68,_);s=ne j=0;end end end e=e+1;end;for e=0,p do if(e>=b)then k[e-b]=y[e+1];else t[e]=y[e+1];end;end;local e=p-b+1 local e;local o;local function h(...)while true do end end while true do if n<-40 then n=n+42 end e=d[n];o=e[ee];if 13<o then if 20<o then if 24>o then if 22<=o then if 22==o then n=e[r];else t[e[l]]=(e[r]~=0);end else t[e[l]]=(e[r]~=0);end else if 26>o then if 20<o then repeat if o>24 then for o=0,6 do if 2>=o then if 0>=o then t[e[l]][e[r]]=e[u];n=n+1;e=d[n];else if-3<o then for h=41,52 do if 2>o then t[e[l]]=a[e[r]];n=n+1;e=d[n];break;end;t[e[l]][e[r]]=e[u];n=n+1;e=d[n];break;end;else t[e[l]]=a[e[r]];n=n+1;e=d[n];end end else if o>=5 then if 6==o then t[e[l]][e[r]]=e[u];else t[e[l]]=a[e[r]];n=n+1;e=d[n];end else if o~=3 then t[e[l]][e[r]]=e[u];n=n+1;e=d[n];else t[e[l]]=a[e[r]];n=n+1;e=d[n];end end end end break;end;local n=e[l]local l,e=s(t[n](c(t,n+1,e[r])))f=e+n-1 local e=0;for n=n,f do e=e+1;t[n]=l[e];end;until true;else for o=0,6 do if 2>=o then if 0>=o then t[e[l]][e[r]]=e[u];n=n+1;e=d[n];else if-3<o then for h=41,52 do if 2>o then t[e[l]]=a[e[r]];n=n+1;e=d[n];break;end;t[e[l]][e[r]]=e[u];n=n+1;e=d[n];break;end;else t[e[l]]=a[e[r]];n=n+1;e=d[n];end end else if o>=5 then if 6==o then t[e[l]][e[r]]=e[u];else t[e[l]]=a[e[r]];n=n+1;e=d[n];end else if o~=3 then t[e[l]][e[r]]=e[u];n=n+1;e=d[n];else t[e[l]]=a[e[r]];n=n+1;e=d[n];end end end end end else if 26==o then for o=0,6 do if 2<o then if o>=5 then if o>4 then for h=25,88 do if o>5 then t[e[l]][e[r]]=e[u];break;end;t[e[l]]=a[e[r]];n=n+1;e=d[n];break;end;else t[e[l]][e[r]]=e[u];end else if-1<=o then repeat if 3<o then a[e[r]]=t[e[l]];n=n+1;e=d[n];break;end;t[e[l]]=(e[r]~=0);n=n+1;e=d[n];until true;else t[e[l]]=(e[r]~=0);n=n+1;e=d[n];end end else if o<1 then a[e[r]]=t[e[l]];n=n+1;e=d[n];else if o>=-1 then for h=31,59 do if 1~=o then a[e[r]]=t[e[l]];n=n+1;e=d[n];break;end;t(e[l],e[r]);n=n+1;e=d[n];break;end;else t(e[l],e[r]);n=n+1;e=d[n];end end end end else t(e[l],e[r]);end end end else if 17>o then if 14<o then if o~=15 then if(t[e[l]]~=e[u])then n=n+1;else n=e[r];end;else local n=e[l]local l,e=s(t[n](c(t,n+1,e[r])))f=e+n-1 local e=0;for n=n,f do e=e+1;t[n]=l[e];end;end else local l=e[l];local n=t[e[r]];t[l+1]=n;t[l]=n[e[u]];end else if 18<o then if o~=19 then do return end;else a[e[r]]=t[e[l]];end else if 15~=o then for h=37,81 do if 18>o then a[e[r]]=t[e[l]];break;end;for o=0,3 do if o>=2 then if 2<o then if(t[e[l]]~=e[u])then n=n+1;else n=e[r];end;else t[e[l]]=a[e[r]];n=n+1;e=d[n];end else if o>=-3 then for h=30,63 do if o<1 then t[e[l]]=(e[r]~=0);n=n+1;e=d[n];break;end;a[e[r]]=t[e[l]];n=n+1;e=d[n];break;end;else t[e[l]]=(e[r]~=0);n=n+1;e=d[n];end end end break;end;else for o=0,3 do if o>=2 then if 2<o then if(t[e[l]]~=e[u])then n=n+1;else n=e[r];end;else t[e[l]]=a[e[r]];n=n+1;e=d[n];end else if o>=-3 then for h=30,63 do if o<1 then t[e[l]]=(e[r]~=0);n=n+1;e=d[n];break;end;a[e[r]]=t[e[l]];n=n+1;e=d[n];break;end;else t[e[l]]=(e[r]~=0);n=n+1;e=d[n];end end end end end end end else if o<7 then if o>=3 then if o>4 then if 1<o then repeat if o>5 then local d,u,h,a,o;local n=0;while n>-1 do if n<=2 then if n<=0 then d=e;else if n~=-1 then repeat if n~=1 then h=r;break;end;u=l;until true;else h=r;end end else if 4<n then if n~=1 then for e=43,70 do if n<6 then t(o,a);break;end;n=-2;break;end;else t(o,a);end else if n>2 then repeat if 3<n then o=d[u];break;end;a=d[h];until true;else o=d[u];end end end n=n+1 end break;end;local o,y,_,b,h;t[e[l]]=a[e[r]];n=n+1;e=d[n];o=e[l];y=t[e[r]];t[o+1]=y;t[o]=y[e[u]];n=n+1;e=d[n];t(e[l],e[r]);n=n+1;e=d[n];o=e[l]_,b=s(t[o](c(t,o+1,e[r])))f=b+o-1 h=0;for e=o,f do h=h+1;t[e]=_[h];end;n=n+1;e=d[n];o=e[l]t[o]=t[o](c(t,o+1,f))n=n+1;e=d[n];t[e[l]]();n=n+1;e=d[n];do return end;until true;else local o,y,b,_,h;t[e[l]]=a[e[r]];n=n+1;e=d[n];o=e[l];y=t[e[r]];t[o+1]=y;t[o]=y[e[u]];n=n+1;e=d[n];t(e[l],e[r]);n=n+1;e=d[n];o=e[l]b,_=s(t[o](c(t,o+1,e[r])))f=_+o-1 h=0;for e=o,f do h=h+1;t[e]=b[h];end;n=n+1;e=d[n];o=e[l]t[o]=t[o](c(t,o+1,f))n=n+1;e=d[n];t[e[l]]();n=n+1;e=d[n];do return end;end else if 2<o then for n=33,88 do if o>3 then local e=e[l]t[e]=t[e](c(t,e+1,f))break;end;t[e[l]]=a[e[r]];break;end;else local e=e[l]t[e]=t[e](c(t,e+1,f))end end else if o>=1 then if-1<=o then repeat if 1<o then t[e[l]][e[r]]=e[u];break;end;t[e[l]]();until true;else t[e[l]]();end else t[e[l]]();end end else if 9>=o then if o<8 then n=e[r];else if o~=4 then repeat if 8<o then local e=e[l]t[e]=t[e](c(t,e+1,f))break;end;t[e[l]]=a[e[r]];until true;else local e=e[l]t[e]=t[e](c(t,e+1,f))end end else if o>=12 then if o>=9 then for n=49,66 do if o<13 then local n=e[l];local l=t[e[r]];t[n+1]=l;t[n]=l[e[u]];break;end;do return end;break;end;else do return end;end else if 8<o then for d=12,74 do if 10~=o then if(t[e[l]]~=e[u])then n=n+1;else n=e[r];end;break;end;t[e[l]][e[r]]=e[u];break;end;else if(t[e[l]]~=e[u])then n=n+1;else n=e[r];end;end end end end end n=1+n;end;end;return m end;local l=0xff;local a={};local o=(1);local r='';(function(n)local t=n local d=0x00 local e=0x00 t={(function(h)if d>0x2d then return h end d=d+1 e=(e+0x124c-h)%0x24 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x9d);r='\37';l={function()l()end};r=r..'\100\43';end return true end)'ufOJH'and t[0x2](0x205+h))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd4);end return true end)'rSUfA'and t[0x1](h+0x1b7))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xba);l[2]=(l[2]*(m(function()a()end,c(r))-m(l[1],c(r))))+1;a[o]={};l=l[2];o=o+l;end return true end)'Jgesb'and t[0x3](h+0x381))or h end),(function(u)if d>0x25 then return u end d=d+1 e=(e+0x58a-u)%0x11 return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x3d);end return true end)'hQx_D'and t[0x3](0x80+u))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x73);end return true end)'WChFj'and t[0x2](u+0x3b0))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xf2);r={r..'\58 a',r};a[o]=g();o=o+((not h.qPAOYTTb)and 1 or 0);r[1]='\58'..r[1];l[2]=0xff;end return true end)'qExCj'and t[0x1](u+0x1d0))or u end),(function(r)if d>0x2b then return r end d=d+1 e=(e+0xde2-r)%0x42 return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd5);a[o]=z();o=o+l;end return true end)'PutAT'and t[0x2](0x353+r))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x9f);end return true end)'HRvnQ'and t[0x1](r+0x1ba))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd5);end return true end)'OwJbi'and t[0x3](r+0x30f))or r end)}t[0x1](0x3ed)end){};local e=j(c(a));return e(...);end return j((function()local n={}local e=0x01;local t;if h.qPAOYTTb then t=h.qPAOYTTb(j)else t=''end if h.wyDhSATI(t,h.yFoHIWtH)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,r,l,d)local d;if e<4 then if e>1 then if e~=3 then do return 16777216,65536,256 end;else do return n(1),n(4,l,r,t,n),n(5,l,r,t)end;end else if 1~=e then do return n(1),n(4,l,r,t,n),n(5,l,r,t)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 end else if 6>e then if 3<e then for d=21,87 do if 5~=e then local e=r;local l,d,o=l(2);do return function()local h,r,t,n=n(t,e(e,e),e(e,e)+3);e(4);return(n*l)+(t*d)+(r*o)+h;end;end;break;end;local e=r;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;break;end;else local e=r;local r,l,o=l(2);do return function()local h,d,t,n=n(t,e(e,e),e(e,e)+3);e(4);return(n*r)+(t*l)+(d*o)+h;end;end;end else if 6<e then if 5<e then for n=40,74 do if 8>e then do return setmetatable({},{['__\99\97\108\108']=function(e,t,l,r,n)if n then return e[n]elseif r then return e else e[t]=l end end})end break;end;do return t(e,nil,t);end break;end;else do return setmetatable({},{['__\99\97\108\108']=function(e,l,t,r,n)if n then return e[n]elseif r then return e else e[l]=t end end})end end else do return l[t]end;end end end end),...)