Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _rGKY_jycArjT = a; end)); return(function(u,...)local o;local a;local s;local d;local r;local t;local e=24915;local n=0;local l={};while n<383 do n=n+1;while n<0x182 and e%0x1dec<0xef6 do n=n+1 e=(e*390)%24693 local f=n+e if(e%0x11f2)>=0x8f9 then e=(e-0x19d)%0x2c8f while n<0x3d3 and e%0x32c2<0x1961 do n=n+1 e=(e+916)%2795 local d=n+e if(e%0xfe0)>0x7f0 then e=(e*0x253)%0x8e69 local e=10740 if not l[e]then l[e]=0x1 r=string;end elseif e%2~=0 then e=(e-0x19c)%0xb4ee local e=27992 if not l[e]then l[e]=0x1 o={};end else e=(e+0xe3)%0x7c6f n=n+1 local e=32130 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end end end elseif e%2~=0 then e=(e+0x287)%0x593f while n<0x29e and e%0x2db4<0x16da do n=n+1 e=(e*673)%31984 local d=n+e if(e%0x1be0)<0xdf0 then e=(e+0x3e7)%0x850 local e=24550 if not l[e]then l[e]=0x1 s=tonumber;end elseif e%2~=0 then e=(e*0x8d)%0x387b local e=47898 if not l[e]then l[e]=0x1 a="\4\8\116\111\110\117\109\98\101\114\76\104\108\77\82\80\79\121\0\6\115\116\114\105\110\103\4\99\104\97\114\122\74\121\70\76\68\76\73\0\6\115\116\114\105\110\103\3\115\117\98\75\114\100\119\115\120\107\86\0\6\115\116\114\105\110\103\4\98\121\116\101\98\100\106\100\106\102\90\106\0\5\116\97\98\108\101\6\99\111\110\99\97\116\101\84\85\74\67\86\76\119\0\5\116\97\98\108\101\6\105\110\115\101\114\116\97\83\120\105\68\121\119\114\5";end else e=(e-0x2f8)%0x2603 n=n+1 local e=39970 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end else e=(e+0x11c)%0x75b8 n=n+1 while n<0x286 and e%0x1112<0x889 do n=n+1 e=(e+552)%3168 local a=n+e if(e%0xa7c)>0x53e then e=(e*0xe7)%0x889e local e=7581 if not l[e]then l[e]=0x1 d=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=o.LhlMRPOy(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then t[e]=function(n,e)return u(8,nil,u,e,n)end elseif l=="\4"then e=t[e]elseif l=="\0"then e=t[e][n(r.byte(n(0x01)))];end local n=n(0x08)o[n]=e end end end elseif e%2~=0 then e=(e*0x2f7)%0x1758 local e=85494 if not l[e]then l[e]=0x1 end else e=(e-0x33f)%0xa7bf n=n+1 local e=21488 if not l[e]then l[e]=0x1 end end end end end e=(e*1000)%17154 end d(a);local e={};for n=0x0,0xff do local l=o.zJyFLDLI(n);e[n]=l;e[l]=n;end local function c(n)return e[n];end local r=(function(f,r)local a,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=f while true do n[0x03][o.KrdwsxkV(r,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=#r while e<t+0x01 do n[0x02][l]=o.KrdwsxkV(r,e,(function()e=a+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 o.aSxiDywr(n[0x01],(c((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=f+d;end end return o.eTUJCVLw(n[0x01])end);d(r(175,"Og}fJN(#q!4+G1ZSN("));d(r(246,"0X4YJ}AWMV8DerTp&8X8VXVe8J8}DJDW}TeMTYT}p4rWpDTVjYXMdMSpJVTLTDAO}rA}W8MJMV8}VT8rVree8VepWYMXpAL49YX444Y44AY}JAJX}YJMJD9MXMMpV8848YD4D}}reperT8TYp4^}X_XepJ48X4YX}2TJp4A}AYMIWT4}VAVM8Yefe4rG8pDXeTrXTMX4TMDme4YY4pJMJDJrAA}rW8WXWeVUVY8VMWDJerD}eYD}pJMeV8XcX}4Y4TYAYWJAJVJ4AMWWW4WYWrVT8WYeJDeJDDeAr8rrMMQX_JX=fDXW4VYAJJ4TYUY4WaJeAJXe4M8X8JD=8DDWeV8erTeVrMpMrr5}4YDeeWYeJMJV}MAMWY}V}VAVMMWpDJVJ}4}Tr}rXT4T}Tr_M7}XT4A4JXM4M48}XTTpeApArM8MM4pV888DWeXeTerT}eATArXHMpA4JDD"));local e=(-379+(function()local t,n=0,1;(function(e,n)e(n(e,e),n(e,e and e))end)(function(e,l)if t>420 then return l end t=t+1 n=(n+932)%17008 if(n%552)>276 then return l else return e(e(e,l),l(e,e)and e(e,e))end return l(l(e,l),l(e,e))end,function(e,l)if t>120 then return l end t=t+1 n=(n+806)%49121 if(n%1868)<934 then n=(n-515)%7961 return l(e(e,e),e(l,e))else return e end return e end)return n;end)())local f=o.DlMRhCau or o.nrRJBvHV;local le=(getfenv)or(function()return _ENV end);local c=4;local t=2;local d=3;local ne=1;local function j(k,...)local a=r(e,"JB%QA5),E>xv?YaW5axad55?v)%v)BvEiW?aQBEEYvQ55Q>WW)EaY)QW>,YWQQ>BaYkA>}WQAE)BWvABxavY5avP!BA%E5f?%GEvxIWvAvx%W>>EBv,%?5WQ)E?avA%B5Wv)oYvB%xEBY,BQ,?YB%A)Wa,Q?Exa)Q)>>?5QYEWa)Qa>a?E5%x>Waa))B>BaEQWax55xYiaB%xW.>)QvQ?5,QvABY%B?E%B,5YBB>)aY)Ba,AE,Q5,aa6%vQxvaQ,EaaA%lE>YaW%,WvQYxQvE5Y?QQa>5Q,WYxQW>?Wa)Ax5Yx)%vBW%WE5sxQWx5BIW)h?QB%9,)5v%{>).%Q,Y?)%/E)YaQQEBYY%Y%v,A?v%%,>Y6%,,aY5%YEQYxQB>xahQ)EYaAQa>%a>Acx>WQA5>?WQAWxBWEAW??B,5AxvL%5WvX{E5av>&?),vaBB)EvWB?)Y?5Bv,%Y%%u,,?a%),?YQ%x>QYv%WE)YYQvEva%Q>x%WvQa>)a?A>>xWBAEvW<EAYx5Wv5Qx>C%5,?eBA5?v)Vx)%vEkW))vY%W)v?QB>,Q?,Ba,5??Qv,xYB%E,WY)%WEAYvQ)E>a7Q,EWa5QY>Qax5,>EaWA)>aWAAvx%W>5sx,Wa55");local n=0;o.gyhmSxKg(function()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,h=u(0,u,e,a,o.bdjdjfZj);local function r()local n,l=o.bdjdjfZj(a,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local b=true;local b=0 local function _()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.tIATMZzF(e,n-1023)*(d+(t/(2^52)));end;local p=n;local function g(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=o.KrdwsxkV(a,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..o.KrdwsxkV(l,n,n)end return e;end;local p=#o.Vrwh__vu(s('\49.\48'))~=1 local e=n;local function j(...)return{...},o.gvthRXPm('#',...)end local function y()local u={};local e={};local s={};local b={s,u,nil,e};local e=n()local a={}for t=1,e do local l=h();local n;if(l==1)then n=(h()~=#{});elseif(l==2)then local e=_();if p and o.qrtBnLav(o.Vrwh__vu(e),'.(\48+)$')then e=o.guLbCpTx(e);end n=e;elseif(l==3)then n=g();end;a[t]=n;end;for u=1,n()do local e=h();if(l(e,1,1)==0)then local o=l(e,2,3);local f=l(e,4,6);local e={r(),r(),nil,nil};if(o==0)then e[d]=r();e[c]=r();elseif(o==#{1})then e[d]=n();elseif(o==k[2])then e[d]=n()-(2^16)elseif(o==k[3])then e[d]=n()-(2^16)e[c]=r();end;if(l(f,1,1)==1)then e[t]=a[e[t]]end if(l(f,2,2)==1)then e[d]=a[e[d]]end if(l(f,3,3)==1)then e[c]=a[e[c]]end s[u]=e;end end;for e=1,n()do u[e-(#{1})]=y();end;b[3]=h();return b;end;local function z(l,n,e)local t=n;local t=e;return s(o.qrtBnLav(o.qrtBnLav(({o.gyhmSxKg(l)})[2],n),e))end local function ee(k,e,h)local function z(...)local r,z,b,g,s,l,a,y,_,p,m,n;local e=0;while-1<e do if 2<e then if 4<e then if 4~=e then repeat if e~=6 then n=u(7);break;end;e=-2;until true;else e=-2;end else if 0<=e then repeat if 3~=e then p=o.gvthRXPm('#',...)-1;m={};break;end;y={};_={...};until true;else p=o.gvthRXPm('#',...)-1;m={};end end else if 0>=e then r=u(6,41,1,15,k);z=u(6,42,2,99,k);else if 0~=e then repeat if 2~=e then b=u(6,8,3,77,k);s=j g=0;break;end;l=-41;a=-1;until true;else b=u(6,8,3,77,k);s=j g=0;end end end e=e+1;end;for e=0,p do if(e>=b)then y[e-b]=_[e+1];else n[e]=_[e+1];end;end;local e=p-b+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=r[l];o=e[ne];if o>=12 then if o>17 then if 20>=o then if 19>o then n[e[t]]=(e[d]~=0);else if 16~=o then for u=27,78 do if o<20 then n[e[t]]();break;end;local o,b,p,k,u;n[e[t]]=h[e[d]];l=l+1;e=r[l];o=e[t];b=n[e[d]];n[o+1]=b;n[o]=b[e[c]];l=l+1;e=r[l];n(e[t],e[d]);l=l+1;e=r[l];o=e[t]p,k=s(n[o](f(n,o+1,e[d])))a=k+o-1 u=0;for e=o,a do u=u+1;n[e]=p[u];end;l=l+1;e=r[l];o=e[t]n[o]=n[o](f(n,o+1,a))l=l+1;e=r[l];n[e[t]]();l=l+1;e=r[l];do return end;break;end;else local o,b,p,k,u;n[e[t]]=h[e[d]];l=l+1;e=r[l];o=e[t];b=n[e[d]];n[o+1]=b;n[o]=b[e[c]];l=l+1;e=r[l];n(e[t],e[d]);l=l+1;e=r[l];o=e[t]p,k=s(n[o](f(n,o+1,e[d])))a=k+o-1 u=0;for e=o,a do u=u+1;n[e]=p[u];end;l=l+1;e=r[l];o=e[t]n[o]=n[o](f(n,o+1,a))l=l+1;e=r[l];n[e[t]]();l=l+1;e=r[l];do return end;end end else if o>21 then if o~=18 then repeat if o>22 then if(n[e[t]]~=e[c])then l=l+1;else l=e[d];end;break;end;h[e[d]]=n[e[t]];until true;else h[e[d]]=n[e[t]];end else local e=e[t]n[e]=n[e](f(n,e+1,a))end end else if 14<o then if o<=15 then n[e[t]]=h[e[d]];else if o~=14 then for l=24,86 do if o>16 then h[e[d]]=n[e[t]];break;end;local e=e[t]n[e]=n[e](f(n,e+1,a))break;end;else h[e[d]]=n[e[t]];end end else if o<13 then do return end;else if 12<=o then for r=28,54 do if 13~=o then l=e[d];break;end;if(n[e[t]]~=e[c])then l=l+1;else l=e[d];end;break;end;else if(n[e[t]]~=e[c])then l=l+1;else l=e[d];end;end end end end else if o<=5 then if o>2 then if 3<o then if 1<o then for r=41,67 do if o~=5 then l=e[d];break;end;local l=e[t]local t,e=s(n[l](f(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;else local l=e[t]local t,e=s(n[l](f(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]]=h[e[d]];end else if 0<o then if o>-2 then repeat if o~=1 then n[e[t]]=(e[d]~=0);break;end;n[e[t]]();until true;else n[e[t]]();end else for o=0,3 do if o>1 then if o==2 then n[e[t]]=h[e[d]];l=l+1;e=r[l];else if(n[e[t]]~=e[c])then l=l+1;else l=e[d];end;end else if o==0 then n[e[t]]=(e[d]~=0);l=l+1;e=r[l];else h[e[d]]=n[e[t]];l=l+1;e=r[l];end end end end end else if 8<o then if o<=9 then do return end;else if 10<o then local o,r,a,c,f;local l=0;while l>-1 do if l<3 then if 0>=l then o=e;else if-3~=l then for e=23,58 do if l>1 then a=d;break;end;r=t;break;end;else a=d;end end else if 5>l then if l~=2 then for e=14,70 do if l~=4 then c=o[a];break;end;f=o[r];break;end;else f=o[r];end else if 3<l then for e=23,94 do if l~=6 then n(f,c);break;end;l=-2;break;end;else l=-2;end end end l=l+1 end else n(e[t],e[d]);end end else if 7<=o then if 7==o then local l=e[t]local t,e=s(n[l](f(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 local l=e[t];local t=n[e[d]];n[l+1]=t;n[l]=t[e[c]];end else local t=e[t];local l=n[e[d]];n[t+1]=l;n[t]=l[e[c]];end end end end l=1+l;end;end;return z end;local d=0xff;local c={};local o=(1);local t='';(function(n)local l=n local r=0x00 local e=0x00 l={(function(o)if r>0x2f then return o end r=r+1 e=(e+0xf40-o)%0x1b return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xef);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'qUUP_'and l[0x3](0x2a2+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x7d);end return true end)'nZXOl'and l[0x1](o+0xca))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x31);end return true end)'q_weJ'and l[0x2](o+0x336))or o end),(function(a)if r>0x25 then return a end r=r+1 e=(e+0x714-a)%0x4e return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xd1);d[2]=(d[2]*(z(function()c()end,f(t))-z(d[1],f(t))))+1;c[o]={};d=d[2];o=o+d;end return true end)'LImJt'and l[0x1](0xb9+a))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xaf);end return true end)'UWcgS'and l[0x2](a+0x36e))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf8);end return true end)'CHIEc'and l[0x3](a+0x34e))or a end),(function(a)if r>0x1f then return a end r=r+1 e=(e+0xa7b-a)%0x2e return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb3);t={t..'\58 a',t};c[o]=y();o=o+(1);t[1]='\58'..t[1];d[2]=0xff;end return true end)'jYKHF'and l[0x2](0x3ac+a))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x6b);end return true end)'CpJaS'and l[0x3](a+0x266))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x0);c[o]=le();o=o+d;end return true end)'UiSEC'and l[0x1](a+0x10e))or a end)}l[0x1](0x1b7c)end){};local e=ee(f(c));return e(...);end return j((function()local n={}local e=0x01;local l;if o.KeIYdJGw then l=o.KeIYdJGw(j)else l=''end if o.qrtBnLav(l,o.zdipaiTM)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 1<l then if l>2 then do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;else do return 16777216,65536,256 end;end else if l>=-3 then repeat if l>0 then 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;break;end;do return e(1),e(4,t,d,n,e),e(5,t,d,n)end;until true;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 2<l then for o=15,85 do 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 t,a,d=t(2);do return function()local r,o,e,n=e(n,l(l,l),l(l,l)+3);l(4);return(n*t)+(e*a)+(o*d)+r;end;end;break;end;else local l=d;local a,d,t=t(2);do return function()local e,n,r,o=e(n,l(l,l),l(l,l)+3);l(4);return(o*a)+(r*d)+(n*t)+e;end;end;end else if l>6 then if l~=3 then repeat if l<8 then 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 break;end;do return n(l,nil,n);end until true;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 else do return t[n]end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement