Advertisement
eodejmocmocm

real

Feb 29th, 2024
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.63 KB | Gaming | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _EnWatiMzYZQf = a; end)); return(function(h,...)local d;local a;local o;local c;local u;local t;local e=24915;local n=0;local l={};while n<936 do n=n+1;while n<0x142 and e%0x34ec<0x1a76 do n=n+1 e=(e*454)%18839 local r=n+e if(e%0x296e)<0x14b7 then e=(e-0x387)%0x9fae while n<0xac and e%0x1bb4<0xdda do n=n+1 e=(e*806)%27133 local c=n+e if(e%0x38c0)>=0x1c60 then e=(e+0x198)%0xa5fe local e=1348 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e+0x2cd)%0xa445 local e=21957 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=a.HgCzfvDV(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(n,e)return h(8,nil,h,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)a[n]=e end end end else e=(e+0xb4)%0x6282 n=n+1 local e=73023 if not l[e]then l[e]=0x1 u=tonumber;end end end elseif e%2~=0 then e=(e*0xb5)%0x158 while n<0x310 and e%0x2f3e<0x179f do n=n+1 e=(e+120)%2142 local t=n+e if(e%0x29da)<=0x14ed then e=(e*0x1d)%0x31ec local e=56159 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\72\103\67\122\102\118\68\86\0\6\115\116\114\105\110\103\4\99\104\97\114\108\107\80\74\74\105\114\71\0\6\115\116\114\105\110\103\3\115\117\98\85\97\76\99\82\101\65\90\0\6\115\116\114\105\110\103\4\98\121\116\101\87\77\103\83\85\71\121\102\0\5\116\97\98\108\101\6\99\111\110\99\97\116\67\119\76\113\76\73\121\98\0\5\116\97\98\108\101\6\105\110\115\101\114\116\120\104\72\88\118\71\71\68\5";end elseif e%2~=0 then e=(e-0x33)%0x37ff local e=75550 if not l[e]then l[e]=0x1 end else e=(e*0x22)%0xc1d5 n=n+1 local e=41997 if not l[e]then l[e]=0x1 end end end else e=(e-0x24f)%0x6c78 n=n+1 while n<0x1ca and e%0x1b9e<0xdcf do n=n+1 e=(e*419)%12591 local d=n+e if(e%0x9ea)<0x4f5 then e=(e*0x290)%0x90c7 local e=40136 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end elseif e%2~=0 then e=(e+0x3bd)%0x5eed local e=65639 if not l[e]then l[e]=0x1 a={};end else e=(e-0x24)%0x3ee5 n=n+1 local e=46002 if not l[e]then l[e]=0x1 o=string;end end end end end e=(e-539)%7947 end d(c);local e={};for n=0x0,0xff do local l=a.lkPJJirG(n);e[n]=l;e[l]=n;end local function f(n)return e[n];end local c=(function(c,d)local r,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local o=c while true do n[0x03][a.UaLcReAZ(d,e,(function()e=r+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]=a.UaLcReAZ(d,e,(function()e=r+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 a.xhHXvGGD(n[0x01],(f((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+o)%0x100)));o=c+o;end end return a.CwLqLIyb(n[0x01])end);d(c(94,"?Qk#1F2MrSfN-mBHfM"));d(c(107,"4oR^;hwx SbqMHZFSh^}^RM hqZx oAF;o^wHMwSIowxRRM ^xMMwSU^SRHRw w FV ^R^q R q ;FFbhooMqw; bR^R^qb;wZcxqIR Rowbww%H; FFw;;HFZoxxibSw^CqZFoZZxxoFb^^Hbq;hvl H^RqR^nZqoRbqbS^RHbw^ShSooZq;hMZSw{ZMb;o^Mb;LHZ .qbhxh^HbxZ3MSS^HqFwxZSxFoZbMRZZbhFF^S o;Mb;Z RoRRqR;qZox;3lSbR SFh HFwwoq M;ZHhFZS SMoZq;h^ZooxoqbS;LMwhHFbxMtFqMh MSh ooxbHewxwqFSSYowbH;bMwhRvxS oFMq;^FhR>qwqw;HHSx^fZb;^Zbw^hMqw TMb HqxRx;FqSxRhq hZFx Zo;bqRwbFwbH;RxMGqZ;xZFx bbb7^qH^w :axwAbqq^^HFxS1FSZHW"));local e=(-1383+(function()local d,t=0,1;(function(l,n,t,e)e(e(t,e and n,l,e)and n(n,l,t and n,l),n(n,l,e,t),e(e,t,l and e,t),n(l,n,l,t and l))end)(function(l,e,n,o)if d>488 then return o end d=d+1 t=(t+927)%46497 if(t%724)<362 then t=(t*175)%33789 return n else return e(l(o,e,n,e),l(n,l,n,l),o(l and l,l,l,n),n(e,e,e,l and l))end return o(n(o and n,e,o,l),e(n and l,l,e,e)and l(e,e,e,l),n(e and n,e,l and n,e)and o(e,e,n and o,e),n(o,e,n,o)and l(n,n,l,n))end,function(e,l,o,n)if d>180 then return e end d=d+1 t=(t+459)%14727 if(t%252)<=126 then return e else return e(l(o and n,n,l and e,n),l(l,e,n,e),l(o,l and n,o,l),o(e,l,n,e and e)and n(n,l,o,e))end return l(e(e,n,e and o,n),e(n,e,n,o),l(o,l,o,e),o(l,n,n,l and n))end,function(e,o,n,l)if d>438 then return l end d=d+1 t=(t*639)%47008 if(t%1408)>704 then t=(t+285)%49945 return o else return e(e(e and n,o,e,o),e(o,o and n,l and e,l),n(n,n and e,e,o and n),e(e,l and n,n,l and l))end return n(e(n,e,o,n),n(o,n,l,l),n(e,o,n,l),l(e,o,e,l and e))end,function(n,o,e,l)if d>100 then return e end d=d+1 t=(t+340)%41291 if(t%1190)>595 then return l(l(n and o,l,o and l,e),e(l,n,e,n),n(l,o,n,l and o),o(o,n,o,o)and n(e,e,e and e,e))else return l end return n end)return t;end)())local s=a.RIieWnQn or a.XVnuQKoC;local ne=(getfenv)or(function()return _ENV end);local t=3;local le=1;local r=4;local d=2;local function ee(b,...)local f=c(e,"xnEapR=*U7.vw%5c.7pp5=UUEv%g=5n8vEvvR*CR7c%%UREOwE=pp5nwv5Rw%R7Rp=*REcvUR.cw5v.cRncE*7E%w%=vVnwp=pc%.pac5%=pE*wp==X7vpE7c5.Cp(*na7vpR=cU55.pp*capEE.wc*p:c=w=Rcn.Rcp5=U.E7%q=amav=p75.pUpn%RUEnU*EpnSR.*pUwcUaEaUER.%7p7nwUwE5%;%.UUE.wU=%%==%QccpURa%7=*nnRwERUs*7=pv5v*cE5wn=cn!vUpvc=75c.%n*cncUaRwG.7cp75c7REv7apw%*v*p%c*75kn5.n*wRR.cw757cE*cE*%E7%5*Rcvw.pv55U*a5*vE=v5=r#En_vRp7557cpE5E*vEEv%4*7.aw%5U}Eawp==zU.vpw557;pp%%*=nUv.Rcc5.3pEc=7%EUw.=wnpvjREcpvwRE%.*wn5w==EbR.=pw5.7OaE%)*EnpvwRUcv7wpE5pUEEpw==cN..%p5co.=ap%=*UnvvwR5X#vppw5=UUE.%a=5n1vE==ZE7Uav%w*cEIwE=pE=.%p.5%U5an%E*=n=w.=wcw.np35*UpE=wU=.4c.5RncE7*a=%U*.nwwa=dlE.pp=5UUwEww5*7nEvpR=c77.a%%5UFaUwp==_U.vpw557;aE%p*=nUv.");local n=0;a.GBy_pGlp(function()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,c=h(0,h,e,f,a.WMgSUGyf);local function o()local n,l=a.WMgSUGyf(f,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local p=true;local p=0 local function y()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==p)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 a.RIlFhIR_(e,n-1023)*(d+(t/(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.UaLcReAZ(f,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+p),#l do e=e..a.UaLcReAZ(l,n,n)end return e;end;local p=#a.Im_QqMzl(u('\49.\48'))~=1 local e=n;local function g(...)return{...},a.xzkmSGmB('#',...)end local function m()local u={};local e={};local s={};local h={u,s,nil,e};local e=n()local f={}for t=1,e do local l=c();local n;if(l==0)then n=(c()~=#{});elseif(l==3)then local e=y();if p and a.AFldt_Hn(a.Im_QqMzl(e),'.(\48+)$')then e=a.SRnQhmnh(e);end n=e;elseif(l==1)then n=_();end;f[t]=n;end;for h=1,n()do local e=c();if(l(e,1,1)==0)then local a=l(e,2,3);local c=l(e,4,6);local e={o(),o(),nil,nil};if(a==0)then e[t]=o();e[r]=o();elseif(a==#{1})then e[t]=n();elseif(a==b[2])then e[t]=n()-(2^16)elseif(a==b[3])then e[t]=n()-(2^16)e[r]=o();end;if(l(c,1,1)==1)then e[d]=f[e[d]]end if(l(c,2,2)==1)then e[t]=f[e[t]]end if(l(c,3,3)==1)then e[r]=f[e[r]]end u[h]=e;end end;h[3]=c();for e=1,n()do s[e-(#{1})]=m();end;return h;end;local function j(l,e,n)local t=e;local t=n;return u(a.AFldt_Hn(a.AFldt_Hn(({a.GBy_pGlp(l)})[2],e),n))end local function ee(b,e,f)local function j(...)local c,j,o,z,p,n,u,m,_,k,y,l;local e=0;while-1<e do if 2<e then if e<=4 then if 0<=e then repeat if e~=3 then k=a.xzkmSGmB('#',...)-1;y={};break;end;m={};_={...};until true;else k=a.xzkmSGmB('#',...)-1;y={};end else if e~=3 then repeat if e>5 then e=-2;break;end;l=h(7);until true;else l=h(7);end end else if 1>e then c=h(6,99,1,45,b);j=h(6,93,2,29,b);else if e>=-3 then repeat if 1<e then n=-41;u=-1;break;end;o=h(6,68,3,69,b);p=g z=0;until true;else o=h(6,68,3,69,b);p=g z=0;end end end e=e+1;end;for e=0,k do if(e>=o)then m[e-o]=_[e+1];else l[e]=_[e+1];end;end;local e=k-o+1 local e;local o;local function a(...)while true do end end while true do if n<-40 then n=n+42 end e=c[n];o=e[le];if o>11 then if o>=18 then if 21<=o then if 22>o then local n=e[d]local t,e=p(l[n](s(l,n+1,e[t])))u=e+n-1 local e=0;for n=n,u do e=e+1;l[n]=t[e];end;else if o==22 then local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[r]];else local n=e[d]local t,e=p(l[n](s(l,n+1,e[t])))u=e+n-1 local e=0;for n=n,u do e=e+1;l[n]=t[e];end;end end else if o<19 then f[e[t]]=l[e[d]];else if o<20 then l[e[d]]();else do return end;end end end else if 14<o then if o<16 then local e=e[d]l[e]=l[e](s(l,e+1,u))else if o~=14 then repeat if o<17 then l[e[d]]=f[e[t]];break;end;l[e[d]]();until true;else l[e[d]]=f[e[t]];end end else if o>=13 then if o~=9 then repeat if o~=14 then l(e[d],e[t]);break;end;f[e[t]]=l[e[d]];until true;else l(e[d],e[t]);end else local o,h,k,b,a;l[e[d]]=f[e[t]];n=n+1;e=c[n];o=e[d];h=l[e[t]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=c[n];l(e[d],e[t]);n=n+1;e=c[n];o=e[d]k,b=p(l[o](s(l,o+1,e[t])))u=b+o-1 a=0;for e=o,u do a=a+1;l[e]=k[a];end;n=n+1;e=c[n];o=e[d]l[o]=l[o](s(l,o+1,u))n=n+1;e=c[n];l[e[d]]();n=n+1;e=c[n];do return end;end end end else if 5<o then if o<9 then if 6>=o then local n=e[d];local t=l[e[t]];l[n+1]=t;l[n]=t[e[r]];else if 6<o then repeat if 7~=o then l[e[d]]=f[e[t]];break;end;l[e[d]]=(e[t]~=0);until true;else l[e[d]]=(e[t]~=0);end end else if 9>=o then if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;else if 8~=o then for n=24,52 do if 10<o then do return end;break;end;l[e[d]]=(e[t]~=0);break;end;else l[e[d]]=(e[t]~=0);end end end else if o<3 then if o<=0 then local e=e[d]l[e]=l[e](s(l,e+1,u))else if o~=0 then repeat if 2>o then for o=0,3 do if o>1 then if o<3 then l[e[d]]=f[e[t]];n=n+1;e=c[n];else if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;end else if 1==o then f[e[t]]=l[e[d]];n=n+1;e=c[n];else l[e[d]]=(e[t]~=0);n=n+1;e=c[n];end end end break;end;l(e[d],e[t]);until true;else for o=0,3 do if o>1 then if o<3 then l[e[d]]=f[e[t]];n=n+1;e=c[n];else if(l[e[d]]==e[r])then n=n+1;else n=e[t];end;end else if 1==o then f[e[t]]=l[e[d]];n=n+1;e=c[n];else l[e[d]]=(e[t]~=0);n=n+1;e=c[n];end end end end end else if o>=4 then if o~=1 then repeat if o>4 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 n=e[t];end end end end n=1+n;end;end;return j end;local d=0xff;local r={};local a=(1);local t='';(function(n)local l=n local o=0x00 local e=0x00 l={(function(c)if o>0x2a then return c end o=o+1 e=(e+0x8fd-c)%0x16 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xae);d[2]=(d[2]*(j(function()r()end,s(t))-j(d[1],s(t))))+1;r[a]={};d=d[2];a=a+d;end return true end)'iBimL'and l[0x1](0x39b+c))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf5);r[a]=ne();a=a+d;end return true end)'BcOiJ'and l[0x2](c+0x236))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xca);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'hnz_T'and l[0x3](c+0x15b))or c end),(function(t)if o>0x2f then return t end o=o+1 e=(e+0x534-t)%0x19 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe8);end return true end)'PjFnX'and l[0x2](0x2f6+t))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x41);end return true end)'gMWQa'and l[0x1](t+0x195))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xda);end return true end)'qZBlX'and l[0x3](t+0xf8))or t end),(function(c)if o>0x2a then return c end o=o+1 e=(e+0xc25-c)%0x17 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xdf);end return true end)'YOaai'and l[0x2](0x17d+c))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa4);t={t..'\58 a',t};r[a]=m();a=a+(1);t[1]='\58'..t[1];d[2]=0xff;end return true end)'SkmPG'and l[0x1](c+0x12e))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x20);end return true end)'WsYyj'and l[0x3](c+0x159))or c end)}l[0x1](0x869)end){};local e=ee(s(r));return e(...);end return ee((function()local n={}local e=0x01;local l;if a.AgxRRZ_Y then l=a.AgxRRZ_Y(ee)else l=''end if a.AFldt_Hn(l,a.fQPKpOuG)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,l,n,t,d,o)local o;if 4<=e then if e>=6 then if e>=7 then if e>=4 then repeat if 7~=e then do return n(e,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(e,nil,n);end end else do return d[n]end;end else if 3<=e then repeat if e>4 then local e=t;do return function()local n=l(n,e(e,e),e(e,e));e(1);return n;end;end;break;end;local e=t;local d,o,t=d(2);do return function()local a,l,n,c=l(n,e(e,e),e(e,e)+3);e(4);return(c*d)+(n*o)+(l*t)+a;end;end;until true;else local e=t;do return function()local n=l(n,e(e,e),e(e,e));e(1);return n;end;end;end end else if e<=1 then if 1>e then do return l(1),l(4,d,t,n,l),l(5,d,t,n)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 else if 2~=e then do return l(1),l(4,d,t,n,l),l(5,d,t,n)end;else do return 16777216,65536,256 end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement