Advertisement
Swept_dev

test

Jun 15th, 2024 (edited)
7,156
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.24 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _kFiUsmwxjsOs = a; end)); return(function(h,...)local s;local t;local r;local o;local d;local f;local e=24915;local n=0;local l={};while n<838 do n=n+1;while n<0x1a3 and e%0x47a2<0x23d1 do n=n+1 e=(e-439)%7273 local a=n+e if(e%0xe4e)>0x727 then e=(e*0x3bf)%0x36e while n<0x26e and e%0x14ec<0xa76 do n=n+1 e=(e+445)%28134 local r=n+e if(e%0x436a)>=0x21b5 then e=(e-0x324)%0xc178 local e=25935 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.OsdfULvQ(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then t[e]=function(n,e)return h(8,nil,h,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 elseif e%2~=0 then e=(e+0x8d)%0x593d local e=30132 if not l[e]then l[e]=0x1 f=string;end else e=(e*0x1b9)%0x2be6 n=n+1 local e=79079 if not l[e]then l[e]=0x1 o={};end end end elseif e%2~=0 then e=(e*0xa0)%0xabd while n<0xcc and e%0x1368<0x9b4 do n=n+1 e=(e+447)%41390 local t=n+e if(e%0x3542)<=0x1aa1 then e=(e+0x1d0)%0xb33e local e=12524 if not l[e]then l[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\79\115\100\102\85\76\118\81\0\6\115\116\114\105\110\103\4\99\104\97\114\97\95\114\95\98\87\95\118\0\6\115\116\114\105\110\103\3\115\117\98\67\101\65\87\95\103\117\86\0\6\115\116\114\105\110\103\4\98\121\116\101\104\86\88\83\106\86\68\118\0\5\116\97\98\108\101\6\99\111\110\99\97\116\113\109\108\86\66\66\114\110\0\5\116\97\98\108\101\6\105\110\115\101\114\116\88\71\83\68\80\75\79\71\5";end elseif e%2~=0 then e=(e-0x2c5)%0x7ac8 local e=35246 if not l[e]then l[e]=0x1 end else e=(e+0x1ff)%0xb463 n=n+1 local e=18274 if not l[e]then l[e]=0x1 end end end else e=(e+0x1e7)%0x1afe n=n+1 while n<0x1d7 and e%0x1586<0xac3 do n=n+1 e=(e-976)%22256 local d=n+e if(e%0x1e10)>0xf08 then e=(e*0x28f)%0x675b local e=67213 if not l[e]then l[e]=0x1 s=tonumber;end elseif e%2~=0 then e=(e*0xd4)%0x3546 local e=34137 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e*0x3a7)%0x96db n=n+1 local e=51776 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end end end e=(e+80)%13038 end d(r);local n={};for e=0x0,0xff do local l=o.a_r_bW_v(e);n[e]=l;n[l]=e;end local function c(e)return n[e];end local f=(function(r,d)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local f=r while true do n[0x03][o.CeAW_guV(d,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=#d while e<t+0x01 do n[0x02][l]=o.CeAW_guV(d,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.XGSDPKOG(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+f)%0x100)));f=r+f;end end return o.qmlVBBrn(n[0x01])end);d(f(105,"sD;F)Kj1in?lb:9.nb"));d(f(120,"}LA!eX+M)K7z2P4u))L+xzKeL7KKA+7M22zeeP2PX)27X_2L+Mu7XKuLKMze!P!{7z!L2ee2z)eKPKePuOXXj!K)7K!XA)zA!Lz4e277A24K+>P+e2PuMM7fA4A!72!AzL!4zu4XPXXL42+!uoXLPKM)w27AuzzLA4XtP22PeK4e+C)XMeueMPL)K)#!7KA4zPAuK2AMPAue)eM!4P)e6X)XL2KLA27LA7z2!PzM!)P4XMPAMX4KMA7eAuQ+KPA!z2!u27L!zueeuLXeuPMe4u)A72!eAu7L!L2eAu2!ePzPXK2+)A4!L77L+LnK)!L!72ei2!A!PAue)/MeuM)!f2KALLK4Lu))LK2!APz1e2P++4)I9P;eMKtAKeLX!4!Xz+eZzKe!P!e7P2+2u)))H!))LX!ez4zX!+2O!K2!X!2KX2uS+M4L+7ueK!ze!P!Nz7!K2+Xe74X227+zu!X+ KMe72!+Az7X!ezX!zPeXX2AML42M7PM)4kKA)ze7XALz2!)XPe+PeXu4MMAu4X!4PKXu4M2LzzL2P"));local e=(-1430+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>111 then return e end l=l+1 n=(n-736)%15101 if(n%1674)>=837 then n=(n*926)%43027 return e else return e(e(e))end return e(e(e))end)return n;end)())local ne=(getfenv)or(function()return _ENV end);local u=o.Ydp_QRTk or o.Zdlpxkhm;local d=2;local r=4;local t=3;local te=1;local function _(b,...)local a=f(e,"_fsQvh;0pwkgBA=YY0=iAXBFg1=gwjpd0NBpBvgvkNwQvksYfYhsQfQ0A=60YwYvApAhgsghkQphps;QhYv=vvshf=fvg==QAYBA0YgvwYwv0f;BhBhwQ=sYsvfkYw===QpYBvkYkvpf0B;B;wv=QYQvfffkYw===QpYgAkfwwp=QYQ(;svwvkQkgxgwwEp/08kAgYkYw=0Q0h;QvYQQvvQsfw2=Y0YQgpBwgvkvwhp=hf0v;vhsAPBkgekLwT=BAYBfgvgQkvws0w;=h0=+AvB.gjk{Y0=fAABhhevAQVsZfdhYhgs;QwfhsQ AP0YpAkAQwYgQQ3v0fo,IY/QvQpswsQBbY;=wABBh0bg0wfwQQl0q;svYvvshfQfvYh=vwRA0gwgvwpv+hA;YhYv=sQshfQB1=;gQ07;0hOv,Qr;ppv0v;os0QhQvgYkmwxp(0T0hhFvoQ)sffj8.Y+Ys=vBTgckXwsp 0M;y;sh0Q4sFfb<hY1=^AV=;Bfklw1p70;;Vhfv^Q;s*fv%0Y>= ARB;glkfw,pv00;rh4vUQ0s ffquYN=hAWBFg/kfw&p&0+0shgvzQ{sRfQn/Ya=n=sB=gGkfwepv0t;Ghq;eQBsLffltYf=)A0BUBsg;w#pQ0W;fh3vKQesDfkFiYf=!AQBxgck6wTpB0u;zh>vTQ,ssfcHtYs=qA}Bmgfk2wfp*0};Qh*v QNsffRi+Yb={AmB!g&k^");local n=0;o.PYaMhEkx(function()o.WceMaFzS()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,c=h(0,h,e,a,o.hVXSjVDv);local function f()local l,n=o.hVXSjVDv(a,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local k=true;local k=0 local function g()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==k)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.Sqnu_DGj(e,n-1023)*(d+(t/(2^52)));end;local p=n;local function z(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=o.CeAW_guV(a,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+k),#l do e=e..o.CeAW_guV(l,n,n)end return e;end;local k=#o.HQsUPdfv(s('\49.\48'))~=1 local e=n;local function j(...)return{...},o.mRylrGvi('#',...)end local function _()local s={};local e={};local h={};local u={s,h,nil,e};local e=n()local a={}for t=1,e do local l=c();local n;if(l==1)then n=(c()~=#{});elseif(l==2)then local e=g();if k and o.AAXdrCqf(o.HQsUPdfv(e),'.(\48+)$')then e=o.vCUuVLcq(e);end n=e;elseif(l==0)then n=z();end;a[t]=n;end;for h=1,n()do local e=c();if(l(e,1,1)==0)then local o=l(e,2,3);local c=l(e,4,6);local e={f(),f(),nil,nil};if(o==0)then e[t]=f();e[r]=f();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]=f();end;if(l(c,1,1)==1)then e[d]=a[e[d]]end if(l(c,2,2)==1)then e[t]=a[e[t]]end if(l(c,3,3)==1)then e[r]=a[e[r]]end s[h]=e;end end;for e=1,n()do h[e-(#{1})]=_();end;u[3]=c();return u;end;local function m(l,e,n)local t=e;local t=n;return s(o.AAXdrCqf(o.AAXdrCqf(({o.PYaMhEkx(l)})[2],e),n))end local function le(g,e,a)local function ee(...)local f,m,s,_,k,n,c,p,b,z,y,l;local e=0;while-1<e do if e<=2 then if e>0 then if e>=-2 then repeat if 2>e then s=h(6,74,3,31,g);k=j _=0;break;end;n=-41;c=-1;until true;else s=h(6,74,3,31,g);k=j _=0;end else f=h(6,19,1,45,g);m=h(6,62,2,11,g);end else if 4<e then if e>=3 then for n=41,59 do if 6~=e then l=h(7);break;end;e=-2;break;end;else l=h(7);end else if e>=2 then for n=45,69 do if e>3 then z=o.mRylrGvi('#',...)-1;y={};break;end;p={};b={...};break;end;else p={};b={...};end end end e=e+1;end;for e=0,z do if(e>=s)then p[e-s]=b[e+1];else l[e]=b[e+1];end;end;local e=z-s+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=f[n];o=e[te];if o<=11 then if o>5 then if o>=9 then if 9<o then if 8<o then repeat if o<11 then l[e[d]]=(e[t]~=0);break;end;l[e[d]]=a[e[t]];until true;else l[e[d]]=a[e[t]];end else local r,a,c,f,o;local n=0;while n>-1 do if 3>n then if 0>=n then r=e;else if n==1 then a=d;else c=t;end end else if n>=5 then if n~=2 then for e=32,67 do if n~=6 then l(o,f);break;end;n=-2;break;end;else l(o,f);end else if 3~=n then o=r[a];else f=r[c];end end end n=n+1 end end else if 7>o then l[e[d]]();else if 5~=o then repeat if o<8 then n=e[t];break;end;local n=e[d]local t,e=k(l[n](u(l,n+1,e[t])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;until true;else n=e[t];end end end else if 3<=o then if 4>o then do return end;else if o>=3 then repeat if 5>o then a[e[t]]=l[e[d]];break;end;do return end;until true;else a[e[t]]=l[e[d]];end end else if 1<=o then if-1<=o then for n=38,81 do if 1<o then l[e[d]]=(e[t]~=0);break;end;l[e[d]]=a[e[t]];break;end;else l[e[d]]=(e[t]~=0);end else local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[r]];end end end else if 18>o then if o>=15 then if o>15 then if o>=15 then repeat if 16~=o then if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;break;end;n=e[t];until true;else n=e[t];end else local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[r]];end else if o>=13 then if o~=14 then a[e[t]]=l[e[d]];else local o,s,b,g,h;l[e[d]]=a[e[t]];n=n+1;e=f[n];o=e[d];s=l[e[t]];l[o+1]=s;l[o]=s[e[r]];n=n+1;e=f[n];l(e[d],e[t]);n=n+1;e=f[n];o=e[d]b,g=k(l[o](u(l,o+1,e[t])))c=g+o-1 h=0;for e=o,c do h=h+1;l[e]=b[h];end;n=n+1;e=f[n];o=e[d]l[o]=l[o](u(l,o+1,c))n=n+1;e=f[n];l[e[d]]();n=n+1;e=f[n];do return end;end else local e=e[d]l[e]=l[e](u(l,e+1,c))end end else if 20<o then if 22>o then for o=0,3 do if 2>o then if o>-4 then for r=38,75 do if 0~=o then a[e[t]]=l[e[d]];n=n+1;e=f[n];break;end;l[e[d]]=(e[t]~=0);n=n+1;e=f[n];break;end;else a[e[t]]=l[e[d]];n=n+1;e=f[n];end else if-2<o then for c=42,60 do if 3~=o then l[e[d]]=a[e[t]];n=n+1;e=f[n];break;end;if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;break;end;else if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;end end end else if 22~=o then local e=e[d]l[e]=l[e](u(l,e+1,c))else l[e[d]]();end end else if o>=19 then if o~=16 then for f=16,86 do if o~=20 then if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;break;end;local n=e[d]local t,e=k(l[n](u(l,n+1,e[t])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=t[e];end;break;end;else if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;end else l(e[d],e[t]);end end end end n=1+n;end;end;return ee end;local t=0xff;local c={};local f=(1);local d='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(o)if r>0x1e then return o end r=r+1 e=(e+0xe84-o)%0x27 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe6);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'BqqME'and l[0x2](0x24c+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x41);end return true end)'xFGos'and l[0x3](o+0x2b5))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd0);end return true end)'iwxcx'and l[0x1](o+0x90))or o end),(function(a)if r>0x26 then return a end r=r+1 e=(e+0x1000-a)%0x2b return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe7);d={d..'\58 a',d};c[f]=_();f=f+((not o.ZXA_jAQo)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'YYnvp'and l[0x2](0x65+a))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf2);t[2]=(t[2]*(m(function()c()end,u(d))-m(t[1],u(d))))+1;c[f]={};t=t[2];f=f+t;end return true end)'Ooeqi'and l[0x1](a+0x321))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4a);c[f]=ne();f=f+t;end return true end)'Wplez'and l[0x3](a+0x1ba))or a end),(function(t)if r>0x28 then return t end r=r+1 e=(e+0x10da-t)%0x1b return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xec);end return true end)'WpPzF'and l[0x3](0x10f+t))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x61);end return true end)'M_YBn'and l[0x1](t+0x302))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x84);end return true end)'LCRhL'and l[0x2](t+0x153))or t end)}l[0x1](0x170c)end){};local e=le(u(c));return e(...);end return _((function()local n={}local e=0x01;local l;if o.ZXA_jAQo then l=o.ZXA_jAQo(_)else l=''end if o.AAXdrCqf(l,o.JDyhVDO_)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 l<=3 then if 2>l then if l>=-1 then for o=17,57 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(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;else 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;end else if l>=0 then for o=14,73 do if l~=2 then do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;break;end;do return 16777216,65536,256 end;break;end;else do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;end end else if l>=6 then if 7>l then do return t[n]end;else if 6<l then repeat if l~=7 then do return n(l,nil,n);end break;end;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 until true;else do return n(l,nil,n);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,o,t=t(2);do return function()local e,n,r,f=e(n,l(l,l),l(l,l)+3);l(4);return(f*d)+(r*o)+(n*t)+e;end;end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement