Advertisement
Robloxadoptmesript

Untitled

Aug 26th, 2024
252
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.30 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _XMdnJhccpACK = a; end)); return(function(u,...)local s;local t;local f;local o;local r;local d;local e=24915;local n=0;local l={};while n<853 do n=n+1;while n<0x348 and e%0xd70<0x6b8 do n=n+1 e=(e-386)%10724 local a=n+e if(e%0x205c)<=0x102e then e=(e*0x219)%0x6709 while n<0xa3 and e%0x1bfe<0xdff do n=n+1 e=(e-372)%48093 local d=n+e if(e%0x44f2)>=0x2279 then e=(e*0x2fe)%0x1b6e local e=55492 if not l[e]then l[e]=0x1 o={};end elseif e%2~=0 then e=(e*0x1df)%0x4d1f local e=53651 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e-0x1d8)%0x6368 n=n+1 local e=1195 if not l[e]then l[e]=0x1 r=string;end end end elseif e%2~=0 then e=(e+0x2af)%0x39ca while n<0xb0 and e%0x2f94<0x17ca do n=n+1 e=(e*693)%39476 local a=n+e if(e%0x4db8)>0x26dc then e=(e-0x335)%0x6029 local e=32768 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=r.byte(l(0x01))local e=l(e)if n=="\2"then e=o.QYCisGZc(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(e,n)return u(8,nil,u,n,e)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][l(r.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end elseif e%2~=0 then e=(e-0x59)%0xad0c local e=79240 if not l[e]then l[e]=0x1 end else e=(e*0x1b)%0xef0 n=n+1 local e=11407 if not l[e]then l[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\81\89\67\105\115\71\90\99\0\6\115\116\114\105\110\103\4\99\104\97\114\89\100\84\112\80\121\72\119\0\6\115\116\114\105\110\103\3\115\117\98\88\76\122\74\83\82\67\119\0\6\115\116\114\105\110\103\4\98\121\116\101\112\112\70\87\108\72\82\110\0\5\116\97\98\108\101\6\99\111\110\99\97\116\80\105\120\71\104\105\69\75\0\5\116\97\98\108\101\6\105\110\115\101\114\116\90\88\97\116\101\66\66\117\5";end end end else e=(e*0x9e)%0xc186 n=n+1 while n<0x7d and e%0x3052<0x1829 do n=n+1 e=(e+268)%36510 local d=n+e if(e%0x4b7c)>=0x25be then e=(e+0x3d2)%0x8102 local e=75118 if not l[e]then l[e]=0x1 s=tonumber;end elseif e%2~=0 then e=(e+0x375)%0xa923 local e=76205 if not l[e]then l[e]=0x1 end else e=(e*0x20a)%0xba75 n=n+1 local e=20806 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end end end e=(e+215)%5603 end d(f);local e={};for n=0x0,0xff do local l=o.YdTpPyHw(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local r=(function(f,r)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=f while true do n[0x03][o.XLzJSRCw(r,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=#r while e<t+0x01 do n[0x02][l]=o.XLzJSRCw(r,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.ZXateBBu(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=f+d;end end return o.PixGhiEK(n[0x01])end);d(r(18,"nqp8F&0zXd=kvJwaa8"));d(r(180,"S%b)r8n0->NF!kpGr!>p80Nrpp)%-b!0Fv8!F>Gkr!nkk8)nnrNk%-nN>G-!k>>u!G%>01F!GGb>0GkN%G-0F7G)GkrkOr8b>8pn)-nNNb%b)>Fn^nb!0>0R!b0F!-%b88NnpFk8->!>b-n)FrHNrk-r!R)p00knG!G-r-Gk)k>!k!!80-F!O>n-N!GG%8>bFk%>rGF-p%p!r?G))%-!k%%80wN>Q-r%-pprb>0p!)GZr>-rGn%N000r!)8pF> )niN0GnW)>)!F%k0n!bp88pN%-:!!-F!%%8n!F)kG)%>kpbbN08!NNnG%08Gbr)-0prf-0-N6p8p!)!Gr)F-Fk-bbn8FnGF88N)pG)k0bN8G0rNrI>%r!-8kbb-nk8N%88NN-p8))-0!>%G8%FGp)b8>!pn!!%Nk8%Nn-N8G)r00Np0tb0GN%%8r)>8-!k>>lkpb%0b!rGb)+-kpFbpn-F8g>tqrpO0r8>-kkb0-rF_GN)G>>pGr0-8prF!I!!%j%n+Nt->)n--k0b)0b-GG%8rN?p-%)08!FF%"));local e=(-42383+(function()local t,l=0,1;(function(e,n)n(e(n,e),e(n,e))end)(function(e,n)if t>199 then return n end t=t+1 l=(l-71)%38008 if(l%272)<136 then return e else return e(e(e and e,n),e(e,n))end return e(e(n and n,n),e(n,n)and n(n and n,e))end,function(e,n)if t>345 then return n end t=t+1 l=(l-612)%42623 if(l%344)<=172 then l=(l*699)%639 return n(e(n,n)and e(e,e),e(e,e))else return n end return n end)return l;end)())local c=o.RsBsIqSY or o.akQsKAlj;local y=(getfenv)or(function()return _ENV end);local t=2;local d=3;local f=4;local ee=1;local function j(b,...)local a=r(e,"V0_*;xBS,!%UE3FQ;0S;%FF,_*B*!B3)X%,EQ__EB_S*EU0;3U*U;F,,E_xJ!F3!03j;,;E0QF*0_BUS3U_SKF!,3;yU;%Sx%3Q,_*xEx_F*}Qx;,_S;3U*SS0%%E!0x;3;;U;EU3*0!;B,7U%x*,BUxrB;%B1U,F3_SBFS!UxQSFSx;x%!;EFS UBQm_BB*B;!*E3*3S!UUQ,_!Bx%!F0a!07,QEBQ0_3B!B3%F0S;QxS!_30kES;%!F,___SB_E33U02;%UBQ0Q3*b!U%BF_0B,F30QS30pF;;SFU,x!,33*5x3U_3;F,,E_;!%x3Q0,*S,*UUQ00QS%U_F*__xx!U%%#x*%S;%QQ_QQBE%B3F%SF%0%x;,F*;S0!33%_*xF!BESXB*!TExB,}U%Q;_FSS%_3E0Bx0,%E;QF;%,U%EFB_WBG!;EFl,x;,;UBQz_%BS!F3,0_S_!3EGQ%*;S;%,F*0Ex,!HEF1x*FS,U_Q__BB0!%3,CQ;,,_UEQ3*8BU%;3F_!x_,EEBm0*%S;%FQ%*BxE!B3.00;;SFU,r;*nBB%03%0!;F,,E_0E*QSi%UF;0Qx,!*EE0,;US%USFF_EB_!E3B0o;Q,;E_Q,**BE%BFI0%xQ,FE!D_;zSBUzF%_;SB!,3_RE;B,NUEQ;_FS;%_3E0Bx0,%ExQF*,,*%EFB_NxU!;EFl,;_SEUBQ5");local n=0;o.cAKZSoLC(function()o.oOUunjir()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,h=u(0,u,e,a,o.ppFWlHRn);local function r()local n,l=o.ppFWlHRn(a,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local k=true;local k=0 local function z()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.wArQaKhE(e,n-1023)*(d+(t/(2^52)));end;local p=n;local function _(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=o.XLzJSRCw(a,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+k),#l do e=e..o.XLzJSRCw(l,n,n)end return e;end;local p=#o.uwwybIOV(s('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.TRKYcoat('#',...)end local function j()local s={};local k={};local e={};local u={k,s,nil,e};local e=n()local a={}for t=1,e do local l=h();local n;if(l==0)then n=(h()~=#{});elseif(l==2)then local e=z();if p and o.riTDvcvP(o.uwwybIOV(e),'.(\48+)$')then e=o.CYpplKak(e);end n=e;elseif(l==1)then n=_();end;a[t]=n;end;u[3]=h();for u=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local c=l(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[d]=r();e[f]=r();elseif(o==#{1})then e[d]=n();elseif(o==b[2])then e[d]=n()-(2^16)elseif(o==b[3])then e[d]=n()-(2^16)e[f]=r();end;if(l(c,1,1)==1)then e[t]=a[e[t]]end if(l(c,2,2)==1)then e[d]=a[e[d]]end if(l(c,3,3)==1)then e[f]=a[e[f]]end k[u]=e;end end;for e=1,n()do s[e-(#{1})]=j();end;return u;end;local function g(l,n,e)local t=n;local t=e;return s(o.riTDvcvP(o.riTDvcvP(({o.cAKZSoLC(l)})[2],n),e))end local function m(_,e,h)local function j(...)local r,g,s,j,b,n,a,p,k,z,y,l;local e=0;while-1<e do if 3<=e then if e<5 then if e~=0 then repeat if e>3 then z=o.TRKYcoat('#',...)-1;y={};break;end;p={};k={...};until true;else p={};k={...};end else if 5==e then l=u(7);else e=-2;end end else if e>0 then if e~=2 then s=u(6,1,3,93,_);b=ne j=0;else n=-41;a=-1;end else r=u(6,15,1,77,_);g=u(6,6,2,54,_);end end e=e+1;end;for e=0,z do if(e>=s)then p[e-s]=k[e+1];else l[e]=k[e+1];end;end;local e=z-s+1 local e;local o;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=r[n];o=e[ee];if o>=12 then if 18>o then if o>=15 then if o<16 then for o=0,3 do if 2>o then if-3~=o then repeat if o~=0 then h[e[d]]=l[e[t]];n=n+1;e=r[n];break;end;l[e[t]]=(e[d]~=0);n=n+1;e=r[n];until true;else h[e[d]]=l[e[t]];n=n+1;e=r[n];end else if o~=0 then for a=24,84 do if 3~=o then l[e[t]]=h[e[d]];n=n+1;e=r[n];break;end;if(l[e[t]]==e[f])then n=n+1;else n=e[d];end;break;end;else l[e[t]]=h[e[d]];n=n+1;e=r[n];end end end else if o>=14 then repeat if o~=16 then do return end;break;end;l[e[t]]=(e[d]~=0);until true;else l[e[t]]=(e[d]~=0);end end else if 12>=o then local e=e[t]l[e]=l[e](c(l,e+1,a))else if o~=14 then l[e[t]]=(e[d]~=0);else if(l[e[t]]==e[f])then n=n+1;else n=e[d];end;end end end else if o<21 then if o<=18 then local n=e[t];local t=l[e[d]];l[n+1]=t;l[n]=t[e[f]];else if o<20 then local n=e[t]local t,e=b(l[n](c(l,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;l[n]=t[e];end;else l[e[t]]=h[e[d]];end end else if o<22 then local o,a,f,r,c;local n=0;while n>-1 do if 2>=n then if 0>=n then o=e;else if n>=0 then for e=18,98 do if 1<n then f=d;break;end;a=t;break;end;else a=t;end end else if 5>n then if 1<n then for e=10,79 do if 4~=n then r=o[f];break;end;c=o[a];break;end;else r=o[f];end else if n==5 then l(c,r);else n=-2;end end end n=n+1 end else if o~=21 then for r=28,82 do if o~=22 then n=e[d];break;end;if(l[e[t]]==e[f])then n=n+1;else n=e[d];end;break;end;else n=e[d];end end end end else if o>5 then if o<=8 then if o>6 then if 4<=o then for n=36,83 do if o~=7 then local o,r,a,c,f;local n=0;while n>-1 do if n<=2 then if n>=1 then if n<2 then r=t;else a=d;end else o=e;end else if n>4 then if n>=1 then repeat if 6>n then l(f,c);break;end;n=-2;until true;else n=-2;end else if 1<=n then repeat if 3~=n then f=o[r];break;end;c=o[a];until true;else f=o[r];end end end n=n+1 end break;end;h[e[d]]=l[e[t]];break;end;else h[e[d]]=l[e[t]];end else l[e[t]]();end else if 10>o then l[e[t]]=h[e[d]];else if o==10 then local e=e[t]l[e]=l[e](c(l,e+1,a))else local n=e[t]local t,e=b(l[n](c(l,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;l[n]=t[e];end;end end end else if o<3 then if 1>o then h[e[d]]=l[e[t]];else if o~=-1 then repeat if 2~=o then n=e[d];break;end;l[e[t]]();until true;else n=e[d];end end else if o<=3 then local n=e[t];local t=l[e[d]];l[n+1]=t;l[n]=t[e[f]];else if 3<o then for u=28,75 do if 5~=o then local o,s,p,_,k;for u=0,6 do if 3<=u then if u>4 then if u~=5 then l[e[t]]();else o=e[t]l[o]=l[o](c(l,o+1,a))n=n+1;e=r[n];end else if 4>u then l[e[t]]=(e[d]~=0);n=n+1;e=r[n];else o=e[t]p,_=b(l[o](c(l,o+1,e[d])))a=_+o-1 k=0;for e=o,a do k=k+1;l[e]=p[k];end;n=n+1;e=r[n];end end else if u>=1 then if u>0 then for a=36,58 do if 2>u then o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];break;end;l(e[t],e[d]);n=n+1;e=r[n];break;end;else o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];end else l[e[t]]=h[e[d]];n=n+1;e=r[n];end end end break;end;do return end;break;end;else local o,s,p,_,k;for u=0,6 do if 3<=u then if u>4 then if u~=5 then l[e[t]]();else o=e[t]l[o]=l[o](c(l,o+1,a))n=n+1;e=r[n];end else if 4>u then l[e[t]]=(e[d]~=0);n=n+1;e=r[n];else o=e[t]p,_=b(l[o](c(l,o+1,e[d])))a=_+o-1 k=0;for e=o,a do k=k+1;l[e]=p[k];end;n=n+1;e=r[n];end end else if u>=1 then if u>0 then for a=36,58 do if 2>u then o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];break;end;l(e[t],e[d]);n=n+1;e=r[n];break;end;else o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[f]];n=n+1;e=r[n];end else l[e[t]]=h[e[d]];n=n+1;e=r[n];end end end end end end end end n=1+n;end;end;return j end;local d=0xff;local h={};local f=(1);local t='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(o)if r>0x29 then return o end r=r+1 e=(e+0x796-o)%0x1c return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x41);end return true end)'_WkZa'and l[0x3](0x19f+o))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x73);end return true end)'CMnxD'and l[0x1](o+0x1d1))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x20);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'eIM_h'and l[0x2](o+0x33c))or o end),(function(a)if r>0x29 then return a end r=r+1 e=(e+0x6f4-a)%0x42 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x13);t={t..'\58 a',t};h[f]=j();f=f+((not o.EavXUtzc)and 1 or 0);t[1]='\58'..t[1];d[2]=0xff;end return true end)'SPSPt'and l[0x2](0x2c6+a))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x29);end return true end)'ZJajl'and l[0x1](a+0x108))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x9f);d[2]=(d[2]*(g(function()h()end,c(t))-g(d[1],c(t))))+1;h[f]={};d=d[2];f=f+d;end return true end)'VXiuj'and l[0x3](a+0xf3))or a end),(function(t)if r>0x27 then return t end r=r+1 e=(e+0xc7c-t)%0x18 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x18);end return true end)'nUgMI'and l[0x2](0x369+t))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7e);h[f]=y();f=f+d;end return true end)'fseQZ'and l[0x1](t+0x3c4))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x60);end return true end)'dlfPd'and l[0x3](t+0x3d8))or t end)}l[0x1](0x1e7d)end){};local e=m(c(h));return e(...);end return j((function()local n={}local e=0x01;local l;if o.EavXUtzc then l=o.EavXUtzc(j)else l=''end if o.riTDvcvP(l,o.ZFjEvzTU)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,o)local o;if l>=4 then if l<=5 then if 1<l then for o=25,86 do if 5~=l then local l=t;local t,o,d=d(2);do return function()local e,n,f,r=e(n,l(l,l),l(l,l)+3);l(4);return(r*t)+(f*o)+(n*d)+e;end;end;break;end;local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;break;end;else local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;end else if 7<=l then if 4<=l then repeat if l<8 then do return setmetatable({},{['__\99\97\108\108']=function(e,t,l,d,n)if n then return e[n]elseif d then return e else e[t]=l end end})end break;end;do return n(l,nil,n);end until true;else do return n(l,nil,n);end end else do return d[n]end;end end else if l>=2 then if 1<=l then repeat if l>2 then do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;do return 16777216,65536,256 end;until true;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end else if l>-3 then for o=18,76 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 end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement