We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 4
([[This file was protected with MoonSec V3]]):gsub('.
+', (function(a) _phHjqojwGXRr
= a; end)); return(function(u,...)local f;local o;local t;local r;local b;local d;local e=24915;local n=0;local l={};while n<868 do n=n+1;while n<0x2a0 and e %0xe8e<0x747 do n=n+1 e=(e-924)%28198 local h=n+e if(e%0x249c)>0x124e then e=(e*0x215)%0x8829 while n<0x279 and e%0x3482<0x1a41 do n=n+1 e=(e*56)%41784 local t=n+e if(e%0x2752)<0x13a9 then e=(e*0x29d)%0x69fc local e=99116 if not l[e]then l[e]=0x1 o=string;end elseif e%2~=0 then e=(e*0x31f)%0x86a local e=44090 if not l[e]then l[e]=0x1 end else e=(e-0x1c6)%0x628f n=n+1 local e=76065 if not l[e]then l[e]=0x1 r={};end end end elseif e%2~=0 then e=(e+0x3e4)%0xc19d while n<0x399 and e %0x4918<0x248c do n=n+1 e=(e*928)%15378 local d=n+e if(e%0xb62)>=0x5b1 then e=(e*0xb1)%0x203b local e=79621 if not l[e]then l[e]=0x1 f="\ 4\8\116\111\110\117\109\98\101\114\103\83\81\66\110\106\86\65\0\6\115\116\114\105\1 10\103\4\99\104\97\114\105\107\106\95\121\110\83\86\0\6\115\116\114\105\110\103\3\1 15\117\98\84\88\86\84\75\108\90\102\0\6\115\116\114\105\110\103\4\98\121\116\101\65 \76\100\116\110\75\67\109\0\5\116\97\98\108\101\6\99\111\110\99\97\116\76\109\112\1 12\84\79\79\90\0\5\116\97\98\108\101\6\105\110\115\101\114\116\98\111\114\82\79\112 \107\112\5";end elseif e%2~=0 then e=(e+0x181)%0x207b local e=7792 if not l[e]then l[e]=0x1 end else e=(e+0x3f)%0x3d1a n=n+1 local e=24112 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end end end else e=(e+0x115)%0x10ab n=n+1 while n<0x39b and e%0xab4<0x55a do n=n+1 e=(e-318)%9132 local f=n+e if(e%0x3afe)>0x1d7f then e=(e- 0x17f)%0x60db local e=23148 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=o.byte(l(0x01))local e=l(e)if n=="\ 2"then e=r.gSQBnjVA(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(n,e)return u(8,nil,u,e,n)end elseif n=="\4"then e=t[e]elseif n=="\ 0"then e=t[e][l(o.byte(l(0x01)))];end local n=l(0x08)r[n]=e end end end elseif e %2~=0 then e=(e*0x19e)%0x1661 local e=53746 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end else e=(e-0x345)%0x72dd n=n+1 local e=97417 if not l[e]then l[e]=0x1 b=tonumber;end end end end end e=(e+742)%28034 end d(f);local n={};for e=0x0,0xff do local l=r.ikj_ynSV(e);n[e]=l;n[l]=e;end local function c(e)return n[e];end local o=(function(f,o)local h,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=f while true do n[0x03][r.TXVTKlZf(o,e,(function()e=h+e return e-0x01 end) ())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#o while e<t+0x01 do n[0x02][l]=r.TXVTKlZf(o,e,(function()e=h+e return e- 0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 r.borROpkp(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 r.LmppTOOZ(n[0x01])end);d(o(210,"C7fzm}>Usd=b-2k/zz"));d(o(82,"XTixC8RQeEtJh&/ft/ RiQ&ih&eQ&xz&QiixP/fE8CR/EEtCh&!ex8&&htJfetQhnRT0&hRQCi/t/Qfne&7e/ iJheiQ&EfitiCQftt/xffQtE8QTeE/8&TR8edhiQ&ReiiQ&teTh&/xe8CR/xERie/iEE8CDeJTxx!iChf/ T8JQQeTtR8Qti!hfE,xRJ/EiTJ/QQRi/&TeT/eE/Jx8xTBJQ8&TtJ8QRTThGQeTfJJQ/ T#JRRfTT&4QE&he&etCQfxJi8J(hQJ8f/ftQRCTtJJ8EiQRtTexE&TeQC{/eQxi8/tQCx8&RtJ/ hEEQf8t,CEhRxfiJJC&ffReTtxC&&efx//tefCi/ EtQ8TfEef8f_vJJRRt^8xQpqJJtQiTERee8ih&hQJiJ/TQQTt/ieRCi/ CEh8tEeCeR8khJh8JFJhT889xthRfi8hhQTieQeiQC5fPE8CefhE/CE/xExCf/at/ C&tt8tQ8T8htQTT&&he8T8/8RTx8/eQJCTeRxeCffTJi8CEft/ RiTxhTQifJhhRfxiJeQexiJ8ix"));local e=(-39968+(function()local d,t=0,1; (function(e,l,n)e(l(n,e,e),l(e,l and n,e),e(n and l,l,n and n))end) (function(e,n,l)if d>168 then return e end d=d+1 t=(t-1012)%41513 if(t%330)>=165 then return e else return l(e(l and l,l,n),n(e,l,n)and l(l,n,e),n(n,e,e and n))end return e(l(n,n,e and l),n(e,n,e and e)and l(e,e,e and l),l(n,n,n))end,function(l,n,e)if d>140 then return n end d=d+1 t=(t*818)%21240 if(t%1322)>661 then return e(l(l,e,e and e),n(e,n,e),e(n,n,e and n))else return e end return e end,function(n,e,l)if d>404 then return l end d=d+1 t=(t+758)%49177 if(t%384)<=192 then return e else return n(l(l,n,l and e),e(e,l,e),e(e,n,e))end return n(e(e,n,n),e(n and l,e,e),l(e,l,e)and e(e,e and e,n))end)return t;end) ())local j=(getfenv)or(function()return _ENV end);local a=r.QQLaibYb or r.SHbXfZdt;local c=4;local y=1;local d=2;local t=3;local function z(s,...)local f=o(e,"dHcl_;&+rh(=Eq:b&c(:N;;E=_HH&H=r,b=qcc+&qllHrrq=Er_;+;EEclE:lhhHbcb&hl:q_+h+ (h;+hrXHt;(E#;;h=;bq;c=(oc;r&=Hh&cE_QbH: (cH=+cErG_&qEcq&&lh+=Ec=&hE8H+==l_r=:HHqr&q=c: +hbH_&h_bw_#(lEb_+hhbC_r(rqc;E=lkr::_Eh=bc_hb;&(=lH+&(=_H+&&;h=h,&;q=_+ +qHH(+_q(lcr+q;lHrH+c:hHb+&EqrE:b_&hhblHH;q=__Eh_bq;;hqbH_b(=Ec_:=H/ &Hb=hbb&E+=bElc==b;_((h:Q&E;E=h.h&R=+;&qhlGrl=Hc&rE+fEqHq+_E=&&:=lHhq(b3:hHr_;llHrr qbh:QH;r(=G;cl&bE&;c(:3b;&=hHl;E+qQh&EEHq(&lEhHhl&q;H(&:E=chr>qllc_;h:b&;l((bh;l(=U c;q(E*l&H=hur&;=+Hl&_ElHH&bqc;&=;q(l:r;:=&&=Hq+c+r::h&(=(ab_+Ee:b+*=:b&;qErH+;&q&l_ &l(gl(hHE&H8rH(hc_;;E:c+hbq+_+r;ql_(h=ql_=rrE+c+(+.lH+=;qh&Hhcbc;:EHqc_(r&b+ +l;&=3yl; (=H&bE7cl+c&;ErHc&hEL+&q:cq&_qql=h8:c_&&qq;c&hqrcqhl4r+q:_rrE:ll(hHb&lbh&:q_;h=bc_h =c &_:(;bE;&((xH;rEHcl;q=_^=&q=hH<&+:_lF&EElH(+ +Ercx+&Ebc_+b:HchrSq+l_r;qqllr:b<lrrb:&__h_:E_chhw;_+h:b;_q(lb(;H=(H;;&(qm_&l=cSh&s Ehc&&;=EHl&:EHHr&bqrcb+_E=ccrcquc++:: +lErlq(lHrhqbl&rqb&_:hc:h_GhE::_;hEf;;l(Hbh_b=vbq;_(=cc&&=DMr;:=&,E&(=(clr;=bHh&qE( H=+cEhcBrcE:c&+Eq&c(rHqrcbhqqql_r=:clhhc:+l:(E:E_lh(bc_r(Pb&_q(;b=;c(hnH;+ (:?;");local n=0;r.xJmHbraP(function()r.nKOfBUHo()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,f,r.ALdtnKCm);local function o()local l,n=r.ALdtnKCm(f,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local _=true;local _=0 local function m()local e=n();local n=n();local d=1;local t=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(t==_)then return n*0;else e=1;d=0;end;elseif(e==2047)then return(t==0)and(n*(1/0))or(n*(0/0));end;return r.JpKiJTIK(n,e-1023)*(d+(t/(2^52)));end;local p=n;local function k(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=r.TXVTKlZf(f,e(1,3),e(5,6)+n- 1);e(n)local e=""for n=(1+_),#l do e=e..r.TXVTKlZf(l,n,n)end return e;end;local _=#r.wsmUwjwt(b('\49.\48'))~=1 local e=n;local function ne(...)return{...},r.oQsAglQi('#',...)end local function g()local u={};local a={};local e={};local b={a,u,nil,e};local e=n()local f={}for t=1,e do local l=h();local n;if(l==3)then n=(h()~=#{});elseif(l==0)then local e=m();if _ and r.LXantoCd(r.wsmUwjwt(e),'.(\48+)$')then e=r.MpezRdpE(e);end n=e;elseif(l==1)then n=k();end;f[t]=n;end;b[3]=h();for e=1,n()do u[e-(#{1})]=g();end;for u=1,n()do local e=h();if(l(e,1,1)==0)then local r=l(e,2,3);local h=l(e,4,6);local e={o(),o(),nil,nil};if(r==0)then e[t]=o();e[c]=o();elseif(r==#{1})then e[t]=n();elseif(r==s[2])then e[t]=n()-(2^16)elseif(r==s[3])then e[t]=n()- (2^16)e[c]=o();end;if(l(h,1,1)==1)then e[d]=f[e[d]]end if(l(h,2,2)==1)then e[t]=f[e[t]]end if(l(h,3,3)==1)then e[c]=f[e[c]]end a[u]=e;end end;return b;end;local function m(l,n,e)local t=n;local t=e;return b(r.LXantoCd(r.LXantoCd(({r.xJmHbraP(l)})[2],n),e))end local function ee(k,e,f)local function z(...)local o,j,s,z,b,n,h,m,p,_,g,l;local e=0;while-1<e do if e<=2 then if 1<=e then if-2<e then repeat if e>1 then n=-41;h=- 1;break;end;s=u(6,48,3,78,k);b=ne z=0;until true;else n=-41;h=-1;end else o=u(6,70,1,75,k);j=u(6,66,2,4,k);end else if e>=5 then if 3<=e then for n=16,92 do if 6>e then l=u(7);break;end;e=-2;break;end;else l=u(7);end else if e~=0 then repeat if e~=3 then _=r.oQsAglQi('#',...)-1;g={};break;end;m={};p={...};until true;else _=r.oQsAglQi('#',...)-1;g={};end end end e=e+1;end;for e=0,_ do if(e>=s)then m[e-s]=p[e+1];else l[e]=p[e+1];end;end;local e=_-s+1 local e;local r;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=o[n];r=e[y];if 11>=r then if r>5 then if 9<=r then if r<10 then local e=e[d]l[e]=l[e](a(l,e+1,h))else if r~=9 then for n=22,62 do if r~=11 then l[e[d]]=(e[t]~=0);break;end;local n=e[d]local t,e=b(l[n](a(l,n+1,e[t])))h=e+n-1 local e=0;for n=n,h do e=e+1;l[n]=t[e];end;break;end;else local n=e[d]local t,e=b(l[n](a(l,n+1,e[t])))h=e+n-1 local e=0;for n=n,h do e=e+1;l[n]=t[e];end;end end else if 6>=r then local n=e[d];local t=l[e[t]];l[n+1]=t;l[n]=t[e[c]];else if 6<r then repeat if 7<r then local n=e[d]local t,e=b(l[n](a(l,n+1,e[t])))h=e+n-1 local e=0;for n=n,h do e=e+1;l[n]=t[e];end;break;end;f[e[t]]=l[e[d]];until true;else local n=e[d]local t,e=b(l[n](a(l,n+1,e[t])))h=e+n-1 local e=0;for n=n,h do e=e+1;l[n]=t[e];end;end end end else if r>2 then if 4<=r then if r~=5 then local n=e[d];local t=l[e[t]];l[n+1]=t;l[n]=t[e[c]];else do return end;end else if(l[e[d]]==e[c])then n=n+1;else n=e[t];end;end else if 1>r then l[e[d]]();else if r~=-2 then for n=10,94 do if 1~=r then l(e[d],e[t]);break;end;l[e[d]]=(e[t]~=0);break;end;else l(e[d],e[t]);end end end end else if r>17 then if r>20 then if 22<r then if r>=20 then for u=46,59 do if 23<r then local a,h;for r=0,6 do if 2>=r then if 1>r then f[e[t]]=l[e[d]];n=n+1;e=o[n];else if r>1 then f[e[t]]=l[e[d]];n=n+1;e=o[n];else l(e[d],e[t]);n=n+1;e=o[n];end end else if r>4 then if r==5 then a=e[d];h=l[e[t]];l[a+1]=h;l[a]=h[e[c]];n=n+1;e=o[n];else l(e[d],e[t]);end else if r~=1 then repeat if 4~=r then l[e[d]]=f[e[t]];n=n+1;e=o[n];break;end;l[e[d]]=f[e[t]];n=n+1;e=o[n];until true;else l[e[d]]=f[e[t]];n=n+1;e=o[n];end end end end break;end;local t;t=e[d]l[t]=l[t] (a(l,t+1,h))n=n+1;e=o[n];l[e[d]]();n=n+1;e=o[n];do return end;break;end;else local h,a;for r=0,6 do if 2>=r then if 1>r then f[e[t]]=l[e[d]];n=n+1;e=o[n];else if r>1 then f[e[t]]=l[e[d]];n=n+1;e=o[n];else l(e[d],e[t]);n=n+1;e=o[n];end end else if r>4 then if r==5 then h=e[d];a=l[e[t]];l[h+1]=a;l[h]=a[e[c]];n=n+1;e=o[n];else l(e[d],e[t]);end else if r~=1 then repeat if 4~=r then l[e[d]]=f[e[t]];n=n+1;e=o[n];break;end;l[e[d]]=f[e[t]];n=n+1;e=o[n];until true;else l[e[d]]=f[e[t]];n=n+1;e=o[n];end end end end end else if 22>r then do return end;else local r,h,o,f,c;local n=0;while n>-1 do if 3<=n then if n<5 then if n>-1 then repeat if 3<n then c=r[h];break;end;f=r[o];until true;else f=r[o];end else if n~=6 then l(c,f);else n=-2;end end else if n>0 then if-1<n then for e=27,75 do if 2~=n then h=d;break;end;o=t;break;end;else o=t;end else r=e;end end n=n+1 end end end else if r<=18 then local e=e[d]l[e]=l[e](a(l,e+1,h))else if 18<=r then repeat if r~=20 then l[e[d]]=f[e[t]];break;end;f[e[t]]=l[e[d]];until true;else f[e[t]]=l[e[d]];end end end else if r<=14 then if 13>r then l[e[d]]();else if r>=12 then repeat if r>13 then for r=0,3 do if r>1 then if-1<=r then for h=45,73 do if 2~=r then if(l[e[d]]==e[c])then n=n+1;else n=e[t];end;break;end;l[e[d]]=f[e[t]];n=n+1;e=o[n];break;end;else l[e[d]]=f[e[t]];n=n+1;e=o[n];end else if r==1 then f[e[t]]=l[e[d]];n=n+1;e=o[n];else l[e[d]]=(e[t]~=0);n=n+1;e=o[n];end end end break;end;n=e[t];until true;else n=e[t];end end else if r>=16 then if r>12 then for o=28,91 do if r<17 then l[e[d]]=f[e[t]];break;end;if(l[e[d]]==e[c])then n=n+1;else n=e[t];end;break;end;else l[e[d]]=f[e[t]];end else n=e[t];end end end end n=1+n;end;end;return z 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>0x2c then return r end o=o+1 e=(e+0x475-r)%0x34 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x80);end return true end)'KwxFA'and l[0x2](0x114+r))or(e %0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x85);c[f]=j();f=f+d;end return true end)'HTOik'and l[0x3](r+0x22d))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x11);d[2]=(d[2]*(m(function()c()end,a(t))-m(d[1],a(t)))) +1;c[f]={};d=d[2];f=f+d;end return true end)'IrMvI'and l[0x1](r+0x153))or r end), (function(t)if o>0x28 then return t end o=o+1 e=(e+0x5f2-t)%0x2c return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x2b);end return true end)'YnuHO'and l[0x2](0x310+t))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xdf);end return true end)'rapTR'and l[0x3](t+0x1a5))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x3b);end return true end)'LXeqe'and l[0x1](t+0x22e))or t end),(function(h)if o>0x20 then return h end o=o+1 e=(e+0x979- h)%0x36 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x18);t={t..'\58 a',t};c[f]=g();f=f+((not r.ehlBGsDe)and 1 or 0);t[1]='\ 58'..t[1];d[2]=0xff;end return true end)'PanyI'and l[0x1](0x248+h))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x9f);t='\ 37';d={function()d()end};t=t..'\100\43';end return true end)'rlbOG'and l[0x3] (h+0x137))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf8);end return true end)'zpnwJ'and l[0x2](h+0x14b))or h end)}l[0x3](0x72e)end){};local e=ee(a(c));return e(...);end return z((function()local n={}local e=0x01;local l;if r.ehlBGsDe then l=r.ehlBGsDe(z)else l=''end if r.LXantoCd(l,r.WaeexPal)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end) ((function(e,n,l,d,t,r)local r;if 4>e then if e<2 then if-4~=e then for r=14,93 do if 1~=e then do return n(1),n(4,t,d,l,n),n(5,t,d,l)end;break;end;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;break;end;else 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;end else if e~=3 then do return 16777216,65536,256 end;else do return n(1),n(4,t,d,l,n),n(5,t,d,l)end;end end else if 5>=e then if 4<e then local e=d;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;else local e=d;local o,f,d=t(2);do return function()local r,t,l,n=n(l,e(e,e),e(e,e)+3);e(4);return(n*o)+(l*f)+(t*d) +r;end;end;end else if e>6 then if e~=6 then repeat if e~=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 l(e,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 t[l]end;end end end end),...)