Advertisement
Aestal

kaiju universe mk

Feb 17th, 2024 (edited)
107
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.34 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _YpJfWFcl_fVB = a; end)); return(function(f,...)local a;local m;local r;local o;local l;local t;local e=24915;local n=0;local d={};while n<745 do n=n+1;while n<0x165 and e%0x4c1c<0x260e do n=n+1 e=(e+347)%42326 local h=n+e if(e%0x31be)>0x18df then e=(e*0x333)%0x5ab5 while n<0xe8 and e%0x4e0e<0x2707 do n=n+1 e=(e-950)%22855 local l=n+e if(e%0x1a5c)<0xd2e then e=(e+0xd2)%0x54e8 local e=88388 if not d[e]then d[e]=0x1 r={};end elseif e%2~=0 then e=(e+0x83)%0x116a local e=57607 if not d[e]then d[e]=0x1 end else e=(e*0x18e)%0xa657 n=n+1 local e=7696 if not d[e]then d[e]=0x1 end end end elseif e%2~=0 then e=(e*0x397)%0x226c while n<0x18f and e%0x2d4a<0x16a5 do n=n+1 e=(e*735)%25072 local h=n+e if(e%0x343c)>=0x1a1e then e=(e-0x2ee)%0xaf12 local e=61059 if not d[e]then d[e]=0x1 o=string;end elseif e%2~=0 then e=(e+0x36b)%0x15e3 local e=34852 if not d[e]then d[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\119\122\112\113\113\104\100\116\0\6\115\116\114\105\110\103\4\99\104\97\114\115\95\107\122\88\88\106\122\0\6\115\116\114\105\110\103\3\115\117\98\108\103\83\81\67\118\85\109\0\6\115\116\114\105\110\103\4\98\121\116\101\104\69\120\89\76\69\89\104\0\5\116\97\98\108\101\6\99\111\110\99\97\116\122\68\110\101\76\86\109\113\0\5\116\97\98\108\101\6\105\110\115\101\114\116\110\116\98\113\70\111\71\68\5";end else e=(e*0x2e4)%0x1e55 n=n+1 local e=15979 if not d[e]then d[e]=0x1 t=function(d)local e=0x01 local function n(n)e=e+n return d:sub(e-n,e-0x01)end while true do local d=n(0x01)if(d=="\5")then break end local e=o.byte(n(0x01))local e=n(e)if d=="\2"then e=r.wzpqqhdt(e)elseif d=="\3"then e=e~="\0"elseif d=="\6"then l[e]=function(n,e)return f(8,nil,f,e,n)end elseif d=="\4"then e=l[e]elseif d=="\0"then e=l[e][n(o.byte(n(0x01)))];end local n=n(0x08)r[n]=e end end end end end else e=(e-0x39b)%0x7931 n=n+1 while n<0x2b7 and e%0x28e2<0x1471 do n=n+1 e=(e-20)%34492 local t=n+e if(e%0x151e)<0xa8f then e=(e*0x20e)%0x68d8 local e=2930 if not d[e]then d[e]=0x1 l=(not l)and _ENV or l;end elseif e%2~=0 then e=(e-0x1f2)%0x18c7 local e=20995 if not d[e]then d[e]=0x1 l=getfenv and getfenv();end else e=(e-0x2fa)%0x3418 n=n+1 local e=1556 if not d[e]then d[e]=0x1 m=tonumber;end end end end end e=(e*686)%13608 end t(a);local n={};for e=0x0,0xff do local d=r.s_kzXXjz(e);n[e]=d;n[d]=e;end local function h(e)return n[e];end local o=(function(a,o)local f,d=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local t=a while true do n[0x03][r.lgSQCvUm(o,e,(function()e=f+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""d=0x000 break end end local l=#o while e<l+0x01 do n[0x02][d]=r.lgSQCvUm(o,e,(function()e=f+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 r.ntbqFoGD(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=a+t;end end return r.zDneLVmq(n[0x01])end);t(o(154,"-ZsFSxu=eaA,8:o?u,"));t(o(152,"8K}z{5O-Ea!n%LhUOELO!nK{-!La{O!-!%-{hL{LnEK!-}%%z;a5U!-Uh!U{5LzlEnUKO{%%Kh!OUKO}nE{}anUK0a-5{En}KK-hh%5{EaUOOnhE5%nLKh}NEhOz%%z}aKUh5UO5z5aK:%OzLy}aE-KzO}%z{!aahaK;-%{L!a}{EtE55{n{KLaEUEzEa%3LEWUKOOn{}Kz{!{-z%L{{!5H5-%LK{%!K:!-%LL{zn-UKO5La55!U}5}{EU{OnL}za%UUO!azKKE5Uh5anEzOE}UUl%-{{U!KKKE{Uc5}n5C-EU%a}L%an!}K%K5O!-}%a}L!z!naZ%z{!)-{L-{z!%K}-KLhzU!E}W-ahhz}ahKE-}E,hL%{KaE}U{555hz5aO/w5a%zzz!-ha5}LzKEa6GU-n-{Lhn5KOETLa{znzo{5L%E}!n}z#-}UzU{5LzDa!UaOOL{Kh-!IK{On{KnE}UKw%-O{n!5K{-5Ln5{EaUa-}%Lz-nOKa-{EEU{%5}Ka%UEUL%Oz{aUp--}%nz-E5h}55%E5}aq!L"));local e=(-5028+(function()local l,e=0,1;(function(n,e)n(n(e,e),n(e and e,n))end)(function(d,n)if l>281 then return n end l=l+1 e=(e+244)%6473 if(e%1490)<745 then e=(e-973)%5157 return d(n(n,d)and n(n,d),n(n,n))else return n end return n end,function(n,d)if l>143 then return n end l=l+1 e=(e*154)%46950 if(e%746)>=373 then e=(e-728)%37840 return n else return n(d(n,d and n),d(d,n))end return n(d(n,d),d(n,d))end)return e;end)())local c=r.TEHBbxRk or r.wQRkHXos;local ne=(getfenv)or(function()return _ENV end);local de=1;local l=2;local a=4;local t=3;local function j(b,...)local h=o(e,"C)m4.%MEYd^{1u+q{{.5+,YJm41MM:AX^kY4.1+qd4m%1.X4^..F+;YcdEm)1dE.^4Yd+nYPm_mYu.E.)O{4)^^q.q4m1)EE1+^E.dq.YY4%1mE%)4^%%m+4Yqm+u.M%v+{.l++4YqmuYq.uB){m.4+q%YqMd.4m1q{4.4+dY%m+14M%1q^u.)+dY++q^{M)pd^^%%^%%mq3{%M+od{M.%qmd4m%M4xY^j.-+p1)d%4.1Y%.)d{v.%Y4mE1zM8lS+Y{.%.qZMEm%u.z4^..h+*YUYEm)1uM%^4..+aYTmt&+1)Mu}%.4qdYDm!1*^uMq3q^+44+%Y4)q{4E.)m^d.++Ed4GY1dM.p.^%.+1)d.4.umv4^M.!+IYrM)m%u4E.&)^1+4Y+mb1OMj.{t)^d.^q%.Z)%1+Md)M^%%mq4Y%14MYXV^N.jmM+dY+mdu4MYa%^.+4Yqmt1WM:.))f{2.1+dY4m)u.Mdrq^+m++)Yum%M4A%^x.i+>q7dmmd1+E.^4%M+>Ysmv)n11M))d^%%m^UY4m11qE4p%^.j0q.YYm%Y0.Eq%YdJ+Y4mu1JM8_hqqdd%(1^YM)E^MM421dq.MuMMm14M.V/^S.?%.+)d4m{M4nY^O.K+R+4Y1md1%M+).^d..Y4m^1sM#NJ61^q.)+.d44.umMdN+^E+4Ybms1lMBT41E.o+-YNE.mY1dE41y^M.d+1Y%+RuEM))4MW%NqmYq4.1%M4).^%..^jdEmdu.MY1?Yu.q+qY+)41%M41HdM)4Y4m.1xM93o+d^+.M+qm4uuMe,L^PY{.%qd.t4M1%EmAd^M.d+%Y.+1YvM4?)^+>9+1Yqm)1.mH)4^4%m+ddU4.M4X4^<.h+t1+Y%4EM4ku^-.e+&1.Yd4414Mq)m^.md++dMmdu.M%^m.F+4uumr1:MDMY).{.%yq4%^+qYqEmf){EZ++EYd4.1YE%jm{%%4+%dmm41qM+).^%.+q..+m41qMu1qYu.)1EYd)YuY%4&4{m.dq*d.m%um4:1q^{.%qdd44du4E.&%^u%M{mY)4V1dmqxu^)%4q.Y%4mYqE%<dMq%YqmY%4m{qMu)4{.%%+.Ydmqd.4%1+^1%%+)m4umM!-&^7YE.%q..67{1%Ed1QYM.qqm.<)414EmDd{H%.Y;%Y1_M/;H^aM)+IY;mk1)MH;;^>%m+YYzm_1;MYe:^5.rqmdEm&1!Ms q^U.f+R^Mmd1&M6Vy^M.o+)Ya4.13M.m{^o.K+*YMmh1)MiL.1{.W+(YWmE1!M):/^<%u+QYpm71)M,R}^U%m+EY/mi1nEm/T^g.-qmd+mB1)M#PM^b.?+S^}4d1rM)h9^)._+%Y?4m1MMIX4^:%^+sYLm31XMmx3^).K+4Y;m_1VMs=Y^l.0+eY6m&1mM#ZN{^.>+>Yxm)1iMmr51h%%+<Y)m;18MX)E^v.&+=Y-mm1*M!!<^%.=)td>m&1mMVQ1^/.d+A{r4{1rMm35^E.-+^Y(%:u5Mbim^=%%+Pd{msq_E4F0^m.AqYY0441<d3)M^v.m+eY.mju)Mg2:{_.K+)Y mm1eM)S_{m.E+zY)mvueM&,3^=MKq.Y=m)1&M)WZ^m.<+kY^mG1)M7P)^>.)+w^X4.1IM)?j^0.}+{YNm3umM#;)^v.)+6Ymmh1MM^P7^).i<FY=m)15M)Fy^.M{+cYomH+ZMJx)^!MzqmY?m)12M60:^).k+M^4mH1)Mw)M^e.)+}Yom 1.Y{>H^W.NqMYtm)1eY_)m^5.)+ZYRmV1{M-UI{Y.e+)YKm)1ZMmsf^M.{+xY)mjq.MLo)^x. +hY..{1JM=H/u..T+)Y<._umMFk)^!.?+-Y)mI+MY%WO^).BZYYgm)1sEdiI^.M{+WYwm3+YMW/)^H..={YNmc1cd.7N^).}qmYEmK1)M2Wu^*.;+!dm.^12Mm*k{M.z+&Y/m/uYM__)^L.m+-Y)m#umE%5/^).!qmYwmV1KEm)m^x.m+ZYMma10M}m-{v.Z+mYwmm1FM%}U{m.{+jY.m/14MsPt^D.o+%Y!m%1lM)D ^N.;+yd)mI1mMT3%^<.w+QYf4%1}M)If^Q.2+mY;mc1MM,9)^X.)+iY)m:1.EYzg^6.H)EYIm)1DEmeE^>.)+>Yuma1NMZ)m^d.H+mY2m+1BMz>S^i.4+IY)mW1mMic)^g.0quY8me1SM)(=^w.,+/Y!mF1}");local n=0;r.VvYbPrcQ(function()r.xrmWwIEy()n=n+1 end)local function e(e,d)if d then return n end;n=e+n;end local d,n,u=f(0,f,e,h,r.hExYLEYh);local function o()local d,n=r.hExYLEYh(h,e(1,3),e(5,6)+2);e(2);return(n*256)+d;end;local s=true;local s=0 local function p()local l=n();local e=n();local t=1;local l=(d(e,1,20)*(2^32))+l;local n=d(e,21,31);local e=((-1)^d(e,32));if(n==0)then if(l==s)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return r.HDMXanTY(e,n-1023)*(t+(l/(2^52)));end;local z=n;local function k(n)local d;if(not n)then n=z();if(n==0)then return'';end;end;d=r.lgSQCvUm(h,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+s),#d do e=e..r.lgSQCvUm(d,n,n)end return e;end;local z=#r.hxivRVhZ(m('\49.\48'))~=1 local e=n;local function y(...)return{...},r.AIZMOfaT('#',...)end local function j()local m={};local e={};local s={};local c={s,m,nil,e};local e=n()local h={}for l=1,e do local d=u();local e;if(d==2)then e=(u()~=#{});elseif(d==1)then local n=p();if z and r.YOsZSrYA(r.hxivRVhZ(n),'.(\48+)$')then n=r.cgMBMXzP(n);end e=n;elseif(d==3)then e=k();end;h[l]=e;end;c[3]=u();for c=1,n()do local e=u();if(d(e,1,1)==0)then local f=d(e,2,3);local r=d(e,4,6);local e={o(),o(),nil,nil};if(f==0)then e[t]=o();e[a]=o();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[a]=o();end;if(d(r,1,1)==1)then e[l]=h[e[l]]end if(d(r,2,2)==1)then e[t]=h[e[t]]end if(d(r,3,3)==1)then e[a]=h[e[a]]end s[c]=e;end end;for e=1,n()do m[e-(#{1})]=j();end;return c;end;local function g(d,n,e)local l=n;local l=e;return m(r.YOsZSrYA(r.YOsZSrYA(({r.VvYbPrcQ(d)})[2],n),e))end local function ee(k,e,h)local function ee(...)local o,j,m,g,s,n,u,p,z,b,_,d;local e=0;while-1<e do if e<3 then if e>=1 then if e>1 then n=-41;u=-1;else m=f(6,47,3,32,k);s=y g=0;end else o=f(6,20,1,10,k);j=f(6,44,2,38,k);end else if 5>e then if 2~=e then repeat if 4>e then p={};z={...};break;end;b=r.AIZMOfaT('#',...)-1;_={};until true;else b=r.AIZMOfaT('#',...)-1;_={};end else if e~=2 then repeat if 5~=e then e=-2;break;end;d=f(7);until true;else e=-2;end end end e=e+1;end;for e=0,b do if(e>=m)then p[e-m]=z[e+1];else d[e]=z[e+1];end;end;local e=b-m+1 local e;local f;local function r(...)while true do end end while true do if n<-40 then n=n+42 end e=o[n];f=e[de];if f<=22 then if f<=10 then if f<5 then if 2>f then if 1==f then d[e[l]][e[t]]=e[a];else d[e[l]]={};end else if 3<=f then if 0<=f then for o=42,72 do if 3~=f then if(d[e[l]]==e[a])then n=n+1;else n=e[t];end;break;end;d[e[l]]=d[e[t]][e[a]];break;end;else if(d[e[l]]==e[a])then n=n+1;else n=e[t];end;end else if not d[e[l]]then n=n+1;else n=e[t];end;end end else if f<=7 then if 6>f then do return end;else if f<7 then local e=e[l]d[e]=d[e](c(d,e+1,u))else d[e[l]]=h[e[t]];end end else if f>=9 then if f>=7 then for a=39,70 do if f~=9 then local n=e[l]local l,e=s(d[n](c(d,n+1,e[t])))u=e+n-1 local e=0;for n=n,u do e=e+1;d[n]=l[e];end;break;end;local f;for a=0,1 do if a>=-3 then repeat if a>0 then f=e[l]d[f](d[f+1])break;end;d(e[l],e[t]);n=n+1;e=o[n];until true;else f=e[l]d[f](d[f+1])end end break;end;else local f;for a=0,1 do if a>=-3 then repeat if a>0 then f=e[l]d[f](d[f+1])break;end;d(e[l],e[t]);n=n+1;e=o[n];until true;else f=e[l]d[f](d[f+1])end end end else local n=e[l];local l=d[e[t]];d[n+1]=l;d[n]=l[e[a]];end end end else if f>=17 then if 19<f then if f<21 then local r;for f=0,4 do if 2>f then if f~=1 then d[e[l]]=d[e[t]][e[a]];n=n+1;e=o[n];else d[e[l]]();n=n+1;e=o[n];end else if f<3 then d[e[l]]=d[e[t]][e[a]];n=n+1;e=o[n];else if 4==f then if not d[e[l]]then n=n+1;else n=e[t];end;else r=e[l]d[r]=d[r]()n=n+1;e=o[n];end end end end else if f>=20 then repeat if 22~=f then local f;for a=0,2 do if a<=0 then f=e[l]d[f]=d[f](c(d,f+1,u))n=n+1;e=o[n];else if a~=2 then d[e[l]]();n=n+1;e=o[n];else n=e[t];end end end break;end;d[e[l]]();until true;else d[e[l]]();end end else if 18>f then local n=e[l]local l,e=s(d[n](c(d,n+1,e[t])))u=e+n-1 local e=0;for n=n,u do e=e+1;d[n]=l[e];end;else if f~=18 then if(d[e[l]]==e[a])then n=n+1;else n=e[t];end;else d[e[l]]=d[e[t]][e[a]];end end end else if 14<=f then if 14<f then if 12<f then for r=27,95 do if 15~=f then local r;for f=0,5 do if f>=3 then if 4>f then d[e[l]][e[t]]=e[a];n=n+1;e=o[n];else if f>2 then for h=23,74 do if f~=5 then d[e[l]][e[t]]=e[a];n=n+1;e=o[n];break;end;r=e[l]d[r](d[r+1])break;end;else d[e[l]][e[t]]=e[a];n=n+1;e=o[n];end end else if f>0 then if 1~=f then d[e[l]][e[t]]=e[a];n=n+1;e=o[n];else d[e[l]][e[t]]=e[a];n=n+1;e=o[n];end else d[e[l]][e[t]]=e[a];n=n+1;e=o[n];end end end break;end;if d[e[l]]then n=n+1;else n=e[t];end;break;end;else local r;for f=0,5 do if f>=3 then if 4>f then d[e[l]][e[t]]=e[a];n=n+1;e=o[n];else if f>2 then for h=23,74 do if f~=5 then d[e[l]][e[t]]=e[a];n=n+1;e=o[n];break;end;r=e[l]d[r](d[r+1])break;end;else d[e[l]][e[t]]=e[a];n=n+1;e=o[n];end end else if f>0 then if 1~=f then d[e[l]][e[t]]=e[a];n=n+1;e=o[n];else d[e[l]][e[t]]=e[a];n=n+1;e=o[n];end else d[e[l]][e[t]]=e[a];n=n+1;e=o[n];end end end end else d[e[l]]=(e[t]~=0);end else if f>=12 then if 8<f then repeat if f<13 then local e=e[l]d[e](d[e+1])break;end;if not d[e[l]]then n=n+1;else n=e[t];end;until true;else if not d[e[l]]then n=n+1;else n=e[t];end;end else if(d[e[l]]~=e[a])then n=n+1;else n=e[t];end;end end end end else if 34<=f then if 39>=f then if 36>=f then if 34>=f then h[e[t]]=d[e[l]];else if f~=36 then if d[e[l]]then n=n+1;else n=e[t];end;else local e=e[l]d[e]=d[e]()end end else if f<=37 then if(d[e[l]]~=e[a])then n=n+1;else n=e[t];end;else if f<39 then local e=e[l]d[e](d[e+1])else d[e[l]]();end end end else if f>=43 then if f<44 then n=e[t];else if 45~=f then local o,f,a,h,r;local n=0;while n>-1 do if n>=3 then if n>4 then if 6~=n then d(r,h);else n=-2;end else if n>2 then for e=30,53 do if n~=4 then h=o[a];break;end;r=o[f];break;end;else r=o[f];end end else if 0<n then if n>-2 then for e=15,63 do if 2>n then f=l;break;end;a=t;break;end;else a=t;end else o=e;end end n=n+1 end else local l=e[l];local n=d[e[t]];d[l+1]=n;d[l]=n[e[a]];end end else if f<=40 then local e=e[l]d[e]=d[e](c(d,e+1,u))else if f>=40 then repeat if f<42 then local e=e[l]d[e]=d[e]()break;end;local f,u;for r=0,6 do if 3>r then if r<1 then d(e[l],e[t]);n=n+1;e=o[n];else if-2~=r then repeat if r<2 then f=e[l]d[f](d[f+1])n=n+1;e=o[n];break;end;d[e[l]]=h[e[t]];n=n+1;e=o[n];until true;else f=e[l]d[f](d[f+1])n=n+1;e=o[n];end end else if r<5 then if r>-1 then for c=37,65 do if r~=3 then f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[a]];n=n+1;e=o[n];break;end;d[e[l]]=h[e[t]];n=n+1;e=o[n];break;end;else f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[a]];n=n+1;e=o[n];end else if 1<=r then for f=24,73 do if r>5 then d[e[l]]=(e[t]~=0);break;end;d(e[l],e[t]);n=n+1;e=o[n];break;end;else d(e[l],e[t]);n=n+1;e=o[n];end end end end until true;else local f,u;for r=0,6 do if 3>r then if r<1 then d(e[l],e[t]);n=n+1;e=o[n];else if-2~=r then repeat if r<2 then f=e[l]d[f](d[f+1])n=n+1;e=o[n];break;end;d[e[l]]=h[e[t]];n=n+1;e=o[n];until true;else f=e[l]d[f](d[f+1])n=n+1;e=o[n];end end else if r<5 then if r>-1 then for c=37,65 do if r~=3 then f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[a]];n=n+1;e=o[n];break;end;d[e[l]]=h[e[t]];n=n+1;e=o[n];break;end;else f=e[l];u=d[e[t]];d[f+1]=u;d[f]=u[e[a]];n=n+1;e=o[n];end else if 1<=r then for f=24,73 do if r>5 then d[e[l]]=(e[t]~=0);break;end;d(e[l],e[t]);n=n+1;e=o[n];break;end;else d(e[l],e[t]);n=n+1;e=o[n];end end end end end end end end else if 28<=f then if f<=30 then if 28<f then if f~=26 then for r=36,93 do if f~=29 then local f,m,z,k,b;for r=0,6 do if 3<=r then if 4>=r then if r==3 then f=e[l]z,k=s(d[f](c(d,f+1,e[t])))u=k+f-1 b=0;for e=f,u do b=b+1;d[e]=z[b];end;n=n+1;e=o[n];else f=e[l]d[f]=d[f](c(d,f+1,u))n=n+1;e=o[n];end else if r~=4 then for h=47,65 do if r>5 then d[e[l]]=d[e[t]][e[a]];break;end;f=e[l]d[f]=d[f]()n=n+1;e=o[n];break;end;else d[e[l]]=d[e[t]][e[a]];end end else if 1<=r then if r>=0 then repeat if r<2 then f=e[l];m=d[e[t]];d[f+1]=m;d[f]=m[e[a]];n=n+1;e=o[n];break;end;d(e[l],e[t]);n=n+1;e=o[n];until true;else f=e[l];m=d[e[t]];d[f+1]=m;d[f]=m[e[a]];n=n+1;e=o[n];end else d[e[l]]=h[e[t]];n=n+1;e=o[n];end end end break;end;do return end;break;end;else do return end;end else d[e[l]]=(e[t]~=0);end else if 32>f then d[e[l]][e[t]]=e[a];else if f~=31 then repeat if f>32 then for f=0,3 do if 1<f then if 2~=f then if(d[e[l]]==e[a])then n=n+1;else n=e[t];end;else d[e[l]]=h[e[t]];n=n+1;e=o[n];end else if 0<f then h[e[t]]=d[e[l]];n=n+1;e=o[n];else d[e[l]]=(e[t]~=0);n=n+1;e=o[n];end end end break;end;local f,r,o,a,h;local n=0;while n>-1 do if 3>n then if 1<=n then if-2~=n then repeat if 2~=n then r=l;break;end;o=t;until true;else o=t;end else f=e;end else if n>4 then if n~=1 then repeat if 5<n then n=-2;break;end;d(h,a);until true;else n=-2;end else if n>=2 then repeat if n~=4 then a=f[o];break;end;h=f[r];until true;else a=f[o];end end end n=n+1 end until true;else for f=0,3 do if 1<f then if 2~=f then if(d[e[l]]==e[a])then n=n+1;else n=e[t];end;else d[e[l]]=h[e[t]];n=n+1;e=o[n];end else if 0<f then h[e[t]]=d[e[l]];n=n+1;e=o[n];else d[e[l]]=(e[t]~=0);n=n+1;e=o[n];end end end end end end else if 24>=f then if 23==f then n=e[t];else local f;for a=0,1 do if a==0 then f=e[l]d[f]=d[f]()n=n+1;e=o[n];else if d[e[l]]then n=n+1;else n=e[t];end;end end end else if 26<=f then if 27>f then d[e[l]]=h[e[t]];else d[e[l]]={};end else h[e[t]]=d[e[l]];end end end end end n=1+n;end;end;return ee end;local t=0xff;local h={};local f=(1);local l='';(function(n)local d=n local o=0x00 local e=0x00 d={(function(l)if o>0x30 then return l end o=o+1 e=(e+0xd4d-l)%0x37 return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xe6);end return true end)'vcIWz'and d[0x3](0x20e+l))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xcf);end return true end)'xWLxZ'and d[0x2](l+0x1c8))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x36);end return true end)'eTDfI'and d[0x1](l+0x37c))or l end),(function(a)if o>0x27 then return a end o=o+1 e=(e+0x4b1-a)%0x42 return(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x9f);l={l..'\58 a',l};h[f]=j();f=f+((not r.jZLHEB_b)and 1 or 0);l[1]='\58'..l[1];t[2]=0xff;end return true end)'LoJma'and d[0x3](0x32e+a))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x76);end return true end)'LKdRL'and d[0x1](a+0x3c5))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x63);l='\37';t={function()t()end};l=l..'\100\43';end return true end)'GEYEP'and d[0x2](a+0x7f))or a end),(function(a)if o>0x30 then return a end o=o+1 e=(e+0x129b-a)%0x47 return(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x20);t[2]=(t[2]*(g(function()h()end,c(l))-g(t[1],c(l))))+1;h[f]={};t=t[2];f=f+t;end return true end)'uuUgs'and d[0x2](0x203+a))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x47);end return true end)'ZpvGw'and d[0x3](a+0x157))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xce);h[f]=ne();f=f+t;end return true end)'LHPax'and d[0x1](a+0x3d7))or a end)}d[0x2](0x1580)end){};local e=ee(c(h));return e(...);end return j((function()local n={}local e=0x01;local d;if r.jZLHEB_b then d=r.jZLHEB_b(j)else d=''end if r.YOsZSrYA(d,r.tAFShtmf)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,d,n,l,t,o)local o;if e<4 then if 1>=e then if e>=-4 then repeat if e<1 then do return d(1),d(4,t,l,n,d),d(5,t,l,n)end;break;end;do return function(n,e,d)if d then local e=(n/2^(e-1))%2^((d-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;until true;else do return function(n,e,d)if d then local e=(n/2^(e-1))%2^((d-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-1~=e then for o=33,68 do if 3>e then do return 16777216,65536,256 end;break;end;do return d(1),d(4,t,l,n,d),d(5,t,l,n)end;break;end;else do return 16777216,65536,256 end;end end else if e<=5 then if e==4 then local e=l;local a,f,t=t(2);do return function()local o,l,d,n=d(n,e(e,e),e(e,e)+3);e(4);return(n*a)+(d*f)+(l*t)+o;end;end;else local e=l;do return function()local n=d(n,e(e,e),e(e,e));e(1);return n;end;end;end else if 7<=e then if 4<=e then repeat if e~=8 then do return setmetatable({},{['__\99\97\108\108']=function(e,d,l,t,n)if n then return e[n]elseif t then return e else e[d]=l end end})end break;end;do return n(e,nil,n);end until true;else do return n(e,nil,n);end end else do return t[n]end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement