HUBPS99

([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _wvEbccobZlXY = a; end)); return(function(s,...)local a;local d;local o;local t;local c;local r;local e=24915;local n=0;local l={};while n<994 do n=n+1;while n<0x301 and e%0x3bdc<0x1dee do n=n+1 e=(e+836)%24984 local f=n+e if(e%0x3092)>=0x1849 then e=(e+0x17e)%0x3327 while n<0x2f7 and e%0x35b0<0x1ad8 do n=n+1 e=(e+739)%32544 local o=n+e if(e%0xa2c)>0x516 then e=(e-0x1a)%0xa0e8 local e=36945 if not l[e]then l[e]=0x1 r=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=t.byte(n(0x01))local e=n(e)if l=="\2"then e=a.MrdzGwVB(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then d[e]=function(n,e)return s(8,nil,s,e,n)end elseif l=="\4"then e=d[e]elseif l=="\0"then e=d[e][n(t.byte(n(0x01)))];end local n=n(0x08)a[n]=e end end end elseif e%2~=0 then e=(e-0x110)%0x2091 local e=77367 if not l[e]then l[e]=0x1 end else e=(e+0x312)%0x8584 n=n+1 local e=57030 if not l[e]then l[e]=0x1 end end end elseif e%2~=0 then e=(e*0x304)%0x3905 while n<0x309 and e%0xef0<0x778 do n=n+1 e=(e-795)%36917 local r=n+e if(e%0x2498)>=0x124c then e=(e*0xd)%0x1a7e local e=70690 if not l[e]then l[e]=0x1 c=tonumber;end elseif e%2~=0 then e=(e-0xdf)%0x1311 local e=61764 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end else e=(e-0x212)%0x100e n=n+1 local e=93757 if not l[e]then l[e]=0x1 o="\4\8\116\111\110\117\109\98\101\114\77\114\100\122\71\119\86\66\0\6\115\116\114\105\110\103\4\99\104\97\114\83\67\99\104\80\80\107\69\0\6\115\116\114\105\110\103\3\115\117\98\122\88\115\68\67\76\79\100\0\6\115\116\114\105\110\103\4\98\121\116\101\108\110\74\73\75\65\103\98\0\5\116\97\98\108\101\6\99\111\110\99\97\116\98\65\108\74\95\115\70\68\0\5\116\97\98\108\101\6\105\110\115\101\114\116\95\83\101\73\88\81\84\69\5";end end end else e=(e-0xbd)%0xae3f n=n+1 while n<0x1ec and e%0x3ea0<0x1f50 do n=n+1 e=(e-575)%33412 local r=n+e if(e%0xc8c)>=0x646 then e=(e+0x1ae)%0x2475 local e=10284 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end elseif e%2~=0 then e=(e+0x90)%0xa15a local e=28306 if not l[e]then l[e]=0x1 t=string;end else e=(e-0xe2)%0x344c n=n+1 local e=44892 if not l[e]then l[e]=0x1 a={};end end end end end e=(e*922)%43010 end r(o);local n={};for e=0x0,0xff do local l=a.SCchPPkE(e);n[e]=l;n[l]=e;end local function u(e)return n[e];end local o=(function(f,t)local o,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local r=f while true do n[0x03][a.zXsDCLOd(t,e,(function()e=o+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#t while e<d+0x01 do n[0x02][l]=a.zXsDCLOd(t,e,(function()e=o+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 a._SeIXQTE(n[0x01],(u((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+r)%0x100)));r=f+r;end end return a.bAlJ_sFD(n[0x01])end);r(o(131,"ah6d.(2{R<eE#DrOR6"));r(o(212,"Kfkx^{uCRUOSXj8:kX{8:Ck^^8CfOkXCUGfX{UCjOXOU:xxRx8ufUSjufxXX:UU7O:jUfFxX^SUOXR:xkxxk{XR7{jRjk^{kC{OujRzRfxx{uSSxSCfk98:LkkSS8Rfkx{uuRS{{8U(U^RuxU^OOjOf:^8RfRjOuX:SR8RCjUjjX:XX{{RCXOU8RBXxX{RCfXuX^fkxx^&kXu>:xff^XCfU{j)8UkR^fu8O^XUjffV{{CSURSx0RkC:^kxU8jUMx^euCUuRxX.fO^X^OCfO^jCkU8I.XOSXf:{kX{au:CjSjjUf^ux{X^uCfj{kC^{ROSXS88:fu^SkX{X:^fS^SCROkX{:ufSxCCUSkXu:^k:kSuf^VCfcXk{{kRROjCOf{xOuRR{Sx8C8:xOukOxUjjuy:^jsXxOj{:OkR^{CxOCjf:8xk{XRfU^Su1OXX:UUWS88ffk^^^{U^Xx8:f:kX{XUxuNR8kC^{CRUjXC9^kf{fu{UuXj8UnOxRfX^X8fIf^ZuzkUSu8RfC^xCkUSX{:^9kk8CuOUj{Uf"));local e=(-244+(function()local t,e=0,1;(function(l,e,n,d)e(e(l,l,n and n,n),e(n,l,d,d),e(n,l,n,e),e(e,e,l and l,n and d))end)(function(d,n,r,l)if t>154 then return d end t=t+1 e=(e+462)%25368 if(e%244)>=122 then e=(e-684)%10795 return l else return r(n(r,n,n,l)and n(d,l,n,l),n(l,d and d,d,r and r),n(n,r,d and d,n),n(r,l,d,n))end return l(d(n,l,n,n),r(r,l and n,r,l),r(d,n and n,l,n and l),l(l,d,l,d and d))end,function(d,n,r,l)if t>438 then return n end t=t+1 e=(e*1004)%1952 if(e%834)>=417 then e=(e*930)%25787 return r else return d(n(d,n,l,n),n(d,l,l,r)and r(d,r,d and d,n),l(d,n,l,d),d(r,l and l,d,n)and r(r,r,r,l))end return l(n(l,n and n,l,r),l(l,r,d,n),n(l,n,r,l),r(d and n,n,n and l,d))end,function(r,d,n,l)if t>444 then return d end t=t+1 e=(e+243)%40531 if(e%550)<=275 then e=(e*246)%7297 return d(l(l and n,l,n,d and n),n(r,l,n,n),n(l,n,n,n)and r(l,r,n,l),n(d,d,n,n))else return l end return l end,function(l,d,r,n)if t>471 then return n end t=t+1 e=(e+112)%33115 if(e%224)>112 then e=(e-74)%47727 return l else return d(d(n,d,d and d,l),d(l,l,l,n and l),d(l,d,r,d),l(l,n and n,r,r))end return l(r(n,n,d,d),l(l,l and d,n,r),r(l and n,n and r,r,n),r(n,n,r,n))end)return e;end)())local h=a.ijrpiPFn or a.GfbwER_q;local ne=(getfenv)or(function()return _ENV end);local u=4;local le=1;local r=2;local d=3;local function _(b,...)local o=o(e,"c=%rPFMRWLz*Vab{RMa,rWzG6*RWaWPgzWMFb*PF*z=bRLbaPaFrVf%;WW{XLL%%Wab%MRVP{LM%L*}PMWaArWJRMLaaraPrz{=7RWbZLd%PWV{7%{*F%V%rL%{JFWVkLP{{FLVPr*zP9zMLaMrRr*{P1WRjaWzW=VWPbWFrW%a{PR{%PLVRbMWR{=MPVDrFWz?FM*VFrzLrURMbaVrFzM=PrMarPRzaaRFV{=F7*k=FWzarP*V%%=Lf{V={zW=rM=VL%Fza%LLLZPRraVrFLLoVMab%_RzaILRLbM3{LWqrF=*LrF*=%=WV{*MP*a%=LP{FMzMraarsLW!,a*rFzP8FM*bPrazP{PR{aLPP*==bR{arP*V%=aWF{M{rR=V0%WLEPFV{rRLbb*MFV*%{W*=PRzaLPMzR=*FWb=PPzV=FWMV=FVVP%z%rWL{3FWV F*LrR=MnVWrBE6RPaVP:z*azrRL{rVzL=*RrbRF%zVabR*b{FFR{=LLG{=={V{%FWz{WMRV{rrzrVRr=LLEpR=aFr*zFQLRRa{PPzb=rRabRPV*F=VWWbRMRn=rVVP+PWbVRPb*{%VLL7FrpLaPFWV{MFka{rRWV{RPPaVPazb=PL%aW=VWR=*WRa{FVVL{MRLhRF*L={azR-WrmbT/Rzz;rM{aWF%LF{FWRbrFPWb{zMPaWFRV%%PM{{aMMVBVr%{L?{WM/={LF{zMWaRr{zrzr=FRdaWPHvRWRbb%Fzz=rR*b{Pzzz%PRWb={rMFV?%WL>PPV{%LLPn=MbV{%rL*=%MaaFPMPrV{=;RWbKLV=WW={r(W*M%=WVba=6V{%=L**1MWa%rRzP{aMraVrFLVV#R{aLPVzWVWFabRP{*M<rRabrpWzMb*%nWW{qFWVNrbL}{WMxVWr/LWm?MWa=rWz,#WW%a{P5zW=mW5bCPW*I%zW=bWFX*W%VWW{4FWbMP%Lj{WMBVbr}LL6URMaKrV*-KWR)aWPMzW==RWbEFz*-=WW,bLF0*W%iLzvFFWVx%WL%{WMGVWP%z=0gMWa6rLz6jWR<bzF*zW=sRWbzPW*S=WL%{%FS*W%ILr{ZFWVTrzL={WMfVWrLLWk2MWb%r*zq2WR_a{PtzW=2RW{=PW*w=WW=bWF<*Wr%L%{GFWV)rFLg{WMKazPrLWfHMWaFrWz+,WW%bRPZzL=XR*b2PW*YrWWRbWF=*W%=WW{PFWa%P%LC{*MeVbrHLW: MWb^rWz=UWRraWPTzW=}R*b2PW*y=WW5bzFY*W%WWW{wFWV=%WL={WM)Var/LW:IMLaurWzf");local n=0;a.OrtswZXP(function()a.l_AUETwD()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,f=s(0,s,e,o,a.lnJIKAgb);local function t()local n,l=a.lnJIKAgb(o,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local z=true;local z=0 local function j()local d=n();local e=n();local r=1;local d=(l(e,1,20)*(2^32))+d;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(d==z)then return e*0;else n=1;r=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return a.tdQzLncD(e,n-1023)*(r+(d/(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=a.zXsDCLOd(o,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+z),#l do e=e..a.zXsDCLOd(l,n,n)end return e;end;local z=#a.WmzbdsCM(c('\49.\48'))~=1 local e=n;local function ee(...)return{...},a.eiQVaQFH('#',...)end local function p()local c={};local h={};local e={};local s={h,c,nil,e};local e=n()local o={}for d=1,e do local l=f();local e;if(l==1)then e=(f()~=#{});elseif(l==2)then local n=j();if z and a.RVoryYFC(a.WmzbdsCM(n),'.(\48+)$')then n=a.ompRRnuu(n);end e=n;elseif(l==3)then e=_();end;o[d]=e;end;for e=1,n()do c[e-(#{1})]=p();end;s[3]=f();for c=1,n()do local e=f();if(l(e,1,1)==0)then local a=l(e,2,3);local f=l(e,4,6);local e={t(),t(),nil,nil};if(a==0)then e[d]=t();e[u]=t();elseif(a==#{1})then e[d]=n();elseif(a==b[2])then e[d]=n()-(2^16)elseif(a==b[3])then e[d]=n()-(2^16)e[u]=t();end;if(l(f,1,1)==1)then e[r]=o[e[r]]end if(l(f,2,2)==1)then e[d]=o[e[d]]end if(l(f,3,3)==1)then e[u]=o[e[u]]end h[c]=e;end end;return s;end;local function _(l,e,n)local d=e;local d=n;return c(a.RVoryYFC(a.RVoryYFC(({a.OrtswZXP(l)})[2],e),n))end local function y(k,e,c)local function y(...)local o,g,z,m,b,n,f,p,j,t,_,l;local e=0;while-1<e do if 3<=e then if e<5 then if e>=2 then for n=32,61 do if e~=3 then t=a.eiQVaQFH('#',...)-1;_={};break;end;p={};j={...};break;end;else t=a.eiQVaQFH('#',...)-1;_={};end else if e~=5 then e=-2;else l=s(7);end end else if 0<e then if-1<e then repeat if 2>e then z=s(6,21,3,99,k);b=ee m=0;break;end;n=-41;f=-1;until true;else n=-41;f=-1;end else o=s(6,7,1,55,k);g=s(6,4,2,37,k);end end e=e+1;end;for e=0,t do if(e>=z)then p[e-z]=j[e+1];else l[e]=j[e+1];end;end;local e=t-z+1 local e;local t;local function a(...)while true do end end while true do if n<-40 then n=n+42 end e=o[n];t=e[le];if t>11 then if t>17 then if 21>t then if t>=19 then if t>15 then for n=33,90 do if t<20 then l[e[r]]=c[e[d]];break;end;local n=e[r]local d,e=b(l[n](h(l,n+1,e[d])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;break;end;else local n=e[r]local d,e=b(l[n](h(l,n+1,e[d])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;end else do return end;end else if 23>t then if t~=20 then repeat if 22~=t then l(e[r],e[d]);break;end;if(l[e[r]]~=e[u])then n=n+1;else n=e[d];end;until true;else if(l[e[r]]~=e[u])then n=n+1;else n=e[d];end;end else if t>=21 then for n=42,69 do if t~=24 then local n=e[r];local d=l[e[d]];l[n+1]=d;l[n]=d[e[u]];break;end;l[e[r]]=(e[d]~=0);break;end;else l[e[r]]=(e[d]~=0);end end end else if t>=15 then if t<=15 then local t,s,z,k,a;l[e[r]]=c[e[d]];n=n+1;e=o[n];t=e[r];s=l[e[d]];l[t+1]=s;l[t]=s[e[u]];n=n+1;e=o[n];l(e[r],e[d]);n=n+1;e=o[n];t=e[r]z,k=b(l[t](h(l,t+1,e[d])))f=k+t-1 a=0;for e=t,f do a=a+1;l[e]=z[a];end;n=n+1;e=o[n];t=e[r]l[t]=l[t](h(l,t+1,f))n=n+1;e=o[n];l[e[r]]();n=n+1;e=o[n];do return end;else if 12<t then for a=23,75 do if 16<t then if(l[e[r]]~=e[u])then n=n+1;else n=e[d];end;break;end;n=e[d];break;end;else n=e[d];end end else if 12<t then if 13<t then l[e[r]]=c[e[d]];else local n=e[r]local d,e=b(l[n](h(l,n+1,e[d])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;end else local n=e[r];local d=l[e[d]];l[n+1]=d;l[n]=d[e[u]];end end end else if 5>=t then if t<=2 then if t<1 then for t=0,3 do if t<=1 then if t>-3 then for a=18,89 do if t~=1 then l[e[r]]=(e[d]~=0);n=n+1;e=o[n];break;end;c[e[d]]=l[e[r]];n=n+1;e=o[n];break;end;else c[e[d]]=l[e[r]];n=n+1;e=o[n];end else if t~=0 then for a=33,85 do if 2~=t then if(l[e[r]]~=e[u])then n=n+1;else n=e[d];end;break;end;l[e[r]]=c[e[d]];n=n+1;e=o[n];break;end;else if(l[e[r]]~=e[u])then n=n+1;else n=e[d];end;end end end else if t>=-3 then for n=49,69 do if 2>t then l[e[r]]();break;end;c[e[d]]=l[e[r]];break;end;else c[e[d]]=l[e[r]];end end else if 4<=t then if 4==t then c[e[d]]=l[e[r]];else local e=e[r]l[e]=l[e](h(l,e+1,f))end else local t,c,a,o,f;local n=0;while n>-1 do if 2<n then if 5>n then if 0~=n then for e=12,65 do if 4~=n then o=t[a];break;end;f=t[c];break;end;else o=t[a];end else if n>5 then n=-2;else l(f,o);end end else if 1>n then t=e;else if n>=-2 then repeat if n<2 then c=r;break;end;a=d;until true;else a=d;end end end n=n+1 end end end else if t>8 then if t<10 then for t=0,6 do if t>2 then if 4<t then if 4<=t then repeat if t>5 then c[e[d]]=l[e[r]];break;end;l[e[r]]=(e[d]~=0);n=n+1;e=o[n];until true;else l[e[r]]=(e[d]~=0);n=n+1;e=o[n];end else if t~=0 then repeat if 3<t then c[e[d]]=l[e[r]];n=n+1;e=o[n];break;end;l(e[r],e[d]);n=n+1;e=o[n];until true;else l(e[r],e[d]);n=n+1;e=o[n];end end else if 0<t then if t~=1 then c[e[d]]=l[e[r]];n=n+1;e=o[n];else l(e[r],e[d]);n=n+1;e=o[n];end else c[e[d]]=l[e[r]];n=n+1;e=o[n];end end end else if t>8 then repeat if 10~=t then l[e[r]]();break;end;do return end;until true;else l[e[r]]();end end else if t<7 then local e=e[r]l[e]=l[e](h(l,e+1,f))else if t>=6 then for a=49,94 do if 8>t then l[e[r]]=(e[d]~=0);break;end;n=e[d];break;end;else l[e[r]]=(e[d]~=0);end end end end end n=1+n;end;end;return y end;local d=0xff;local c={};local t=(1);local r='';(function(n)local l=n local o=0x00 local e=0x00 l={(function(a)if o>0x2e then return a end o=o+1 e=(e+0x553-a)%0x27 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x1e);end return true end)'hwYai'and l[0x3](0x152+a))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x48);c[t]=ne();t=t+d;end return true end)'bKsom'and l[0x2](a+0x263))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb9);d[2]=(d[2]*(_(function()c()end,h(r))-_(d[1],h(r))))+1;c[t]={};d=d[2];t=t+d;end return true end)'_Iqfk'and l[0x1](a+0x257))or a end),(function(f)if o>0x2c then return f end o=o+1 e=(e+0x9a6-f)%0x33 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xaf);r={r..'\58 a',r};c[t]=p();t=t+((not a.A_xRIWfw)and 1 or 0);r[1]='\58'..r[1];d[2]=0xff;end return true end)'sdCmx'and l[0x1](0x3a7+f))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf0);r='\37';d={function()d()end};r=r..'\100\43';end return true end)'AlbkP'and l[0x2](f+0x1b2))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb7);end return true end)'fqve_'and l[0x3](f+0x265))or f end),(function(d)if o>0x2a then return d end o=o+1 e=(e+0x5a6-d)%0x1b return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd);end return true end)'qkCeO'and l[0x1](0x314+d))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x54);end return true end)'qaLkP'and l[0x3](d+0x139))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7b);end return true end)'EBqBu'and l[0x2](d+0x318))or d end)}l[0x2](0x290)end){};local e=y(h(c));return e(...);end return _((function()local n={}local e=0x01;local l;if a.A_xRIWfw then l=a.A_xRIWfw(_)else l=''end if a.RVoryYFC(l,a.xWMWsKzJ)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,l,r,d,t)local t;if 4<=e then if 5>=e then if 4==e then local e=r;local o,a,r=d(2);do return function()local t,d,l,n=n(l,e(e,e),e(e,e)+3);e(4);return(n*o)+(l*a)+(d*r)+t;end;end;else local e=r;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;end else if e>=7 then if e~=7 then do return l(e,nil,l);end else do return setmetatable({},{['__\99\97\108\108']=function(e,l,r,d,n)if n then return e[n]elseif d then return e else e[l]=r end end})end end else do return d[l]end;end end else if 2<=e then if 1<=e then repeat if e~=3 then do return 16777216,65536,256 end;break;end;do return n(1),n(4,d,r,l,n),n(5,d,r,l)end;until true;else do return 16777216,65536,256 end;end else if e>-1 then for t=36,62 do if 1~=e then do return n(1),n(4,d,r,l,n),n(5,d,r,l)end;break;end;do return function(l,e,n)if n then local e=(l/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;end;break;end;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 end end end),...)