Advertisement
NightGolden

Untitled

Jun 7th, 2024
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.37 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _odszdXAndPiR = a; end)); return(function(c,...)local d;local t;local a;local u;local f;local o;local e=24915;local n=0;local l={};while n<449 do n=n+1;while n<0x329 and e%0x3268<0x1934 do n=n+1 e=(e*35)%44558 local r=n+e if(e%0x2d10)<0x1688 then e=(e*0x10e)%0x2730 while n<0x14d and e%0x416a<0x20b5 do n=n+1 e=(e*739)%14392 local t=n+e if(e%0x4d70)>=0x26b8 then e=(e-0x2fd)%0x3e9a local e=3036 if not l[e]then l[e]=0x1 o=string;end elseif e%2~=0 then e=(e+0xf7)%0xe9 local e=4485 if not l[e]then l[e]=0x1 end else e=(e*0x169)%0x48f6 n=n+1 local e=75572 if not l[e]then l[e]=0x1 f={};end end end elseif e%2~=0 then e=(e*0x1e0)%0x4aeb while n<0x20f and e%0x2c02<0x1601 do n=n+1 e=(e+810)%21851 local d=n+e if(e%0x2522)>0x1291 then e=(e*0xe0)%0xa8ed local e=46564 if not l[e]then l[e]=0x1 u=tonumber;end elseif e%2~=0 then e=(e-0x38d)%0x3ef4 local e=53175 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e-0xbd)%0x40d9 n=n+1 local e=50743 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end else e=(e-0x143)%0x5dcb n=n+1 while n<0x2be and e%0x2c6a<0x1635 do n=n+1 e=(e-47)%42328 local r=n+e if(e%0x44d0)>0x2268 then e=(e+0x220)%0xf88 local e=99966 if not l[e]then l[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\88\97\115\108\86\87\97\116\0\6\115\116\114\105\110\103\4\99\104\97\114\82\112\100\109\110\115\65\74\0\6\115\116\114\105\110\103\3\115\117\98\75\113\95\73\85\117\106\103\0\6\115\116\114\105\110\103\4\98\121\116\101\108\118\71\69\90\80\121\82\0\5\116\97\98\108\101\6\99\111\110\99\97\116\120\114\89\102\99\120\97\66\0\5\116\97\98\108\101\6\105\110\115\101\114\116\105\65\70\88\67\103\81\115\5";end elseif e%2~=0 then e=(e+0x29f)%0x2399 local e=26506 if not l[e]then l[e]=0x1 end else e=(e*0x14b)%0x910f n=n+1 local e=12483 if not l[e]then l[e]=0x1 d=function(d)local e=0x01 local function l(n)e=e+n return d:sub(e-n,e-0x01)end while true do local n=l(0x01)if(n=="\5")then break end local e=o.byte(l(0x01))local e=l(e)if n=="\2"then e=f.XaslVWat(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(n,e)return c(8,nil,c,e,n)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][l(o.byte(l(0x01)))];end local n=l(0x08)f[n]=e end end end end end end end e=(e*359)%23095 end d(a);local e={};for n=0x0,0xff do local l=f.RpdmnsAJ(n);e[n]=l;e[l]=n;end local function h(n)return e[n];end local a=(function(r,o)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=r while true do n[0x03][f.Kq_IUujg(o,e,(function()e=a+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#o while e<t+0x01 do n[0x02][l]=f.Kq_IUujg(o,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 f.iAFXCgQs(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=r+d;end end return f.xrYfcxaB(n[0x01])end);d(a(188,"J lk5{/#0iqazOd<5i"));d(a(222,"d_{i?E2%0ZasTf4p{{?afZpT_TiEET%%i2s04s!E{ai4%20iZ2T%45P{iTpr_iacsEfE-{{?{<E_Z3ZgaTT%4a1s4s__Z4T{fsS{{a_T%?2fs?sEpspf_%40_;ZpT{4{ps{{ifpf0%Zff{4ioa__E2%sZ20pTfpp{Zf?pa0EZsfL42aE{4?02sa^sas2pa_f?%2TE%0_a40qaaii?%%0Ziaff44f{{i_E?0zZsaf4Epi{_E{Es2sZs2TZ_V{iiEi02aiT0as4Ep4{0E_ZT0aafT4a4f&2E%_ZsT04sPE_??_?ZZaapTZ00aZLi{4E0%fsE4Tp0_%{ENr{2s?f_p%_aiaEi%aZET?Taka{T?i?_Ep0Z2y0%_0{%?a%2Z_E?4EjP{?i%Es0Ea?Ta4T8T a?4EuZ_EB%?!E{h??E%%saEspTEwi.?{%%x%sZ%%MZi{6??Ef0?aTaZp{_%{0i?%2%wsZ24Z{{_iEE4%ZZZTTT{40JF?p?E%?s4TP0as=isE_02ZTEsf4-2{s?f%{%%ZTsZfW_ki42_2?i%"));local e=(-5424+(function()local t,l=0,1;(function(n,e)e(e(e,e),n(e,e)and n(e,n))end)(function(n,e)if t>259 then return e end t=t+1 l=(l+30)%6016 if(l%1582)>=791 then return n else return n(e(e,n),n(e and e,n))end return n(n(e and e,e),e(n,n))end,function(e,n)if t>479 then return e end t=t+1 l=(l*919)%33694 if(l%1260)>=630 then l=(l*431)%611 return n(e(n and e,n),e(e,e))else return e end return e end)return l;end)())local z=(getfenv)or(function()return _ENV end);local _=f.cGcBCjSM or f.hlljFhHg;local t=3;local d=2;local j=1;local o=4;local function g(b,...)local r=a(e,"0Ohsfb?3S,U(P1AwS?wP3UwS3?w(3hw>?AsP1?f,1wf,1fbs?R11bUwOb?1fbhO1(1s((SO(U(h3UOOs(hhAUsh?,1h33UO,,hOLSwO??3OS,?OhOAU3OU,SO?AcSOws?wwSbUwf?3w1?3whwAUswU3Sw?PSbU1,?OSPbW1ObhP,}h13swPwwUPSfSPsf?(bsOP.hwUPA?((h((fh?bPi3U3hbUh*b,bOOfP{Nb(U?hSUhhk,ASsw(Sbw(Of,wOnSAGPA,33AU33wP?f1?s1ASbPP?b1Pfwm3hAP?UAS(ffbPwfbbA1PbU1Sb?Ahbh1HfAPPfwPSf?PffsPQsA(PfPPss?(fsh(shAUPhU(UhPUfhhUphb,POU,SsPUSOh,8lA,hVUS,K?S,VhSf=?3PwU3SwP3fws3IAA3AAU?SA??bAh?i1AbPAObS1?bf1hbNPwfP1PfAP?fbPhf?(AsP(UbSPSsf(ss=UwhPU(hSP?fxUhhO,AO1,UOP,?sfUAO>SwlPS(zSSAkfUhO13AwP3Uw,3?w?3hwF3AAP?UAS?SAf?hA#bAA(bU1Sb?1bbh1dfA");local n=0;f.FUrPJCDC(function()f.umZeKzme()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,h=c(0,c,e,r,f.lvGEZPyR);local function a()local l,n=f.lvGEZPyR(r,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local s=true;local s=0 local function k()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==s)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 f.JlmuxAIT(e,n-1023)*(d+(t/(2^52)));end;local p=n;local function g(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=f.Kq_IUujg(r,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+s),#l do e=e..f.Kq_IUujg(l,n,n)end return e;end;local m=#f.tXvvkGCK(u('\49.\48'))~=1 local e=n;local function ee(...)return{...},f.HLBoCPxX('#',...)end local function p()local s={};local c={};local e={};local u={s,c,nil,e};local e=n()local r={}for t=1,e do local l=h();local n;if(l==2)then n=(h()~=#{});elseif(l==1)then local e=k();if m and f.MpslC_ow(f.tXvvkGCK(e),'.(\48+)$')then e=f.UXSHfrsT(e);end n=e;elseif(l==0)then n=g();end;r[t]=n;end;for e=1,n()do c[e-(#{1})]=p();end;u[3]=h();for u=1,n()do local e=h();if(l(e,1,1)==0)then local f=l(e,2,3);local c=l(e,4,6);local e={a(),a(),nil,nil};if(f==0)then e[t]=a();e[o]=a();elseif(f==#{1})then e[t]=n();elseif(f==b[2])then e[t]=n()-(2^16)elseif(f==b[3])then e[t]=n()-(2^16)e[o]=a();end;if(l(c,1,1)==1)then e[d]=r[e[d]]end if(l(c,2,2)==1)then e[t]=r[e[t]]end if(l(c,3,3)==1)then e[o]=r[e[o]]end s[u]=e;end end;return u;end;local function k(l,e,n)local t=e;local t=n;return u(f.MpslC_ow(f.MpslC_ow(({f.FUrPJCDC(l)})[2],e),n))end local function ne(s,e,r)local function y(...)local a,y,h,k,m,n,p,_,u,b,g,l;local e=0;while-1<e do if e>2 then if 5<=e then if 5~=e then e=-2;else l=c(7);end else if 3==e then _={};u={...};else b=f.HLBoCPxX('#',...)-1;g={};end end else if 1>e then a=c(6,35,1,47,s);y=c(6,65,2,19,s);else if e>=-2 then repeat if e~=2 then h=c(6,59,3,48,s);m=ee k=0;break;end;n=-41;p=-1;until true;else n=-41;p=-1;end end end e=e+1;end;for e=0,b do if(e>=h)then _[e-h]=u[e+1];else l[e]=u[e+1];end;end;local e=b-h+1 local e;local f;local function c(...)while true do end end while true do if n<-40 then n=n+42 end e=a[n];f=e[j];if f<=10 then if 5<=f then if f<=7 then if f>=6 then if 4~=f then for c=39,79 do if f>6 then l[e[d]]={};break;end;l[e[d]]=r[e[t]];n=n+1;e=a[n];l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];l[e[d]][l[e[t]]]=e[o];n=n+1;e=a[n];do return l[e[d]]end n=n+1;e=a[n];do return end;break;end;else l[e[d]]={};end else for f=0,3 do if 2<=f then if 0<f then repeat if f>2 then if(l[e[d]]~=e[o])then n=n+1;else n=e[t];end;break;end;l[e[d]]=r[e[t]];n=n+1;e=a[n];until true;else l[e[d]]=r[e[t]];n=n+1;e=a[n];end else if-4~=f then repeat if 1>f then l[e[d]]=(e[t]~=0);n=n+1;e=a[n];break;end;r[e[t]]=l[e[d]];n=n+1;e=a[n];until true;else l[e[d]]=(e[t]~=0);n=n+1;e=a[n];end end end end else if 9>f then n=e[t];else if 5~=f then repeat if 10>f then l[e[d]]=r[e[t]];break;end;n=e[t];until true;else l[e[d]]=r[e[t]];end end end else if f<=1 then if 1~=f then l[e[d]][l[e[t]]]=e[o];else l[e[d]]=(e[t]~=0);end else if f<3 then do return l[e[d]]end else if 1<f then for n=43,85 do if 4>f then r[e[t]]=l[e[d]];break;end;l[e[d]]=(e[t]~=0);break;end;else l[e[d]]=(e[t]~=0);end end end end else if 16>f then if 13<=f then if 13<f then if 14<f then if(l[e[d]]~=e[o])then n=n+1;else n=e[t];end;else r[e[t]]=l[e[d]];end else l[e[d]]={};end else if f~=8 then repeat if 12>f then l[e[d]]=l[e[t]][e[o]];break;end;l[e[d]]=l[e[t]][e[o]];until true;else l[e[d]]=l[e[t]][e[o]];end end else if f<19 then if f>16 then if f<18 then do return l[e[d]]end else do return end;end else do return end;end else if 20<=f then if 20==f then l[e[d]][l[e[t]]]=e[o];else l[e[d]]=r[e[t]];end else if(l[e[d]]~=e[o])then n=n+1;else n=e[t];end;end end end end n=1+n;end;end;return y end;local d=0xff;local c={};local o=(1);local t='';(function(n)local l=n local a=0x00 local e=0x00 l={(function(f)if a>0x2c then return f end a=a+1 e=(e+0x10a1-f)%0x1c return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb1);end return true end)'icHAs'and l[0x3](0x17e+f))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa);end return true end)'iDHFI'and l[0x1](f+0xc8))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa1);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'feorZ'and l[0x2](f+0xcb))or f end),(function(r)if a>0x25 then return r end a=a+1 e=(e+0xef6-r)%0x1f return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x9a);t={t..'\58 a',t};c[o]=p();o=o+((not f.bxcTcZZr)and 1 or 0);t[1]='\58'..t[1];d[2]=0xff;end return true end)'KwFeq'and l[0x3](0x2b0+r))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x61);end return true end)'eQJh_'and l[0x1](r+0x14b))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x30);c[o]=z();o=o+d;end return true end)'CtMJR'and l[0x2](r+0x33c))or r end),(function(f)if a>0x23 then return f end a=a+1 e=(e+0x584-f)%0x4e return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc5);end return true end)'iaPQA'and l[0x1](0x20b+f))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x92);d[2]=(d[2]*(k(function()c()end,_(t))-k(d[1],_(t))))+1;c[o]={};d=d[2];o=o+d;end return true end)'pShSz'and l[0x2](f+0xf4))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x8f);end return true end)'ZAuTQ'and l[0x3](f+0xfc))or f end)}l[0x1](0x9a0)end){};local e=ne(_(c));return e(...);end return g((function()local n={}local e=0x01;local l;if f.bxcTcZZr then l=f.bxcTcZZr(g)else l=''end if f.MpslC_ow(l,f.DzQvUyYQ)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,f)local f;if l>=4 then if l<6 then if l>=0 then for f=25,73 do if l>4 then local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;break;end;local l=t;local d,t,f=d(2);do return function()local e,a,o,n=e(n,l(l,l),l(l,l)+3);l(4);return(n*d)+(o*t)+(a*f)+e;end;end;break;end;else local l=t;local f,a,o=d(2);do return function()local t,d,n,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*f)+(n*a)+(d*o)+t;end;end;end else if 6>=l then do return d[n]end;else if 4<l then for e=17,96 do if l<8 then do return setmetatable({},{['__\99\97\108\108']=function(e,l,t,d,n)if n then return e[n]elseif d then return e else e[l]=t end end})end break;end;do return n(l,nil,n);end break;end;else do return n(l,nil,n);end end end end else if l<=1 then if l>=-3 then for f=21,58 do if l~=0 then 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;break;end;do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end else if 3~=l then do return 16777216,65536,256 end;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement