Test

([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _LukUxuVnjlxL = a; end)); return(function(o,...)local l;local f;local s;local r;local a;local d;local e=24915;local n=0;local t={};while n<342 do n=n+1;while n<0x31e and e%0x20a8<0x1054 do n=n+1 e=(e*149)%38383 local c=n+e if(e%0x15cc)>=0xae6 then e=(e+0x35a)%0x4898 while n<0x2a6 and e%0x23a6<0x11d3 do n=n+1 e=(e-687)%17259 local d=n+e if(e%0x2e26)>=0x1713 then e=(e-0x3e3)%0x8299 local e=9724 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end elseif e%2~=0 then e=(e*0x1cd)%0x56d7 local e=39252 if not t[e]then t[e]=0x1 s=tonumber;end else e=(e*0x1ce)%0x2b6f n=n+1 local e=90686 if not t[e]then t[e]=0x1 end end end elseif e%2~=0 then e=(e+0x2bb)%0x5166 while n<0x24e and e%0x48d0<0x2468 do n=n+1 e=(e-241)%27177 local d=n+e if(e%0xe8e)>0x747 then e=(e-0xdc)%0x6b17 local e=56027 if not t[e]then t[e]=0x1 f=string;end elseif e%2~=0 then e=(e-0x275)%0x9f2e local e=35940 if not t[e]then t[e]=0x1 r={};end else e=(e-0x1e5)%0x584d n=n+1 local e=16561 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end end end else e=(e+0xa0)%0xafb4 n=n+1 while n<0xf8 and e%0x2d2a<0x1695 do n=n+1 e=(e-318)%42873 local c=n+e if(e%0x157a)<0xabd then e=(e*0x307)%0x10cf local e=40317 if not t[e]then t[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\84\101\82\67\109\75\109\99\0\6\115\116\114\105\110\103\4\99\104\97\114\118\95\67\67\97\95\98\117\0\6\115\116\114\105\110\103\3\115\117\98\66\115\97\121\116\111\73\122\0\6\115\116\114\105\110\103\4\98\121\116\101\86\75\77\102\86\112\104\115\0\5\116\97\98\108\101\6\99\111\110\99\97\116\71\68\87\84\111\115\81\112\0\5\116\97\98\108\101\6\105\110\115\101\114\116\95\104\84\100\101\111\73\83\5";end elseif e%2~=0 then e=(e+0x3ab)%0x537b local e=97250 if not t[e]then t[e]=0x1 end else e=(e-0xf0)%0xb238 n=n+1 local e=70229 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=f.byte(t(0x01))local e=t(e)if n=="\2"then e=r.TeRCmKmc(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then l[e]=function(n,e)return o(8,nil,o,e,n)end elseif n=="\4"then e=l[e]elseif n=="\0"then e=l[e][t(f.byte(t(0x01)))];end local n=t(0x08)r[n]=e end end end end end end end e=(e-872)%15489 end d(a);local n={};for e=0x0,0xff do local t=r.v_CCa_bu(e);n[e]=t;n[t]=e;end local function c(e)return n[e];end local f=(function(a,d)local f,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local o=a while true do n[0x03][r.BsaytoIz(d,e,(function()e=f+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]=r.BsaytoIz(d,e,(function()e=f+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 r._hTdeoIS(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+o)%0x100)));o=a+o;end end return r.GDWTosQp(n[0x01])end);d(f(108,".>HS0L*IwPms4cn,PP"));d(f(85,"ud_jgt# &%o87(Zyo8t7 g_L7%#8d88y* d_7Z ddy7t#gyd(gg(_ ogt%8##_ &d#8y t_18x t2Z7dgy_&7o y8&#  (_o77 7_(8dt7__7# o.78Z#_87#(&tjd(o 7_7(^d%_778&%_j(jtodj(j&&d (ttZ_g#Zd(jd(Y&Z_( t& _o(#%gj (jtZd&(_#tj%Z8# 7Z&d%jjCZo&ZjdZ8&jgd(%&tjo(Z%nj87}#yd8Z8 (dj&E_yg#Z7%8g y:%_g_Z#%__7(_&d_(Zy&C_Z&_j_g7Zg%xgtZ%jtgyyjo+j7Z%%7tg78%Z_7yZ%&tt(7j&ZtyyojtRZ7%%g7yo Zt_(go(goyg&8Z&%goot y%o%to;_8jj&v7&rjz(%%tZ(%o8_gy>dotgZKoo8_yZ%ogjtZd8#g#%%g&t7y88%t&o4o7t()88##gy %jg#Zg%8ttd%&8yo"));local e=(-4944+(function()local t,e=0,1;(function(n,e)e(e(n,e and n),n(n,n and e)and e(n,e))end)(function(l,n)if t>302 then return n end t=t+1 e=(e-89)%6851 if(e%1478)>=739 then return l(l(l,n),n(n,l and n))else return l end return n end,function(l,n)if t>116 then return l end t=t+1 e=(e-963)%49800 if(e%1280)<640 then e=(e+821)%15001 return n(n(l,n),l(n,n))else return n end return n end)return e;end)())local ee=(getfenv)or(function()return _ENV end);local h=r.nGpGugfR or r.xDlOvewS;local d=3;local l=2;local ne=1;local c=4;local function y(_,...)local u=f(e,"iGk> 9txV_mM-5&2G_k >t V9-xtx&_bmk4O>9>_ &t2Vk_k_MMkM5tmVxV-_&M#kGkn9Mt>92_ m>_t-v-&&kpr&tm&&95(&k2 9mVd_>m2t&-t5M2h2M-V>Gk59GGAxkVt_9m-m2M2&k&92t- k5>G &9 G&95_Gm>M mM-252m&2t&9-t55&V2mq-ttm Mt- m5552&_&Mk-f5k& 95t_Vx_G Cxwtkx VtIbG&>o>&9>k->> 9_V_MM25k59&Vc55 G_>m -G5 &9 tM_&x25G5tm&M2G G9>55mb>2-F&k6x2M>-95t-52G{GZ2G9 V9VtGxVV>mGVVMM-V5m&5LV&5>k  9 2 BtGVkm - &t0xkV m9mVMm--522*JkG >V G m9-t&Vx_km Mt5m2G&-2&Gok >  t9V_g_tV&mLMk-m5t&_2mN2G&>  M9 ttxV_U_-m2-d5t&52tAVGm>>>&9Gtkx _t_VmmM--2&/2k; kV>9>m -9&xGVk_ mt-m5V5-&2?;Gxk >t VxmVkx&_GmkM9-t5-&m%&GMkb>9  9-tVxmV-_&M2-k5V&t2_{mG-k& 39Mt xxVV_&m-M&5}&kCxFtGVkm>- &tkxkV MGmVMm--522(%>G kt V m9-t&VG_km Mt-V");local n=0;r.QkYaDris(function()n=n+1 end)local function e(t,e)if e then return n end;n=t+n;end local t,n,a=o(0,o,e,u,r.VKMfVphs);local function f()local t,n=r.VKMfVphs(u,e(1,3),e(5,6)+2);e(2);return(n*256)+t;end;local k=true;local k=0 local function g()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==k)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 r.aAP_GpwH(e,n-1023)*(d+(l/(2^52)));end;local m=n;local function b(n)local t;if(not n)then n=m();if(n==0)then return'';end;end;t=r.BsaytoIz(u,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+k),#t do e=e..r.BsaytoIz(t,n,n)end return e;end;local k=#r.hWRVWnTW(s('\49.\48'))~=1 local e=n;local function p(...)return{...},r.jCRbHIsX('#',...)end local function y()local e={};local u={};local h={};local s={h,u,nil,e};local e=n()local o={}for l=1,e do local t=a();local n;if(t==1)then n=(a()~=#{});elseif(t==0)then local e=g();if k and r.DRgqUhFa(r.hWRVWnTW(e),'.(\48+)$')then e=r.ZKSFRazA(e);end n=e;elseif(t==2)then n=b();end;o[l]=n;end;for e=1,n()do u[e-(#{1})]=y();end;for u=1,n()do local e=a();if(t(e,1,1)==0)then local r=t(e,2,3);local a=t(e,4,6);local e={f(),f(),nil,nil};if(r==0)then e[d]=f();e[c]=f();elseif(r==#{1})then e[d]=n();elseif(r==_[2])then e[d]=n()-(2^16)elseif(r==_[3])then e[d]=n()-(2^16)e[c]=f();end;if(t(a,1,1)==1)then e[l]=o[e[l]]end if(t(a,2,2)==1)then e[d]=o[e[d]]end if(t(a,3,3)==1)then e[c]=o[e[c]]end h[u]=e;end end;s[3]=a();return s;end;local function j(t,n,e)local l=n;local l=e;return s(r.DRgqUhFa(r.DRgqUhFa(({r.QkYaDris(t)})[2],n),e))end local function z(b,e,u)local function z(...)local f,z,_,j,s,n,a,m,k,g,y,t;local e=0;while-1<e do if 3<=e then if 4>=e then if e>2 then repeat if 4~=e then m={};k={...};break;end;g=r.jCRbHIsX('#',...)-1;y={};until true;else m={};k={...};end else if 2<=e then for n=49,68 do if e<6 then t=o(7);break;end;e=-2;break;end;else t=o(7);end end else if e>0 then if e>=-3 then for t=35,70 do if e~=1 then n=-41;a=-1;break;end;_=o(6,46,3,81,b);s=p j=0;break;end;else n=-41;a=-1;end else f=o(6,57,1,56,b);z=o(6,75,2,53,b);end end e=e+1;end;for e=0,g do if(e>=_)then m[e-_]=k[e+1];else t[e]=k[e+1];end;end;local e=g-_+1 local e;local o;local function r(...)while true do end end while true do if n<-40 then n=n+42 end e=f[n];o=e[ne];if 12<=o then if o>=18 then if 20>=o then if o>=19 then if 18<o then for n=23,71 do if o<20 then local n=e[l];local l=t[e[d]];t[n+1]=l;t[n]=l[e[c]];break;end;local r,a,f,c,o;local n=0;while n>-1 do if n<3 then if n>0 then if-1~=n then for e=49,92 do if 2>n then a=l;break;end;f=d;break;end;else f=d;end else r=e;end else if 5>n then if n~=1 then for e=37,59 do if 4~=n then c=r[f];break;end;o=r[a];break;end;else o=r[a];end else if n>=4 then repeat if n>5 then n=-2;break;end;t(o,c);until true;else t(o,c);end end end n=n+1 end break;end;else local o,a,f,c,r;local n=0;while n>-1 do if n<3 then if n>0 then if-1~=n then for e=49,92 do if 2>n then a=l;break;end;f=d;break;end;else f=d;end else o=e;end else if 5>n then if n~=1 then for e=37,59 do if 4~=n then c=o[f];break;end;r=o[a];break;end;else r=o[a];end else if n>=4 then repeat if n>5 then n=-2;break;end;t(r,c);until true;else t(r,c);end end end n=n+1 end end else t[e[l]]=(e[d]~=0);end else if o<22 then local n=e[l]local l,e=s(t[n](h(t,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;t[n]=l[e];end;else if 22~=o then u[e[d]]=t[e[l]];else if(t[e[l]]==e[c])then n=n+1;else n=e[d];end;end end end else if 15<=o then if 16>o then for o=0,3 do if 1<o then if o~=3 then t[e[l]]=u[e[d]];n=n+1;e=f[n];else if(t[e[l]]==e[c])then n=n+1;else n=e[d];end;end else if 1~=o then t[e[l]]=(e[d]~=0);n=n+1;e=f[n];else u[e[d]]=t[e[l]];n=n+1;e=f[n];end end end else if 17==o then t[e[l]]=u[e[d]];else do return end;end end else if o<13 then t[e[l]]();else if 11~=o then for r=47,73 do if 14>o then t[e[l]]=u[e[d]];break;end;local o,_,m,b,k;for r=0,6 do if r<3 then if 1>r then t[e[l]]=u[e[d]];n=n+1;e=f[n];else if-1~=r then repeat if r~=2 then o=e[l];_=t[e[d]];t[o+1]=_;t[o]=_[e[c]];n=n+1;e=f[n];break;end;t(e[l],e[d]);n=n+1;e=f[n];until true;else t(e[l],e[d]);n=n+1;e=f[n];end end else if r>4 then if r~=6 then o=e[l]t[o]=t[o](h(t,o+1,a))n=n+1;e=f[n];else t[e[l]]();end else if r>2 then for c=43,93 do if r<4 then t[e[l]]=(e[d]~=0);n=n+1;e=f[n];break;end;o=e[l]m,b=s(t[o](h(t,o+1,e[d])))a=b+o-1 k=0;for e=o,a do k=k+1;t[e]=m[k];end;n=n+1;e=f[n];break;end;else t[e[l]]=(e[d]~=0);n=n+1;e=f[n];end end end end break;end;else local o,_,b,m,k;for r=0,6 do if r<3 then if 1>r then t[e[l]]=u[e[d]];n=n+1;e=f[n];else if-1~=r then repeat if r~=2 then o=e[l];_=t[e[d]];t[o+1]=_;t[o]=_[e[c]];n=n+1;e=f[n];break;end;t(e[l],e[d]);n=n+1;e=f[n];until true;else t(e[l],e[d]);n=n+1;e=f[n];end end else if r>4 then if r~=6 then o=e[l]t[o]=t[o](h(t,o+1,a))n=n+1;e=f[n];else t[e[l]]();end else if r>2 then for c=43,93 do if r<4 then t[e[l]]=(e[d]~=0);n=n+1;e=f[n];break;end;o=e[l]b,m=s(t[o](h(t,o+1,e[d])))a=m+o-1 k=0;for e=o,a do k=k+1;t[e]=b[k];end;n=n+1;e=f[n];break;end;else t[e[l]]=(e[d]~=0);n=n+1;e=f[n];end end end end end end end end else if 5>=o then if o<3 then if 0>=o then t[e[l]]=(e[d]~=0);else if o>-2 then repeat if o<2 then u[e[d]]=t[e[l]];break;end;local e=e[l]t[e]=t[e](h(t,e+1,a))until true;else local e=e[l]t[e]=t[e](h(t,e+1,a))end end else if o>3 then if o>=0 then for r=31,86 do if o~=4 then local e=e[l]t[e]=t[e](h(t,e+1,a))break;end;if(t[e[l]]==e[c])then n=n+1;else n=e[d];end;break;end;else if(t[e[l]]==e[c])then n=n+1;else n=e[d];end;end else t[e[l]]();end end else if o>=9 then if 10<=o then if 8~=o then for r=44,52 do if o<11 then n=e[d];break;end;t(e[l],e[d]);break;end;else n=e[d];end else n=e[d];end else if o>6 then if 7~=o then local n=e[l]local l,e=s(t[n](h(t,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;t[n]=l[e];end;else do return end;end else local n=e[l];local l=t[e[d]];t[n+1]=l;t[n]=l[e[c]];end end end end n=1+n;end;end;return z end;local l=0xff;local a={};local o=(1);local d='';(function(n)local t=n local r=0x00 local e=0x00 t={(function(o)if r>0x24 then return o end r=r+1 e=(e+0x40d-o)%0x11 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xb5);end return true end)'fylwD'and t[0x1](0x39e+o))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xcd);end return true end)'DnUwq'and t[0x3](o+0xb3))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd9);d='\37';l={function()l()end};d=d..'\100\43';end return true end)'kSFSl'and t[0x2](o+0x230))or o end),(function(f)if r>0x30 then return f end r=r+1 e=(e+0x67e-f)%0x41 return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x85);l[2]=(l[2]*(j(function()a()end,h(d))-j(l[1],h(d))))+1;a[o]={};l=l[2];o=o+l;end return true end)'iRCCP'and t[0x3](0x1ad+f))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xdf);end return true end)'hmsyF'and t[0x1](f+0x2c8))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xb3);d={d..'\58 a',d};a[o]=y();o=o+(1);d[1]='\58'..d[1];l[2]=0xff;end return true end)'ieQtj'and t[0x2](f+0x225))or f end),(function(d)if r>0x2e then return d end r=r+1 e=(e+0x843-d)%0xd return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x48);end return true end)'HSySi'and t[0x1](0x332+d))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x63);a[o]=ee();o=o+l;end return true end)'soXYC'and t[0x3](d+0x87))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xf4);end return true end)'Xq_Zf'and t[0x2](d+0x311))or d end)}t[0x1](0x9aa)end){};local e=z(h(a));return e(...);end return y((function()local n={}local e=0x01;local t;if r.k_AyGvHR then t=r.k_AyGvHR(y)else t=''end if r.DRgqUhFa(t,r.MMhajQXQ)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(t,e,n,d,l,o)local o;if t>3 then if t>5 then if 7>t then do return l[n]end;else if 5<t then for e=20,55 do if t<8 then do return setmetatable({},{['__\99\97\108\108']=function(e,t,d,l,n)if n then return e[n]elseif l then return e else e[t]=d end end})end break;end;do return n(t,nil,n);end break;end;else do return n(t,nil,n);end end end else if t>=2 then repeat if t>4 then local t=d;do return function()local e=e(n,t(t,t),t(t,t));t(1);return e;end;end;break;end;local t=d;local o,f,r=l(2);do return function()local l,d,n,e=e(n,t(t,t),t(t,t)+3);t(4);return(e*o)+(n*f)+(d*r)+l;end;end;until true;else local t=d;local d,l,o=l(2);do return function()local r,n,f,e=e(n,t(t,t),t(t,t)+3);t(4);return(e*d)+(f*l)+(n*o)+r;end;end;end end else if 1<t then if-2~=t then for o=36,84 do if 3>t then do return 16777216,65536,256 end;break;end;do return e(1),e(4,l,d,n,e),e(5,l,d,n)end;break;end;else do return e(1),e(4,l,d,n,e),e(5,l,d,n)end;end else if-2~=t then for o=44,68 do if 1~=t then do return e(1),e(4,l,d,n,e),e(5,l,d,n)end;break;end;do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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(n,e,t)if t then local e=(n/2^(e-1))%2^((t-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 end end end),...)