Test

([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _wkIyOfcl_xfV = a; end)); return(function(o,...)local r;local c;local d;local t;local f;local h;local e=24915;local n=0;local l={};while n<753 do n=n+1;while n<0x152 and e%0x469a<0x234d do n=n+1 e=(e-302)%32171 local a=n+e if(e%0x1262)>=0x931 then e=(e+0x3a)%0xb12d while n<0xed and e%0x1340<0x9a0 do n=n+1 e=(e*528)%48511 local t=n+e if(e%0x2504)>=0x1282 then e=(e+0xbd)%0x5aee local e=92490 if not l[e]then l[e]=0x1 r=string;end elseif e%2~=0 then e=(e*0x3dd)%0x951d local e=75491 if not l[e]then l[e]=0x1 f={};end else e=(e*0x16e)%0x76ba n=n+1 local e=77181 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end end end elseif e%2~=0 then e=(e*0xfa)%0x376d while n<0x367 and e%0x373c<0x1b9e do n=n+1 e=(e-71)%46611 local t=n+e if(e%0xc1a)<=0x60d then e=(e*0x291)%0x4608 local e=12069 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\79\103\119\74\113\113\72\118\0\6\115\116\114\105\110\103\4\99\104\97\114\112\66\97\84\89\100\75\82\0\6\115\116\114\105\110\103\3\115\117\98\103\115\122\105\95\112\102\97\0\6\115\116\114\105\110\103\4\98\121\116\101\119\83\71\105\65\100\106\86\0\5\116\97\98\108\101\6\99\111\110\99\97\116\83\83\71\72\103\108\110\76\0\5\116\97\98\108\101\6\105\110\115\101\114\116\70\82\99\67\115\74\88\100\5";end elseif e%2~=0 then e=(e-0x1ae)%0x5974 local e=10403 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end else e=(e*0x3e8)%0x7b55 n=n+1 local e=27604 if not l[e]then l[e]=0x1 h=tonumber;end end end else e=(e+0x188)%0x5fda n=n+1 while n<0x3b5 and e%0x2f00<0x1780 do n=n+1 e=(e+328)%31486 local c=n+e if(e%0x3902)>=0x1c81 then e=(e*0x192)%0x3519 local e=66374 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e*0x2bd)%0x9548 local e=30956 if not l[e]then l[e]=0x1 end else e=(e+0xe6)%0x492e n=n+1 local e=39732 if not l[e]then l[e]=0x1 t=function(l)local e=0x01 local function n(n)e=e+n return l:sub(e-n,e-0x01)end while true do local l=n(0x01)if(l=="\5")then break end local e=r.byte(n(0x01))local e=n(e)if l=="\2"then e=f.OgwJqqHv(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then d[e]=function(e,n)return o(8,nil,o,n,e)end elseif l=="\4"then e=d[e]elseif l=="\0"then e=d[e][n(r.byte(n(0x01)))];end local n=n(0x08)f[n]=e end end end end end end end e=(e*319)%11341 end t(c);local e={};for n=0x0,0xff do local l=f.pBaTYdKR(n);e[n]=l;e[l]=n;end local function a(n)return e[n];end local l=(function(c,t)local r,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local o=c while true do n[0x03][f.gszi_pfa(t,e,(function()e=r+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#t while e<d+0x01 do n[0x02][l]=f.gszi_pfa(t,e,(function()e=r+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 f.FRcCsJXd(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+o)%0x100)));o=c+o;end end return f.SSGHglnL(n[0x01])end);t(l(209,"J=+N%GXZM7bzefuQN%"));t(l(32,"%VRHBw7vcWiDN X.XbN7VH.B RiWcX7vXBRBVwX  tcwv.vvBHHWXBXNi7BBRwvfBHRVdNXNNccRWvvWw7VwJiXv7VBwWnvRBWRXVB.vN.iB7RvBHBVHVVc377DHWBvRBWRXlvcwN iVWB7HBc;7V7 . Bcv7.w7wgNMiBX NVDBccGwBNRBAw.c ?ccvR7XBvRRVwNHNWBBRNvHBwHB_ Xw BiVWB7VBRRN)wNDNNiXWRvTB7Rc.icB7cDBc.vHwBHRgWXXNviV7VviBBHHUWN D.BARwvBBVRR{NXw77DwcXv>BVRH0DNV HcVvV7WHHu.VVcB77DwcXvGBVRH^DXRiRiWviBvRDRw.ccB7wD0WR7WBXHB.vNcNwcN7NvVBwRWiBc7 HiwcN7wBHHBXiNwDWWOcB7 BHVii_cBN iVWB7cXwR7oNX.N.DRcHwVBWVVXW ii7DcRw"));local e=(-2406+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>489 then return e end l=l+1 n=(n-946)%2593 if(n%1844)<922 then return e else return e(e(e)and e(e and e))end return e(e(e))end)return n;end)())local u=f.bBiZGKeX or f.AsAQiSOq;local le=(getfenv)or(function()return _ENV end);local te=1;local t=2;local d=3;local a=4;local function j(b,...)local s=l(e,"gGX?/dbJ_)H>1Qz}bQ11?X)_}z_>1H?x)bdW1H?GHG>/bt1)?X)G>Xb}>}?J/H+:b_1>?b_Q}Gb_>}X//b2?d>11Xb//QJd}1dXHJdzQdGJ/G d?_b})dX>_Gzz?bG>>}})dQG/z>GXFJ)}_/1HX>XG}Jzz//H}__H}ndX_}G?__JHz//bH1GXQ}?}>Gj}Gh_tQ1/XH_JHz??>H/G)_sz//GH1.>=H_)Qb?1HXddQQ/?H_}?b>1}?G_>GXJbQ??z)Q^}/HQG?X)_}}bzHJ/LHbxH}z_/1H? )bb/Qb?1)z<J?/_}}d)1}?b>QXX))nr)X/>Q?X)_>Q//1>}Jb>}X/t1d7bd?}1dG1Q>1?X__zzd/>HX/_bz1dX>)Gz_/zHbX1bG1_Xz_d/>/GH_k}_/z>XG_Jzzb/H>TGbHX})/_HzG/_KzB/JH1G?J_zX/>HHGWJbzX/XH)NzJ_zG/2Hbc1J)Q_?}H/2HJQQb?1HXn)bzQ/?H>XZbb1QX?_H?8/bHQM/_HQpXb)1z?_)H#^bbz1?_)_}}b/1>?m))}1J/Q)Xz)J}HbJ1bX1)X}_bQ1/Xz)o}Jd11XX__z*qdH1GXb)7}Xd_>zX/)z}Ndb>1XX__}cd/>H?G_bz1dX>)Gz_dzHdU1?G1_Xz_/}>/GH_5zb/1>XG_");local n=0;f.hBwyvUjg(function()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,c=o(0,o,e,s,f.wSGiAdjV);local function r()local n,l=f.wSGiAdjV(s,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local _=true;local _=0 local function k()local d=n();local e=n();local t=1;local d=(l(e,1,20)*(2^32))+d;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(d==_)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return f.HRngbuCi(e,n-1023)*(t+(d/(2^52)));end;local p=n;local function z(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=f.gszi_pfa(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+_),#l do e=e..f.gszi_pfa(l,n,n)end return e;end;local _=#f.aAzdsiM_(h('\49.\48'))~=1 local e=n;local function y(...)return{...},f.JEYPdmcZ('#',...)end local function ee()local e={};local h={};local s={};local u={s,h,nil,e};local e=n()local o={}for d=1,e do local l=c();local e;if(l==2)then e=(c()~=#{});elseif(l==1)then local n=k();if _ and f.Fv_tGOVp(f.aAzdsiM_(n),'.(\48+)$')then n=f.cQiQIZFx(n);end e=n;elseif(l==0)then e=z();end;o[d]=e;end;u[3]=c();for h=1,n()do local e=c();if(l(e,1,1)==0)then local f=l(e,2,3);local c=l(e,4,6);local e={r(),r(),nil,nil};if(f==0)then e[d]=r();e[a]=r();elseif(f==#{1})then e[d]=n();elseif(f==b[2])then e[d]=n()-(2^16)elseif(f==b[3])then e[d]=n()-(2^16)e[a]=r();end;if(l(c,1,1)==1)then e[t]=o[e[t]]end if(l(c,2,2)==1)then e[d]=o[e[d]]end if(l(c,3,3)==1)then e[a]=o[e[a]]end s[h]=e;end end;for e=1,n()do h[e-(#{1})]=ee();end;return u;end;local function ne(l,n,e)local d=n;local d=e;return h(f.Fv_tGOVp(f.Fv_tGOVp(({f.hBwyvUjg(l)})[2],n),e))end local function de(_,e,h)local function ee(...)local r,m,s,j,b,n,c,p,k,z,g,l;local e=0;while-1<e do if 2<e then if 4<e then if 4~=e then repeat if e<6 then l=o(7);break;end;e=-2;until true;else e=-2;end else if 3==e then p={};k={...};else z=f.JEYPdmcZ('#',...)-1;g={};end end else if e>=1 then if e>=0 then repeat if 2>e then s=o(6,18,3,87,_);b=y j=0;break;end;n=-41;c=-1;until true;else n=-41;c=-1;end else r=o(6,77,1,49,_);m=o(6,5,2,71,_);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 f(...)while true do end end while true do if n<-40 then n=n+42 end e=r[n];o=e[te];if o>11 then if 18>o then if o>=15 then if 16>o then local c,a,r,f,o;local n=0;while n>-1 do if 3>n then if 0<n then if-2<=n then for e=26,53 do if 2>n then a=t;break;end;r=d;break;end;else r=d;end else c=e;end else if n>4 then if 1~=n then repeat if 6~=n then l(o,f);break;end;n=-2;until true;else l(o,f);end else if 4>n then f=c[r];else o=c[a];end end end n=n+1 end else if o>=14 then repeat if 16<o then local f,s,z,y,k,p,m,o,j,g,_;for o=0,6 do if o<=2 then if o>=1 then if o~=-2 then for c=40,72 do if o<2 then f=e[t];s=l[e[d]];l[f+1]=s;l[f]=s[e[a]];n=n+1;e=r[n];break;end;o=0;while o>-1 do if o<3 then if 1>o then z=e;else if-2~=o then for e=13,60 do if 1~=o then k=d;break;end;y=t;break;end;else k=d;end end else if o<=4 then if o~=4 then p=z[k];else m=z[y];end else if 6==o then o=-2;else l(m,p);end end end o=o+1 end n=n+1;e=r[n];break;end;else f=e[t];s=l[e[d]];l[f+1]=s;l[f]=s[e[a]];n=n+1;e=r[n];end else l[e[t]]=h[e[d]];n=n+1;e=r[n];end else if 4>=o then if o~=3 then f=e[t]j,g=b(l[f](u(l,f+1,e[d])))c=g+f-1 _=0;for e=f,c do _=_+1;l[e]=j[_];end;n=n+1;e=r[n];else l[e[t]]=(e[d]~=0);n=n+1;e=r[n];end else if o~=2 then repeat if o~=5 then l[e[t]]();break;end;f=e[t]l[f]=l[f](u(l,f+1,c))n=n+1;e=r[n];until true;else l[e[t]]();end end end end break;end;local n=e[t]local d,e=b(l[n](u(l,n+1,e[d])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=d[e];end;until true;else local n=e[t]local d,e=b(l[n](u(l,n+1,e[d])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=d[e];end;end end else if 13>o then l[e[t]]=(e[d]~=0);else if o>=11 then for n=38,92 do if 13<o then l(e[t],e[d]);break;end;do return end;break;end;else do return end;end end end else if 21>o then if o<=18 then local t=e[t];local n=l[e[d]];l[t+1]=n;l[t]=n[e[a]];else if o>15 then repeat if 19~=o then if(l[e[t]]==e[a])then n=n+1;else n=e[d];end;break;end;l[e[t]]=(e[d]~=0);until true;else l[e[t]]=(e[d]~=0);end end else if 22<=o then if o~=21 then repeat if o~=23 then l[e[t]]();break;end;h[e[d]]=l[e[t]];until true;else h[e[d]]=l[e[t]];end else local n=e[t]local d,e=b(l[n](u(l,n+1,e[d])))c=e+n-1 local e=0;for n=n,c do e=e+1;l[n]=d[e];end;end end end else if 6>o then if o<3 then if o>0 then if o==1 then l[e[t]]();else h[e[d]]=l[e[t]];end else l[e[t]]=h[e[d]];end else if o>=4 then if o>0 then for f=13,76 do if o<5 then for o=0,3 do if 2>o then if 0~=o then h[e[d]]=l[e[t]];n=n+1;e=r[n];else l[e[t]]=(e[d]~=0);n=n+1;e=r[n];end else if o~=-2 then repeat if 3~=o then l[e[t]]=h[e[d]];n=n+1;e=r[n];break;end;if(l[e[t]]==e[a])then n=n+1;else n=e[d];end;until true;else l[e[t]]=h[e[d]];n=n+1;e=r[n];end end end break;end;local e=e[t]l[e]=l[e](u(l,e+1,c))break;end;else for o=0,3 do if 2>o then if 0~=o then h[e[d]]=l[e[t]];n=n+1;e=r[n];else l[e[t]]=(e[d]~=0);n=n+1;e=r[n];end else if o~=-2 then repeat if 3~=o then l[e[t]]=h[e[d]];n=n+1;e=r[n];break;end;if(l[e[t]]==e[a])then n=n+1;else n=e[d];end;until true;else l[e[t]]=h[e[d]];n=n+1;e=r[n];end end end end else n=e[d];end end else if 8>=o then if 7>o then local e=e[t]l[e]=l[e](u(l,e+1,c))else if o>5 then repeat if 8~=o then n=e[d];break;end;if(l[e[t]]==e[a])then n=n+1;else n=e[d];end;until true;else n=e[d];end end else if o<=9 then l[e[t]]=h[e[d]];else if 8~=o then for n=46,87 do if o~=10 then do return end;break;end;local t=e[t];local n=l[e[d]];l[t+1]=n;l[t]=n[e[a]];break;end;else do return end;end end end end end n=1+n;end;end;return ee end;local d=0xff;local c={};local f=(1);local t='';(function(n)local l=n local o=0x00 local e=0x00 l={(function(r)if o>0x1e then return r end o=o+1 e=(e+0x8fc-r)%0x4c return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xca);end return true end)'QQniY'and l[0x3](0x83+r))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd6);t={t..'\58 a',t};c[f]=ee();f=f+(1);t[1]='\58'..t[1];d[2]=0xff;end return true end)'KOdyc'and l[0x2](r+0x3a6))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x5d);end return true end)'pOinK'and l[0x1](r+0xee))or r end),(function(r)if o>0x2e then return r end o=o+1 e=(e+0x1186-r)%0x19 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x1c);end return true end)'TKXxQ'and l[0x3](0x3dc+r))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x97);d[2]=(d[2]*(ne(function()c()end,u(t))-ne(d[1],u(t))))+1;c[f]={};d=d[2];f=f+d;end return true end)'PFJTm'and l[0x1](r+0x359))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf3);c[f]=le();f=f+d;end return true end)'ItALh'and l[0x2](r+0x25f))or r end),(function(f)if o>0x27 then return f end o=o+1 e=(e+0xc90-f)%0x4b return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xee);end return true end)'mgASD'and l[0x3](0x1c3+f))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xaa);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'RCokD'and l[0x1](f+0x116))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xec);end return true end)'fdDw_'and l[0x2](f+0x371))or f end)}l[0x3](0x13fd)end){};local e=de(u(c));return e(...);end return j((function()local n={}local e=0x01;local l;if f.E_wcyDlF then l=f.E_wcyDlF(j)else l=''end if f.Fv_tGOVp(l,f.wodBtTSq)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,d,t,o)local o;if 3>=l then if 2<=l then if 1<=l then for o=16,71 do if l~=3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;break;end;else do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;end else if l>0 then do return function(l,e,n)if n then local e=(l/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;end;else do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;end end else if l>=6 then if 6>=l then do return t[n]end;else if 3<=l then for e=24,66 do if l~=7 then do return n(l,nil,n);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,d,t,l,n)if n then return e[n]elseif l then return e else e[d]=t end end})end break;end;else do return n(l,nil,n);end end end else if 2~=l then repeat if l~=4 then local l=d;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;break;end;local l=d;local d,t,f=t(2);do return function()local n,o,r,e=e(n,l(l,l),l(l,l)+3);l(4);return(e*d)+(r*t)+(o*f)+n;end;end;until true;else local l=d;local d,t,o=t(2);do return function()local n,e,r,f=e(n,l(l,l),l(l,l)+3);l(4);return(f*d)+(r*t)+(e*o)+n;end;end;end end end end),...)