Kod:
([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _mUQSySTCtWdE = a; end)); return(function(u,...)local a;local s;local f;local o;local d;local t;local e=24915;local n=0;local l={};while n<763 do n=n+1;while n<0x29c and e%0x912<0x489 do n=n+1 e=(e+326)%11743 local r=n+e if(e%0x4d3a)>0x269d then e=(e*0x1cb)%0x4a7f while n<0x364 and e%0x3902<0x1c81 do n=n+1 e=(e-213)%23909 local a=n+e if(e%0x2e92)>0x1749 then e=(e+0x51)%0x1be9 local e=42254 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=f.byte(l(0x01))local e=l(e)if n=="\2"then e=o.ACkwzrVJ(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(e,n)return u(8,nil,u,n,e)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][l(f.byte(l(0x01)))];end local n=l(0x08)o[n]=e end end end elseif e%2~=0 then e=(e-0x34b)%0x5eee local e=10173 if not l[e]then l[e]=0x1 end else e=(e+0x3cf)%0x8c87 n=n+1 local e=54640 if not l[e]then l[e]=0x1 end end end elseif e%2~=0 then e=(e*0x82)%0x5a5f while n<0x228 and e%0x32ae<0x1957 do n=n+1 e=(e-665)%48957 local t=n+e if(e%0x3df2)>0x1ef9 then e=(e-0x2a6)%0xaaa4 local e=54192 if not l[e]then l[e]=0x1 f=string;end elseif e%2~=0 then e=(e-0x36b)%0xbccc local e=54541 if not l[e]then l[e]=0x1 s=tonumber;end else e=(e*0x3a7)%0x66bf n=n+1 local e=95832 if not l[e]then l[e]=0x1 o={};end end end else e=(e*0xfe)%0x42c7 n=n+1 while n<0x277 and e%0x410c<0x2086 do n=n+1 e=(e+855)%36311 local d=n+e if(e%0x4534)<=0x229a then e=(e-0x207)%0x2e34 local e=29246 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end elseif e%2~=0 then e=(e+0x263)%0x5942 local e=12451 if not l[e]then l[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\65\67\107\119\122\114\86\74\0\6\115\116\114\105\110\103\4\99\104\97\114\108\65\67\121\80\85\74\104\0\6\115\116\114\105\110\103\3\115\117\98\103\106\120\108\121\65\65\65\0\6\115\116\114\105\110\103\4\98\121\116\101\66\100\77\110\73\73\121\111\0\5\116\97\98\108\101\6\99\111\110\99\97\116\107\108\114\102\107\83\99\103\0\5\116\97\98\108\101\6\105\110\115\101\114\116\106\73\74\83\71\115\86\69\5";end else e=(e*0x1c1)%0xa2f1 n=n+1 local e=36934 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end end end e=(e+209)%23189 end d(a);local e={};for n=0x0,0xff do local l=o.lACyPUJh(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local l=(function(r,d)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local f=r while true do n[0x03][o.gjxlyAAA(d,e,(function()e=a+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]=o.gjxlyAAA(d,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.jIJSGsVE(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.klrfkScg(n[0x01])end);d(l(106,"Dz_=QW1CIX(JZAqMXJ"));d(l(156,"}UBtv Vwde&p;Oq?Vv;qe?_vVV;UB&dwddv;;UUOdvOevwd q; UOeUU&pe;!UOxBwde?d ;&tDed;O&v &&U&dew OO&;UBVOOVvKwUqpV&Ot_?V&q;B? _p&dp?K B&OUVwtw vUeeUKVt;;tBe?qtVV&dB?ed?Vqd ^UOw q;vvv U.V;OUvd&v4dvwOBt&wvOt peep;Bd?tvep;Uew qdtep:*UVVOvtUeOO?vq;BXdevOOVt vppVqqUvtpdUwwq&ttVdpqpweOUUwdX>n?d ;ttdUqO ;&s?dwq;? Be?qVVpVqOUVO??tqO U_ee?B e; p;Bv?v tppBfdBOOvV&tqe UOqUB&eqdvBp?;)Be?;vOpBBKwOdB pBUdVOOtt?deqd epeU?wB<UVB ;;Be ?B d&OUtw?p&vqd +OwVpqBV&Ze;<UOjtVeU?&Vv&eU;wV;v B&q-TwBwdOq&?G w8;OB?&vPO U;vBUwvqOtOeVpvU;qevUpdULUUOVv#&w4pwBpqU.eV?tvd&UBpwede"));local e=(114+(function()local l,n=0,1;(function(e)e(e(e))end)(function(e)if l>268 then return e end l=l+1 n=(n+10)%14472 if(n%296)>148 then n=(n+893)%5491 return e(e(e))else return e end return e end)return n;end)())local z=(getfenv)or(function()return _ENV end);local c=o.BrEinRVl or o.QLYUWFqn;local d=3;local t=2;local ee=1;local r=4;local function _(p,...)local a=l(e,"D-O8fab27+Tq^=Ex7BxObqEfaEExfx^7f-B2TO-q+8x-2^x8b7=abxEbab=ffb^q-+q8O2T4-T+^E7+fv=7f7^8q2=xbbx8^^+f8^bE^TqO2T8-af+-+2^v2O=xb2-E2ba^xfb=18TqOE2q2OOTb-8ffET7axE2b=fax=bs^qq--228O^OEO7--++-hq+-x+2=T=8^qaOET2E7+==+aO^qT^8-TT-x+q=qf+^O2EEb2aTaa2=Oab^8f+Tx8qqO-=T8L=+OAT7+x82axfO2=aaT=-R^^E-q2788+EObaq-77bx77Oxf2aTTb-^Efx^=B2^8OqqTOEb8-T+^%--T+^Jq7fx=EOaE^+fa^=f2qEOET^-E8-qbOO+q-fE^28=ff+^fb8qb8K+7fO+EOf2Eq88OTf-=+ba2x^2aET8T=-a+ax=qa6^+fOOO+a-T7q+x-7+-jT78,q2aEEb2Ezbx=Ofq^f8EqbOxT788q9-87^Qa2xx22kE+2fEEaf^=fb^f87q-OT^+OT+a,E72}b2+x8bqEba==Ta-^7f-qT8+T^Ob+E-2T-u+7Oxq2aE=bb=xbT=OfT^88^q+OET2O3TqOa7qia2=x=bxE7b-xTbf^^fbqE87qCOxTOO=+an=7+xx2qx-bTE8a^=xfE^qf qT8OTqOf+=Ol7xe+7-xE28E^ba=Ebb=_f+^O8qqfOxTb-xqa--7Tp82=xabxE2b>ETaO^qffqE8bTxO7");local n=0;o.OQpZabny(function()o.THjWv_Bc()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,h=u(0,u,e,a,o.BdMnIIyo);local function f()local l,n=o.BdMnIIyo(a,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local b=true;local b=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==b)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 o.pKrvLGkE(e,n-1023)*(d+(t/(2^52)));end;local j=n;local function k(n)local l;if(not n)then n=j();if(n==0)then return'';end;end;l=o.gjxlyAAA(a,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..o.gjxlyAAA(l,n,n)end return e;end;local b=#o.IMvFyTJc(s('\49.\48'))~=1 local e=n;local function ne(...)return{...},o.yYhaPeQF('#',...)end local function _()local e={};local c={};local u={};local s={u,c,nil,e};local e=n()local a={}for t=1,e do local l=h();local e;if(l==2)then e=(h()~=#{});elseif(l==3)then local n=y();if b and o.jsSrPsxr(o.IMvFyTJc(n),'.(\48+)$')then n=o.ZHjcTIoY(n);end e=n;elseif(l==1)then e=k();end;a[t]=e;end;for e=1,n()do c[e-(#{1})]=_();end;s[3]=h();for s=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local c=l(e,4,6);local e={f(),f(),nil,nil};if(o==0)then e[d]=f();e[r]=f();elseif(o==#{1})then e[d]=n();elseif(o==p[2])then e[d]=n()-(2^16)elseif(o==p[3])then e[d]=n()-(2^16)e[r]=f();end;if(l(c,1,1)==1)then e[t]=a[e[t]]end if(l(c,2,2)==1)then e[d]=a[e[d]]end if(l(c,3,3)==1)then e[r]=a[e[r]]end u[s]=e;end end;return s;end;local function g(l,e,n)local t=e;local t=n;return s(o.jsSrPsxr(o.jsSrPsxr(({o.OQpZabny(l)})[2],e),n))end local function m(k,e,h)local function _(...)local f,_,p,g,b,l,a,y,s,j,m,n;local e=0;while-1<e do if 3>e then if 1<=e then if e>-1 then for n=12,61 do if 1<e then l=-41;a=-1;break;end;p=u(6,91,3,23,k);b=ne g=0;break;end;else l=-41;a=-1;end else f=u(6,89,1,70,k);_=u(6,54,2,58,k);end else if 5<=e then if e~=1 then repeat if e~=5 then e=-2;break;end;n=u(7);until true;else n=u(7);end else if e>-1 then for n=29,54 do if e~=3 then j=o.yYhaPeQF('#',...)-1;m={};break;end;y={};s={...};break;end;else y={};s={...};end end end e=e+1;end;for e=0,j do if(e>=p)then y[e-p]=s[e+1];else n[e]=s[e+1];end;end;local e=j-p+1 local e;local o;local function u(...)while true do end end while true do if l<-40 then l=l+42 end e=f[l];o=e[ee];if 12>o then if o<6 then if o<=2 then if 1<=o then if o>-3 then for f=39,70 do if o<2 then n[e[t]]=h[e[d]];break;end;l=e[d];break;end;else n[e[t]]=h[e[d]];end else n[e[t]]();end else if 4<=o then if o==5 then if(n[e[t]]~=e[r])then l=l+1;else l=e[d];end;else n[e[t]]();end else local l=e[t];local t=n[e[d]];n[l+1]=t;n[l]=t[e[r]];end end else if o<9 then if o>6 then if o>4 then for l=14,79 do if o>7 then n[e[t]]=(e[d]~=0);break;end;local e=e[t]n[e]=n[e](c(n,e+1,a))break;end;else n[e[t]]=(e[d]~=0);end else local a,f,c,r,o;local l=0;while l>-1 do if l>=3 then if l>4 then if l>1 then repeat if l~=5 then l=-2;break;end;n(o,r);until true;else n(o,r);end else if l>=2 then for e=23,63 do if 4~=l then r=a[c];break;end;o=a[f];break;end;else o=a[f];end end else if 0<l then if l>0 then repeat if l~=1 then c=d;break;end;f=t;until true;else f=t;end else a=e;end end l=l+1 end end else if 9<o then if 7<o then for f=20,89 do if 10~=o then h[e[d]]=n[e[t]];break;end;l=e[d];break;end;else h[e[d]]=n[e[t]];end else n[e[t]]=h[e[d]];end end end else if o>=18 then if 20<o then if o>21 then if 19<o then for u=16,85 do if 22<o then local l=e[t]local t,e=b(n[l](c(n,l+1,e[d])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=t[e];end;break;end;for o=0,3 do if 1>=o then if o>=-1 then for a=48,83 do if o<1 then n[e[t]]=(e[d]~=0);l=l+1;e=f[l];break;end;h[e[d]]=n[e[t]];l=l+1;e=f[l];break;end;else n[e[t]]=(e[d]~=0);l=l+1;e=f[l];end else if 3>o then n[e[t]]=h[e[d]];l=l+1;e=f[l];else if(n[e[t]]~=e[r])then l=l+1;else l=e[d];end;end end end break;end;else local l=e[t]local t,e=b(n[l](c(n,l+1,e[d])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=t[e];end;end else n[e[t]]=(e[d]~=0);end else if o<=18 then if(n[e[t]]~=e[r])then l=l+1;else l=e[d];end;else if o~=20 then local o,s,y,k,p;for u=0,6 do if u>2 then if 5<=u then if 2~=u then repeat if u~=6 then o=e[t]n[o]=n[o](c(n,o+1,a))l=l+1;e=f[l];break;end;n[e[t]]();until true;else o=e[t]n[o]=n[o](c(n,o+1,a))l=l+1;e=f[l];end else if u>1 then repeat if u~=3 then o=e[t]y,k=b(n[o](c(n,o+1,e[d])))a=k+o-1 p=0;for e=o,a do p=p+1;n[e]=y[p];end;l=l+1;e=f[l];break;end;n[e[t]]=(e[d]~=0);l=l+1;e=f[l];until true;else n[e[t]]=(e[d]~=0);l=l+1;e=f[l];end end else if 0>=u then n[e[t]]=h[e[d]];l=l+1;e=f[l];else if u>-1 then for a=29,85 do if 2>u then o=e[t];s=n[e[d]];n[o+1]=s;n[o]=s[e[r]];l=l+1;e=f[l];break;end;n(e[t],e[d]);l=l+1;e=f[l];break;end;else o=e[t];s=n[e[d]];n[o+1]=s;n[o]=s[e[r]];l=l+1;e=f[l];end end end end else local l=e[t];local t=n[e[d]];n[l+1]=t;n[l]=t[e[r]];end end end else if o<15 then if 13<=o then if o~=11 then for l=40,57 do if o~=14 then h[e[d]]=n[e[t]];break;end;local e=e[t]n[e]=n[e](c(n,e+1,a))break;end;else h[e[d]]=n[e[t]];end else n(e[t],e[d]);end else if 16>o then local l=e[t]local t,e=b(n[l](c(n,l+1,e[d])))a=e+l-1 local e=0;for l=l,a do e=e+1;n[l]=t[e];end;else if o==16 then do return end;else do return end;end end end end end l=1+l;end;end;return _ end;local t=0xff;local h={};local f=(1);local d='';(function(n)local l=n local a=0x00 local e=0x00 l={(function(o)if a>0x28 then return o end a=a+1 e=(e+0x577-o)%0x12 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x76);end return true end)'iqdAA'and l[0x1](0x1d4+o))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x96);d='\37';t={function()t()end};d=d..'\100\43';end return true end)'SUpYl'and l[0x3](o+0x144))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4e);t[2]=(t[2]*(g(function()h()end,c(d))-g(t[1],c(d))))+1;h[f]={};t=t[2];f=f+t;end return true end)'xwvzS'and l[0x2](o+0x1be))or o end),(function(d)if a>0x28 then return d end a=a+1 e=(e+0xf41-d)%0x29 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x58);end return true end)'qLGZB'and l[0x1](0x24d+d))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x22);h[f]=z();f=f+t;end return true end)'eUduY'and l[0x2](d+0x39f))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa9);end return true end)'rmWJL'and l[0x3](d+0x353))or d end),(function(r)if a>0x27 then return r end a=a+1 e=(e+0x1284-r)%0x15 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x94);d={d..'\58 a',d};h[f]=_();f=f+((not o.akEHImAw)and 1 or 0);d[1]='\58'..d[1];t[2]=0xff;end return true end)'jJJgB'and l[0x1](0x110+r))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xab);end return true end)'eAvMZ'and l[0x3](r+0x162))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x1e);end return true end)'xTzSK'and l[0x2](r+0x333))or r end)}l[0x1](0x23b0)end){};local e=m(c(h));return e(...);end return _((function()local n={}local e=0x01;local l;if o.akEHImAw then l=o.akEHImAw(_)else l=''end if o.jsSrPsxr(l,o.AWrwOFdC)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(n,e,l,t,d,o)local o;if n>3 then if 6>n then if 0<n then for o=22,80 do if n~=4 then local n=t;do return function()local e=e(l,n(n,n),n(n,n));n(1);return e;end;end;break;end;local n=t;local t,o,d=d(2);do return function()local e,l,a,f=e(l,n(n,n),n(n,n)+3);n(4);return(f*t)+(a*o)+(l*d)+e;end;end;break;end;else local n=t;local t,d,o=d(2);do return function()local f,l,a,e=e(l,n(n,n),n(n,n)+3);n(4);return(e*t)+(a*d)+(l*o)+f;end;end;end else if n>=7 then if 4<=n then repeat if 8~=n then 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;do return l(n,nil,l);end until true;else 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 end else do return d[l]end;end end else if 1<n then if n>2 then do return e(1),e(4,d,t,l,e),e(5,d,t,l)end;else do return 16777216,65536,256 end;end else if n>=-4 then repeat if 1~=n then do return e(1),e(4,d,t,l,e),e(5,d,t,l)end;break;end;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;until true;else do return e(1),e(4,d,t,l,e),e(5,d,t,l)end;end end end end),...)