lol

([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _UcUSYjuqhtDe = a; end)); return(function(f,...)local l;local d;local s;local o;local r;local a;local e=24915;local n=0;local t={};while n<106 do n=n+1;while n<0xca and e%0xc4a<0x625 do n=n+1 e=(e-610)%9967 local c=n+e if(e%0x14da)>=0xa6d then e=(e-0x2c1)%0x347d while n<0x35f and e%0x12b8<0x95c do n=n+1 e=(e+574)%2621 local d=n+e if(e%0xe1e)<=0x70f then e=(e-0x348)%0xa45f local e=37955 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end elseif e%2~=0 then e=(e+0x2b2)%0x98e9 local e=24508 if not t[e]then t[e]=0x1 o={};end else e=(e*0x256)%0x6b7d n=n+1 local e=50636 if not t[e]then t[e]=0x1 end end end elseif e%2~=0 then e=(e*0x1b2)%0x29ee while n<0x20f and e%0x1b5e<0xdaf do n=n+1 e=(e*321)%29785 local c=n+e if(e%0x228e)>0x1147 then e=(e-0x167)%0xf39 local e=4423 if not t[e]then t[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\65\86\87\73\121\106\82\74\0\6\115\116\114\105\110\103\4\99\104\97\114\75\106\114\98\110\114\106\99\0\6\115\116\114\105\110\103\3\115\117\98\76\120\105\79\79\79\72\71\0\6\115\116\114\105\110\103\4\98\121\116\101\105\106\111\72\82\73\87\72\0\5\116\97\98\108\101\6\99\111\110\99\97\116\89\107\120\104\80\90\100\121\0\5\116\97\98\108\101\6\105\110\115\101\114\116\83\105\73\66\101\82\101\68\5";end elseif e%2~=0 then e=(e+0x262)%0xb526 local e=16967 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end else e=(e-0x5d)%0x6bc6 n=n+1 local e=90371 if not t[e]then t[e]=0x1 d=function(d)local e=0x01 local function t(n)e=e+n return d:sub(e-n,e-0x01)end while true do local n=t(0x01)if(n=="\5")then break end local e=a.byte(t(0x01))local e=t(e)if n=="\2"then e=o.AVWIyjRJ(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then l[e]=function(n,e)return f(8,nil,f,e,n)end elseif n=="\4"then e=l[e]elseif n=="\0"then e=l[e][t(a.byte(t(0x01)))];end local n=t(0x08)o[n]=e end end end end end else e=(e*0x79)%0x7597 n=n+1 while n<0x2f8 and e%0x3972<0x1cb9 do n=n+1 e=(e+56)%44381 local l=n+e if(e%0x46c6)<=0x2363 then e=(e+0x1a2)%0x2730 local e=91953 if not t[e]then t[e]=0x1 a=string;end elseif e%2~=0 then e=(e+0x35)%0x45aa local e=30670 if not t[e]then t[e]=0x1 end else e=(e+0x3be)%0x4fce n=n+1 local e=60294 if not t[e]then t[e]=0x1 s=tonumber;end end end end end e=(e*699)%10483 end d(r);local e={};for n=0x0,0xff do local t=o.Kjrbnrjc(n);e[n]=t;e[t]=n;end local function c(n)return e[n];end local a=(function(r,d)local a,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local f=r while true do n[0x03][o.LxiOOOHG(d,e,(function()e=a+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#d while e<l+0x01 do n[0x02][t]=o.LxiOOOHG(d,e,(function()e=a+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 o.SiIBeReD(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.YkxhPZdy(n[0x01])end);d(a(26,"IVd%h:;ou=Y<jDwQw<"));d(a(147," fAIJODp0%)4.tLVDtL>4)A0%IVpD%.Vt%)DAJ0%V%OLtfAV%VLV0%tpDADAt,)0#0pIL4O0%LAp%twfpVt4A4.0.AIIc4p)tLOb.IfV%O_DOD.IAL.IY<AJ%ppftVJ))LA>0D%fDD.pJp)IfOpILgJ0))fA%tffp40AVI.%A)))R4fOL%JL4.I.)fL)JV.LI4.0Zp%4tVj)pVOI4AAL%JV%pO.VJV)%fp0LVJpf.0fV%.VA0tL4J4D0t0%JfMp4V%DftfVV%If00ttIIf.LA40D)OfAVAJ%4LID0Dff0=40I.%tAVpI%%7O))A))IAVp.VpDIttJIJ)44%JV.Dtt4JD))f.0AtOJf.VJO4AgAOtV4VNDAIL%0vDptLIVf.tII)AM;DVLJOV..Af)Iv)J0LLJ%OA.f%t/IpAtxIV4JAADDbOJLLAIN)LfJAA%WD0tpI4)tAUOL.%OLtfAI0%f00I0OVJ.LAt)f1ppAVBOO%pf.pDLtO%L%OJOf.A%0V%p%t)LJ4AAO%O8ApAtVft%0+f04.VDf44t)"));local e=(-8795+(function()local d,t=0,1;(function(t,e,n)n(e(t,n,e and e),e(e and e,t,n),n(e,n,e))end)(function(l,n,e)if d>199 then return l end d=d+1 t=(t+720)%18248 if(t%736)<=368 then return n else return e(n(e,e and l,n),l(l,e,e and n)and l(n,e and l,e),e(n,e and e,e))end return e(e(e,e,l),n(l,e and l,e),n(n,l,n))end,function(l,e,n)if d>268 then return e end d=d+1 t=(t*342)%16201 if(t%1314)<657 then return e(n(n,e and n,e),e(e,e,n and l)and n(l,l,n),l(n,n,n))else return e end return e end,function(e,l,n)if d>494 then return l end d=d+1 t=(t*60)%28229 if(t%420)<210 then return n else return n(n(l,n,n),l(e,e and l,e),n(l,l and e,e and n))end return n(n(e,e and e,e and n),e(e,l,e and l)and e(e,e,e and n),l(n and n,e,n and n))end)return t;end)())local le=(getfenv)or(function()return _ENV end);local h=o.lCuQxYjc or o.yyavpAzh;local l=2;local d=3;local c=4;local te=1;local function z(b,...)local u=a(e,".NHS)_=!}b%T2a7sS=_7}aT27TH))b!}%!)H!)b_2!V_S_=H}}T27)%2NHA%Sb=}7TH7_7b!!S7}N%)2!)_77)saS7N%bb2%s=H%)%!!T!a!z_s{!=b!aNs)aTS!}}T!7_sbS%=!_ST}2)7m_Nb!=a2HNiS7=7%%2}:H7}Ha_2}TT%T;FWC7Sa=2XSS7=ab}2%257)NS}S%S7)N)S)=?b=2%TbNa_}}_!=7}j=)TSH%_bSs7Ha=N!)T=2=%%sHn}S!==7HSS=Hb1%)7_NHSa=QT1aa0SS!_sb%b777N})!!!%sTNNS)H=sH2=}}%Tb7}!=bTa}sbH=_TbTa_^BH==N=PTF!%T#a}r!S=%ax}S!=H=}T_sS%77Ni2ST=%q:Hb=)}T=_})TS7HNN)t=sb72asaHT_%}b2%7bN=)_!)%!aHzNS&!Nb%Ta72NT)s!b%}a!H2)T=)bS2Hs!H,_l!7%sa2zsST=bb}2!s2H___}ST=7HNeSs=7%)22s2H%_bb2T!7=N_)_!S%HaNNH)(_7}aT272N%)b!}Tb7bx_S_=Sbb2NsMNs=7bN%2a2q%S%=}ba2=e!Sb_S}_TN7SYsS7=ab27Ss%Ha_}}}T=7_N))S!!%NaNssSH_a}2TT7%HH)}!!%=a_#)S_=HbN227sN7)a!a%TaTJbS}!Tb=2_s)H)_H}NT#as-7Sa=2bT");local n=0;o.EajaraDt(function()o.WuwBYMrI()n=n+1 end)local function e(t,e)if e then return n end;n=t+n;end local t,n,r=f(0,f,e,u,o.ijoHRIWH);local function a()local t,n=o.ijoHRIWH(u,e(1,3),e(5,6)+2);e(2);return(n*256)+t;end;local _=true;local _=0 local function j()local l=n();local e=n();local d=1;local l=(t(e,1,20)*(2^32))+l;local n=t(e,21,31);local e=((-1)^t(e,32));if(n==0)then if(l==_)then return e*0;else n=1;d=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return o.LDVVvHoF(e,n-1023)*(d+(l/(2^52)));end;local p=n;local function k(n)local t;if(not n)then n=p();if(n==0)then return'';end;end;t=o.LxiOOOHG(u,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+_),#t do e=e..o.LxiOOOHG(t,n,n)end return e;end;local _=#o.MLmvvYGx(s('\49.\48'))~=1 local e=n;local function z(...)return{...},o.lAYFPOrp('#',...)end local function ee()local e={};local u={};local h={};local s={u,h,nil,e};local e=n()local f={}for l=1,e do local t=r();local n;if(t==2)then n=(r()~=#{});elseif(t==1)then local e=j();if _ and o.YYTIDbif(o.MLmvvYGx(e),'.(\48+)$')then e=o.rCQMjAfS(e);end n=e;elseif(t==0)then n=k();end;f[l]=n;end;for h=1,n()do local e=r();if(t(e,1,1)==0)then local o=t(e,2,3);local r=t(e,4,6);local e={a(),a(),nil,nil};if(o==0)then e[d]=a();e[c]=a();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[c]=a();end;if(t(r,1,1)==1)then e[l]=f[e[l]]end if(t(r,2,2)==1)then e[d]=f[e[d]]end if(t(r,3,3)==1)then e[c]=f[e[c]]end u[h]=e;end end;s[3]=r();for e=1,n()do h[e-(#{1})]=ee();end;return s;end;local function g(t,e,n)local l=e;local l=n;return s(o.YYTIDbif(o.YYTIDbif(({o.EajaraDt(t)})[2],e),n))end local function ne(p,e,u)local function ee(...)local a,g,b,m,_,t,r,y,k,s,j,n;local e=0;while-1<e do if e<3 then if 1>e then a=f(6,95,1,11,p);g=f(6,6,2,28,p);else if 0~=e then repeat if 1~=e then t=-41;r=-1;break;end;b=f(6,43,3,30,p);_=z m=0;until true;else t=-41;r=-1;end end else if e>4 then if 4~=e then for t=24,54 do if e~=5 then e=-2;break;end;n=f(7);break;end;else n=f(7);end else if e>=1 then repeat if e>3 then s=o.lAYFPOrp('#',...)-1;j={};break;end;y={};k={...};until true;else s=o.lAYFPOrp('#',...)-1;j={};end end end e=e+1;end;for e=0,s do if(e>=b)then y[e-b]=k[e+1];else n[e]=k[e+1];end;end;local e=s-b+1 local e;local o;local function f(...)while true do end end while true do if t<-40 then t=t+42 end e=a[t];o=e[te];if o<=11 then if 6>o then if 3>o then if 0>=o then for o=0,3 do if 1<o then if-2<=o then repeat if o~=2 then if(n[e[l]]==e[c])then t=t+1;else t=e[d];end;break;end;n[e[l]]=u[e[d]];t=t+1;e=a[t];until true;else n[e[l]]=u[e[d]];t=t+1;e=a[t];end else if-4<o then for f=34,96 do if 1>o then n[e[l]]=(e[d]~=0);t=t+1;e=a[t];break;end;u[e[d]]=n[e[l]];t=t+1;e=a[t];break;end;else u[e[d]]=n[e[l]];t=t+1;e=a[t];end end end else if o>=-1 then for f=31,55 do if o~=2 then t=e[d];break;end;local l=e[l];local t=n[e[d]];n[l+1]=t;n[l]=t[e[c]];break;end;else t=e[d];end end else if 3>=o then u[e[d]]=n[e[l]];else if o>=0 then repeat if 4<o then n(e[l],e[d]);break;end;local e=e[l]n[e]=n[e](h(n,e+1,r))until true;else n(e[l],e[d]);end end end else if o>8 then if o>9 then if o>=8 then for f=26,86 do if o>10 then if(n[e[l]]==e[c])then t=t+1;else t=e[d];end;break;end;n[e[l]]();break;end;else n[e[l]]();end else local o,a,f,r,c;local t=0;while t>-1 do if t<=2 then if 1<=t then if 0<=t then repeat if t~=2 then a=l;break;end;f=d;until true;else f=d;end else o=e;end else if 5<=t then if 6>t then n(c,r);else t=-2;end else if 4~=t then r=o[f];else c=o[a];end end end t=t+1 end end else if o<=6 then local e=e[l]n[e]=n[e](h(n,e+1,r))else if o>=5 then for f=24,93 do if 7~=o then if(n[e[l]]==e[c])then t=t+1;else t=e[d];end;break;end;n[e[l]]=u[e[d]];break;end;else n[e[l]]=u[e[d]];end end end end else if o>=18 then if 20>=o then if 19>o then local t=e[l]local l,e=_(n[t](h(n,t+1,e[d])))r=e+t-1 local e=0;for t=t,r do e=e+1;n[t]=l[e];end;else if o>19 then do return end;else local f,b,k,g,m,y,z,o,p,j,s;for o=0,6 do if 3>o then if 0>=o then n[e[l]]=u[e[d]];t=t+1;e=a[t];else if 0~=o then for r=48,65 do if o<2 then f=e[l];b=n[e[d]];n[f+1]=b;n[f]=b[e[c]];t=t+1;e=a[t];break;end;o=0;while o>-1 do if o<3 then if o>0 then if 1<o then m=d;else g=l;end else k=e;end else if 5<=o then if o>=4 then repeat if o>5 then o=-2;break;end;n(z,y);until true;else o=-2;end else if 2~=o then repeat if 4~=o then y=k[m];break;end;z=k[g];until true;else y=k[m];end end end o=o+1 end t=t+1;e=a[t];break;end;else f=e[l];b=n[e[d]];n[f+1]=b;n[f]=b[e[c]];t=t+1;e=a[t];end end else if o<=4 then if 1<=o then for c=48,57 do if 4~=o then n[e[l]]=(e[d]~=0);t=t+1;e=a[t];break;end;f=e[l]p,j=_(n[f](h(n,f+1,e[d])))r=j+f-1 s=0;for e=f,r do s=s+1;n[e]=p[s];end;t=t+1;e=a[t];break;end;else f=e[l]p,j=_(n[f](h(n,f+1,e[d])))r=j+f-1 s=0;for e=f,r do s=s+1;n[e]=p[s];end;t=t+1;e=a[t];end else if o>=4 then for d=13,77 do if o<6 then f=e[l]n[f]=n[f](h(n,f+1,r))t=t+1;e=a[t];break;end;n[e[l]]();break;end;else n[e[l]]();end end end end end end else if o<22 then n[e[l]]();else if 23==o then local l=e[l];local t=n[e[d]];n[l+1]=t;n[l]=t[e[c]];else n[e[l]]=(e[d]~=0);end end end else if o<=14 then if o>=13 then if o==13 then u[e[d]]=n[e[l]];else t=e[d];end else local t=e[l]local l,e=_(n[t](h(n,t+1,e[d])))r=e+t-1 local e=0;for t=t,r do e=e+1;n[t]=l[e];end;end else if 16<=o then if 14<o then repeat if o>16 then n[e[l]]=u[e[d]];break;end;n[e[l]]=(e[d]~=0);until true;else n[e[l]]=(e[d]~=0);end else do return end;end end end end t=1+t;end;end;return ee end;local d=0xff;local c={};local f=(1);local l='';(function(n)local t=n local a=0x00 local e=0x00 t={(function(r)if a>0x2d then return r end a=a+1 e=(e+0xa4a-r)%0x29 return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x94);l={l..'\58 a',l};c[f]=ee();f=f+((not o.hn_bErSq)and 1 or 0);l[1]='\58'..l[1];d[2]=0xff;end return true end)'WbqCS'and t[0x2](0x2d0+r))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xea);end return true end)'wHjFZ'and t[0x1](r+0x234))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xcc);end return true end)'CAkqr'and t[0x3](r+0x2eb))or r end),(function(o)if a>0x26 then return o end a=a+1 e=(e+0x99b-o)%0x26 return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x50);end return true end)'FaVmV'and t[0x2](0x1bf+o))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x92);d[2]=(d[2]*(g(function()c()end,h(l))-g(d[1],h(l))))+1;c[f]={};d=d[2];f=f+d;end return true end)'Rzdhc'and t[0x3](o+0x117))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x69);l='\37';d={function()d()end};l=l..'\100\43';end return true end)'YDVsH'and t[0x1](o+0xcf))or o end),(function(l)if a>0x2b then return l end a=a+1 e=(e+0xbf8-l)%0xd return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xe1);c[f]=le();f=f+d;end return true end)'Kju_e'and t[0x1](0x13d+l))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd9);end return true end)'FOETU'and t[0x3](l+0x148))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x17);end return true end)'ZUleL'and t[0x2](l+0x322))or l end)}t[0x2](0x245d)end){};local e=ne(h(c));return e(...);end return z((function()local n={}local e=0x01;local t;if o.hn_bErSq then t=o.hn_bErSq(z)else t=''end if o.YYTIDbif(t,o.clpSSQyI)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,t,l,d,o)local o;if e>3 then if e<6 then if 5==e then local e=l;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;else local e=l;local l,o,a=d(2);do return function()local f,t,d,n=n(t,e(e,e),e(e,e)+3);e(4);return(n*l)+(d*o)+(t*a)+f;end;end;end else if e<7 then do return d[t]end;else if e~=3 then for n=30,60 do if 7<e then do return t(e,nil,t);end break;end;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;else do return setmetatable({},{['__\99\97\108\108']=function(e,l,d,t,n)if n then return e[n]elseif t then return e else e[l]=d end end})end end end end else if 2<=e then if 0<=e then repeat if e~=3 then do return 16777216,65536,256 end;break;end;do return n(1),n(4,d,l,t,n),n(5,d,l,t)end;until true;else do return 16777216,65536,256 end;end else if e==0 then do return n(1),n(4,d,l,t,n),n(5,d,l,t)end;else do return function(t,e,n)if n then local e=(t/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(t%(e+e)>=e)and 1 or 0;end;end;end;end end end end),...)