-
Notifications
You must be signed in to change notification settings - Fork 2
Expand file tree
/
Copy pathTripleHubV2.txt
More file actions
1 lines (1 loc) · 13.2 KB
/
TripleHubV2.txt
File metadata and controls
1 lines (1 loc) · 13.2 KB
1
([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _SyaamQxplATS = a; end)); return(function(h,...)local d;local o;local s;local f;local a;local t;local e=24915;local n=0;local l={};while n<471 do n=n+1;while n<0x1e0 and e%0x3826<0x1c13 do n=n+1 e=(e+495)%46351 local r=n+e if(e%0x4402)>=0x2201 then e=(e*0xe2)%0x6ce1 while n<0x22c and e%0x1068<0x834 do n=n+1 e=(e+41)%40904 local f=n+e if(e%0x3d12)<0x1e89 then e=(e-0xf)%0x60d3 local e=70315 if not l[e]then l[e]=0x1 t=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=a.byte(n(0x01))local e=n(e)if l=="\2"then e=o.CSEjflmD(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then d[e]=function(e,n)return h(8,nil,h,n,e)end elseif l=="\4"then e=d[e]elseif l=="\0"then e=d[e][n(a.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end elseif e%2~=0 then e=(e*0x30c)%0xbaa0 local e=34128 if not l[e]then l[e]=0x1 end else e=(e*0x2ee)%0x8074 n=n+1 local e=92417 if not l[e]then l[e]=0x1 end end end elseif e%2~=0 then e=(e-0x394)%0x25a3 while n<0x2e9 and e%0x1a02<0xd01 do n=n+1 e=(e*655)%34336 local t=n+e if(e%0x48e2)<=0x2471 then e=(e-0x347)%0x6513 local e=81394 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end elseif e%2~=0 then e=(e*0x2a3)%0x766e local e=30466 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end else e=(e*0x2d)%0xb960 n=n+1 local e=17438 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\67\83\69\106\102\108\109\68\0\6\115\116\114\105\110\103\4\99\104\97\114\81\104\99\108\95\122\82\66\0\6\115\116\114\105\110\103\3\115\117\98\75\76\73\85\111\97\75\98\0\6\115\116\114\105\110\103\4\98\121\116\101\71\117\71\100\67\73\105\117\0\5\116\97\98\108\101\6\99\111\110\99\97\116\121\119\75\76\115\67\90\87\0\5\116\97\98\108\101\6\105\110\115\101\114\116\97\85\117\105\73\67\66\69\5";end end end else e=(e*0x1e2)%0xa9e3 n=n+1 while n<0x27c and e%0x3140<0x18a0 do n=n+1 e=(e*453)%48694 local d=n+e if(e%0x1cee)<0xe77 then e=(e*0x39b)%0x9200 local e=9056 if not l[e]then l[e]=0x1 a=string;end elseif e%2~=0 then e=(e*0x34b)%0xa080 local e=41369 if not l[e]then l[e]=0x1 o={};end else e=(e*0x2d3)%0xba7c n=n+1 local e=69069 if not l[e]then l[e]=0x1 s=tonumber;end end end end end e=(e+420)%3922 end t(f);local e={};for n=0x0,0xff do local l=o.Qhcl_zRB(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local a=(function(r,t)local f,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local a=r while true do n[0x03][o.KLIUoaKb(t,e,(function()e=f+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]=o.KLIUoaKb(t,e,(function()e=f+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.aUuiICBE(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+a)%0x100)));a=r+a;end end return o.ywKLsCZW(n[0x01])end);t(a(195,"Ku>3FVRAGZ=YoWc5F>"));t(a(95,"ZmbL?W=s%>E:5(iaEm?%W=a%>sba(W=aE(Ei=_a>>(b?(ss?a5EELE(sE?(Es5%%m5::=sU%%5?%i?=%bi(WsEa=?=i:as>ELb(%saa.:(W%ibs:ms:=s%:?W:=>-:EE?bi%%b5m5EWamLEL?>(5%(m(5%s(iE:sbi%EbaL>5i%bmsWWW(a=>%?5iW=am(:EW5(a%=Lmabbb5:(L==m=:.?>a>%sL:5>=:m=:e?=ibE=La:?W?m>:(a%>5%5L5(:%(b>5(baas: ?=a=%Lm:E:W?E>?EWii>>bLiim=bm?>sW%aWs?bmsWmWii>(?%(>Emm:5:=:LW=b_sm?:MWWas>=bi(?=iiE:ELW5(%cmi(Ws%:pW===a?>=?m(:m(b(5s=Ea5>a?%im>%LmE%=:aL:>?%%Eb(L((ssE,5EaW%atsLmL(EsEm%Es?m>EL5?%i:%Lb>(o?5i(>m?aab=:bE:m8>E5:E?(aW%abii0W?a(5sWb(Ws(b5(LmW:E5?W>&(Ebi.ib%>b(5isbasE%b=(>%>o>:%s,Ei"));local e=(-2707+(function()local o,n=0,1;(function(e,n,d,l)n(n(e,l,l,n)and e(l,e,n,e),n(e,l,d,e),n(e,d,n,d)and l(n,e and n,e,l),l(e,n,l,e))end)(function(l,d,t,e)if o>477 then return l end o=o+1 n=(n*932)%9642 if(n%766)>383 then return l else return t(d(t,e,d,t),e(d and t,t,l and l,l),e(e,l and t,t,d and l),l(e,t,d,d)and l(t,l,t,l and e))end return e(d(e,d,l and t,d),d(d and l,e,e,d),l(d and e,e,e,d),e(l,d and e,e,t and e))end,function(d,t,e,l)if o>451 then return t end o=o+1 n=(n+49)%1602 if(n%564)>282 then n=(n+799)%40877 return e else return e(d(t and l,t,d,t),t(e and e,l,e,e and l),l(l,l,l,d and t)and l(d and e,l,e,l),d(l,t,t and e,t))end return t(e(e and e,e,e,d),d(e,d,l and d,e),e(e,d,d,e),d(l,l,d,l))end,function(t,l,e,d)if o>158 then return l end o=o+1 n=(n*153)%11454 if(n%1324)<662 then n=(n*192)%6245 return t else return e(t(l,l,d,t),t(t,e,l,l),e(d,e,e,e and t),d(d,d and e,t,e))end return d(d(d,d,e,l),e(e,t,d,l),d(e,l,t,l)and e(e and l,d,e,l),d(l,t,l,t))end,function(d,l,e,t)if o>440 then return l end o=o+1 n=(n-722)%42657 if(n%1054)>=527 then return e(t(e,d,e and t,t),l(e,l,d and e,d),l(e and d,e,t,e),l(e,l and e,l,e and l))else return l end return d end)return n;end)())local le=(getfenv)or(function()return _ENV end);local c=o.bDCiheSL or o.cyqGiPuc;local t=3;local d=2;local ne=1;local r=4;local function y(b,...)local u=a(e,"W/H(bV<1)E=f6w4m)=e<)EM6E//EEV/)Ef<</VE)/11//H=bfV(=fE(6fm=EH<fV(MVQm)Vbw1V=(/6)b6wEqEwHV)w4V=E)1Hwm1b=b11m6169b1)mE)w%/)(6HE6//Em/<V/F/=<HE=f/(=)HE<EHH)Hwb)4w)Vfw46EV)wfV=4jH==HHV4fVwm<(F461/mm1<5<1<n6)w&HEH?<EV/1=B/b= HE<</4=wH41(yEfE(mf4(66E(ff4d4f<b=wfVmEwV4wV<k4)H6wb<)mE1w)4/6EH/VE)1=m/E=TV))/114H)=(HH1=/REH6bV46)bf64E4b(6<b)fybV6<bVf6<y4/Vf4(Vm44b<4=<)4f<mmfV/a1)=!f/4=EHH=VH)/1Ew/HE)H==4Hm=E(/=ww)b66mVHwVV)wfV44/<V41<=4w)Hm<1<mE165V)HQV))/wEV//Eb/1Em/w=iH(66(H=6HmfH(ff)(6f4bb6bbfwVbwwTV(w6VEwwVm4<1x4)<f441)mb1)m=1wG=)(U<)E8w)m/HEVH==4/4=/Hb=4H==w(^6V()fE(wfmbb6Vb)6f<4w)Vbw)V=w4<d4b<<mf1)4m1VmV16mf147/)b/H)=34E3/<E</EE6/m=<HV=)Hf=4(/f<(1f=bV6kb(6<b=66VdwHVVm(Vfw4</4V<14=<wm+1(m<1Em6");local n=0;o.OjeHmswR(function()o.vVgIieCO()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,f=h(0,h,e,u,o.GuGdCIiu);local function a()local l,n=o.GuGdCIiu(u,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local m=true;local m=0 local function k()local d=n();local e=n();local t=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==m)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return o.YfbcEKUu(e,n-1023)*(t+(d/(2^52)));end;local _=n;local function y(n)local l;if(not n)then n=_();if(n==0)then return'';end;end;l=o.KLIUoaKb(u,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+m),#l do e=e..o.KLIUoaKb(l,n,n)end return e;end;local m=#o.BqKBTQgi(s('\49.\48'))~=1 local e=n;local function g(...)return{...},o.GOxbDKY_('#',...)end local function p()local s={};local h={};local e={};local u={s,h,nil,e};local e=n()local c={}for d=1,e do local l=f();local n;if(l==0)then n=(f()~=#{});elseif(l==3)then local e=k();if m and o.ZjYcwCoE(o.BqKBTQgi(e),'.(\48+)$')then e=o.VfCUdCQh(e);end n=e;elseif(l==2)then n=y();end;c[d]=n;end;for u=1,n()do local e=f();if(l(e,1,1)==0)then local o=l(e,2,3);local f=l(e,4,6);local e={a(),a(),nil,nil};if(o==0)then e[t]=a();e[r]=a();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[r]=a();end;if(l(f,1,1)==1)then e[d]=c[e[d]]end if(l(f,2,2)==1)then e[t]=c[e[t]]end if(l(f,3,3)==1)then e[r]=c[e[r]]end s[u]=e;end end;for e=1,n()do h[e-(#{1})]=p();end;u[3]=f();return u;end;local function j(l,n,e)local d=n;local d=e;return s(o.ZjYcwCoE(o.ZjYcwCoE(({o.OjeHmswR(l)})[2],n),e))end local function ee(m,e,u)local function z(...)local a,z,b,y,s,l,f,j,_,k,p,n;local e=0;while-1<e do if 2<e then if 5>e then if e>0 then for n=27,54 do if e~=3 then k=o.GOxbDKY_('#',...)-1;p={};break;end;j={};_={...};break;end;else k=o.GOxbDKY_('#',...)-1;p={};end else if 4<=e then repeat if 6~=e then n=h(7);break;end;e=-2;until true;else n=h(7);end end else if 1<=e then if-3~=e then repeat if 1<e then l=-41;f=-1;break;end;b=h(6,31,3,61,m);s=g y=0;until true;else b=h(6,31,3,61,m);s=g y=0;end else a=h(6,80,1,42,m);z=h(6,36,2,92,m);end end e=e+1;end;for e=0,k do if(e>=b)then j[e-b]=_[e+1];else n[e]=_[e+1];end;end;local e=k-b+1 local e;local o;local function h(...)while true do end end while true do if l<-40 then l=l+42 end e=a[l];o=e[ne];if 12>o then if o<=5 then if 3<=o then if 3>=o then n[e[d]]=(e[t]~=0);else if o>=2 then repeat if 4<o then if(n[e[d]]==e[r])then l=l+1;else l=e[t];end;break;end;local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[r]];until true;else local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[r]];end end else if o<=0 then for o=0,3 do if 2<=o then if o==3 then if(n[e[d]]==e[r])then l=l+1;else l=e[t];end;else n[e[d]]=u[e[t]];l=l+1;e=a[l];end else if-1<o then for f=31,68 do if o>0 then u[e[t]]=n[e[d]];l=l+1;e=a[l];break;end;n[e[d]]=(e[t]~=0);l=l+1;e=a[l];break;end;else u[e[t]]=n[e[d]];l=l+1;e=a[l];end end end else if-2<o then for h=46,84 do if 2>o then local d=e[d];local l=n[e[t]];n[d+1]=l;n[d]=l[e[r]];break;end;local o,b,k,m,h;n[e[d]]=u[e[t]];l=l+1;e=a[l];o=e[d];b=n[e[t]];n[o+1]=b;n[o]=b[e[r]];l=l+1;e=a[l];n(e[d],e[t]);l=l+1;e=a[l];o=e[d]k,m=s(n[o](c(n,o+1,e[t])))f=m+o-1 h=0;for e=o,f do h=h+1;n[e]=k[h];end;l=l+1;e=a[l];o=e[d]n[o]=n[o](c(n,o+1,f))l=l+1;e=a[l];n[e[d]]();l=l+1;e=a[l];do return end;break;end;else local o,b,k,m,h;n[e[d]]=u[e[t]];l=l+1;e=a[l];o=e[d];b=n[e[t]];n[o+1]=b;n[o]=b[e[r]];l=l+1;e=a[l];n(e[d],e[t]);l=l+1;e=a[l];o=e[d]k,m=s(n[o](c(n,o+1,e[t])))f=m+o-1 h=0;for e=o,f do h=h+1;n[e]=k[h];end;l=l+1;e=a[l];o=e[d]n[o]=n[o](c(n,o+1,f))l=l+1;e=a[l];n[e[d]]();l=l+1;e=a[l];do return end;end end end else if o<9 then if 7<=o then if 4<o then for l=21,78 do if 7~=o then u[e[t]]=n[e[d]];break;end;local e=e[d]n[e]=n[e](c(n,e+1,f))break;end;else u[e[t]]=n[e[d]];end else n(e[d],e[t]);end else if 10<=o then if 8<=o then for n=13,87 do if o<11 then do return end;break;end;l=e[t];break;end;else l=e[t];end else do return end;end end end else if 18>o then if 14>=o then if 13<=o then if 11<o then repeat if o~=13 then local l=e[d]local d,e=s(n[l](c(n,l+1,e[t])))f=e+l-1 local e=0;for l=l,f do e=e+1;n[l]=d[e];end;break;end;local l=e[d]local d,e=s(n[l](c(n,l+1,e[t])))f=e+l-1 local e=0;for l=l,f do e=e+1;n[l]=d[e];end;until true;else local l=e[d]local d,e=s(n[l](c(n,l+1,e[t])))f=e+l-1 local e=0;for l=l,f do e=e+1;n[l]=d[e];end;end else local e=e[d]n[e]=n[e](c(n,e+1,f))end else if 15<o then if 17>o then n[e[d]]();else n[e[d]]=(e[t]~=0);end else local f,r,c,o,a;local l=0;while l>-1 do if l<3 then if l<=0 then f=e;else if l~=2 then r=d;else c=t;end end else if l>4 then if l>3 then repeat if l>5 then l=-2;break;end;n(a,o);until true;else n(a,o);end else if l>3 then a=f[r];else o=f[c];end end end l=l+1 end end end else if 20<o then if o<22 then if(n[e[d]]==e[r])then l=l+1;else l=e[t];end;else if 20~=o then repeat if o>22 then n[e[d]]=u[e[t]];break;end;l=e[t];until true;else l=e[t];end end else if 18<o then if 15<o then for l=39,52 do if 20>o then n[e[d]]=u[e[t]];break;end;n[e[d]]();break;end;else n[e[d]]();end else u[e[t]]=n[e[d]];end end end end l=1+l;end;end;return z end;local d=0xff;local u={};local f=(1);local t='';(function(n)local l=n local a=0x00 local e=0x00 l={(function(r)if a>0x26 then return r end a=a+1 e=(e+0x11d9-r)%0x21 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x47);t={t..'\58 a',t};u[f]=p();f=f+((not o.VhdKXGCo)and 1 or 0);t[1]='\58'..t[1];d[2]=0xff;end return true end)'WiyLh'and l[0x2](0x152+r))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe3);end return true end)'YTnsY'and l[0x3](r+0x16a))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x77);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'_ibMh'and l[0x1](r+0x1fc))or r end),(function(o)if a>0x2a then return o end a=a+1 e=(e+0x8cf-o)%0xa return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xef);end return true end)'IIMwZ'and l[0x1](0x330+o))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc4);end return true end)'sZ_Cw'and l[0x2](o+0x268))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf6);d[2]=(d[2]*(j(function()u()end,c(t))-j(d[1],c(t))))+1;u[f]={};d=d[2];f=f+d;end return true end)'ZfSbo'and l[0x3](o+0x6f))or o end),(function(t)if a>0x29 then return t end a=a+1 e=(e+0xbe7-t)%0x31 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x1);u[f]=le();f=f+d;end return true end)'AQiIb'and l[0x1](0x288+t))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb3);end return true end)'ZFfEy'and l[0x2](t+0x27c))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x2);end return true end)'GMemD'and l[0x3](t+0x158))or t end)}l[0x1](0x1aee)end){};local e=ee(c(u));return e(...);end return y((function()local n={}local e=0x01;local l;if o.VhdKXGCo then l=o.VhdKXGCo(y)else l=''end if o.ZjYcwCoE(l,o.DpjSKFDe)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,d,t,o)local o;if 3<l then if 5<l then if 6>=l then do return t[n]end;else if 8==l then do return n(l,nil,n);end else do return setmetatable({},{['__\99\97\108\108']=function(e,d,t,l,n)if n then return e[n]elseif l then return e else e[d]=t end end})end end end else if l>4 then local l=d;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;else local l=d;local d,a,o=t(2);do return function()local f,t,n,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*d)+(n*a)+(t*o)+f;end;end;end end else if 2>l then if-1<=l then for o=33,61 do if 1>l then do return e(1),e(4,t,d,n,e),e(5,t,d,n)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 e(1),e(4,t,d,n,e),e(5,t,d,n)end;end else if l>2 then do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;else do return 16777216,65536,256 end;end end end end),...)