Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- return(function(Sw,u,w,C,ke,gn,lZ,cW,U,YR,OW,al,J,b,a,hy,P,rD,T,dJ,e,rv,W,Q,yE,oq,p)local M=0x6>0x7 and 0x38 or 0x5D;local M=0x1>0x2 and 0x47 or 0x37;local u,Sw,Sw,Sw=Sw,u,w,C;local Sw={};Sw[0x1]=nil;if type(0x7)==0x1869F then end;for Sw=0x3,0x6 do end;local Sw,Sw,Sw,w=ke,gn,lZ,cW;if 0x5>0xD then end;local Sw={};Sw[0x1]=nil;local Sw,gn,Sw=U,YR,OW;local Sw=math.floor(0x52/0x6);local Sw,b,C,ke=al,J,b,a;local Sw=0xC*0x49+0x34;if 0x1>0x13 then end;local Sw,rD,rD=hy,P,rD;local rD={};rD[0x1]=nil;local rD=0x60;if 0x8>0xE then end;local e,e,e,a=T,dJ,e,rv;local e=0x3C*0x3A+0x14;local e=0x19*0x15+0x29;local hy,e=W,Q;if type(0x5)==0x1869F then end;local e=0x32*0x1E+0x7;local e=0x6>0x8 and 0x1E or 0x53;local rD,Q=yE,oq;local e=0x2B7+0x3B6;if 0x5>0xD then end;local W=p;local e=math.floor(0x30/0x5);local e={};e[0x1]=nil;if type(0x59)==0x1869F then end;local e=(0x9+0x5)*(0x3-0x8);local function oq(e)local rv,gn,b,C=ke,b,C,gn;local Sw,P=Sw,W;e=rv(e,0x5)e=Sw(e,'z','!!!!!')e=Sw(e,'[%s\r\n]','')local rv=#e if rv==0x0 then return''end local ke={}local Sw=0x2EE0 local T=0x1 for W=0x1,rv,Sw do local dJ=W+Sw-0x1 if dJ>rv then dJ=rv end local rD={}local Sw=0x1 local W=W while W<=dJ do local dJ=(W+0x4>rv)and(rv-W+0x1)or 0x5 local rv=0x0 if dJ==0x5 then local dJ,Sw,e,W,rD=gn(e,W,W+0x4)rv=(dJ-0x21)*0x31C84B1+(Sw-0x21)*0x95EED+(e-0x21)*0x1C39+(W-0x21)*0x55+(rD-0x21)else for Sw=0x0,dJ-0x1 do rv=rv*0x55+(gn(e,W+Sw)-0x21)end for Sw=0x1,0x5-dJ do rv=rv*0x55+0x54 end end local e=P(rv/0x1000000)%0x100 local T=P(rv/0x10000)%0x100 local P=P(rv/0x100)%0x100 local rv=rv%0x100 if dJ==0x5 then rD[Sw]=b(e,T,P,rv)Sw=Sw+0x1 else if dJ>=0x2 then rD[Sw]=b(e);Sw=Sw+0x1 end if dJ>=0x3 then rD[Sw]=b(T);Sw=Sw+0x1 end if dJ>=0x4 then rD[Sw]=b(P);Sw=Sw+0x1 end end W=W+0x5 end ke[T]=C(rD)T=T+0x1 end return C(ke)end;local T=oq(u);local W=bit and bit.bxor or function(Sw,e)local rv,W=0x1,0x0 while Sw>0x0 and e>0x0 do local dJ,rD=Sw%0x2,e%0x2 if dJ~=rD then W=W+rv end Sw,e,rv=(Sw-dJ)/0x2,(e-rD)/0x2,rv*0x2 end if Sw<e then Sw=e end while Sw>0x0 do local e=Sw%0x2 if e>0x0 then W=W+rv end Sw,rv=(Sw-e)/0x2,rv*0x2 end return W end local function rv(rv,Sw,e)if e then local Sw=(rv/0x2^(Sw-0x1))%0x2^((e-0x1)-(Sw-0x1)+0x1);return Sw-Sw%0x1;else local Sw=0x2^(Sw-0x1);return(rv%(Sw+Sw)>=Sw)and 0x1 or 0x0;end;end;local Sw=0x1;local function e()local dJ,rD,e,rv=b(T,Sw,Sw+0x3);dJ=W(dJ,0xBF)rD=W(rD,0xBF)e=W(e,0xBF)rv=W(rv,0xBF)Sw=Sw+0x4;return(rv*0x1000000)+(e*0x10000)+(rD*0x100)+dJ;end;local function P()local e=W(b(T,Sw,Sw),0xBF);Sw=Sw+0x1;return e;end;local function dJ()local rv,e=b(T,Sw,Sw+0x2);rv=W(rv,0xBF)e=W(e,0xBF)Sw=Sw+0x2;return(e*0x100)+rv;end;local function yE()local Sw=e();local e=e();local dJ=0x1;local W=(rv(e,0x1,0x14)*(0x2^0x20))+Sw;local Sw=rv(e,0x15,0x1F);local e=((-0x1)^rv(e,0x20));if(Sw==0x0)then if(W==0x0)then return e*0x0;else Sw=0x1;dJ=0x0;end;elseif(Sw==0x7FF)then return(W==0x0)and(e*(0x1/0x0))or(e*(0x0/0x0));end;return Q(e,Sw-0x3FF)*(dJ+(W/(0x2^0x34)));end;local oq=e;local function Q(e)local rv;if(not e)then e=oq();if(e==0x0)then return'';end;end;rv=ke(T,Sw,Sw+e-0x1);Sw=Sw+e;local e={}for Sw=0x1,#rv do e[Sw]=C(W(b(ke(rv,Sw,Sw)),0xBF))end return gn(e);end;local Sw=e;local function C(...)return{...},hy('#',...)end local ke;ke=function(Sw)if Sw~=0x290510E then return{}end local T={};local W={};local Sw={};local gn={T,W,nil,Sw};local Sw=e()local rD={}for rv=0x1,Sw do local e=P();local Sw;if(e==0x2)then Sw=(P()~=0x0);elseif(e==0x3)then Sw=yE();elseif(e==0x1)then Sw=Q();end;rD[rv]=Sw;end;local Sw=e();for Sw=0x1,Sw do W[Sw-0x1]=ke(0x290510E);end;gn[0x3]=P();local Sw=e();for ke=0x1,Sw do local Sw=P();if(rv(Sw,0x1,0x1)==0x0)then local W=rv(Sw,0x2,0x3);local b=rv(Sw,0x4,0x6);local Sw={dJ(),dJ(),nil,nil};if(W==0x0)then Sw[0x3]=dJ();Sw[0x4]=dJ();elseif(W==0x1)then Sw[0x3]=e();elseif(W==0x2)then Sw[0x3]=e()-0x10000;elseif(W==0x3)then Sw[0x3]=e()-0x10000;Sw[0x4]=dJ();end;if(rv(b,0x1,0x1)==0x1)then Sw[0x2]=rD[Sw[0x2]]end if(rv(b,0x2,0x2)==0x1)then Sw[0x3]=rD[Sw[0x3]]end if(rv(b,0x3,0x3)==0x1)then Sw[0x4]=rD[Sw[0x4]]end T[ke]=Sw;end end;return gn;end;local function b(Sw,p,T)local e=Sw[0x1];local rv=Sw[0x2];local Sw=Sw[0x3];return function(...)local yE=e;local Q=rv;local rv=Sw;local C=C local W=0x1;local dJ=-0x1;local oq={};local gn={...};local ke=hy('#',...)-0x1;local P={};local e={};for Sw=0x0,ke do if(Sw>=rv)then oq[Sw-rv]=gn[Sw+0x1];else e[Sw]=gn[Sw+0x1];end;end;local gn=ke-rv+0x1 local Sw;local rv;while true do Sw=yE[W];rv=Sw[0x1];if rv<0xF then if rv<0x7 then if rv<0x3 then if rv<0x1 then local Sw=Sw[0x2]e[Sw]=e[Sw](e[Sw+0x1])else if rv==0x1 then W=Sw[0x3];else local rv=e[Sw[0x4]];if not rv then W=W+0x1;else e[Sw[0x2]]=rv;W=Sw[0x3];end;end;end;else if rv<0x5 then if rv==0x3 then do return e[Sw[0x2]]end else local Sw=Sw[0x2]local W,rv=C(e[Sw](e[Sw+0x1]))dJ=rv+Sw-0x1 local rv=0x0;for Sw=Sw,dJ do rv=rv+0x1;e[Sw]=W[rv];end;end;else if rv==0x5 then local rv=Sw[0x2]local W,Sw=C(e[rv](rD(e,rv+0x1,Sw[0x3])))dJ=Sw+rv-0x1 local Sw=0x0;for rv=rv,dJ do Sw=Sw+0x1;e[rv]=W[Sw];end;else e[Sw[0x2]][Sw[0x3]]=Sw[0x4];end;end;end;else if rv<0xB then if rv<0x9 then if rv==0x7 then e[Sw[0x2]]=e[Sw[0x3]];else local Sw=Sw[0x2];do return e[Sw](rD(e,Sw+0x1,dJ))end;end;else if rv==0x9 then e[Sw[0x2]]=e[Sw[0x3]][Sw[0x4]];else if not e[Sw[0x2]]then W=W+0x1;else W=Sw[0x3];end;end;end;else if rv<0xD then if rv==0xB then e[Sw[0x2]]=b(Q[Sw[0x3]],nil,T);else do return end;end;else if rv==0xD then local W=Sw[0x2];local rv=e[Sw[0x3]];e[W+0x1]=rv;e[W]=rv[Sw[0x4]];else e[Sw[0x2]]=T[Sw[0x3]];end;end;end;end;else if rv<0x17 then if rv<0x13 then if rv<0x11 then if rv==0xF then e[Sw[0x2]]={};else local rv=Sw[0x2]e[rv]=e[rv](rD(e,rv+0x1,Sw[0x3]))end;else if rv==0x11 then local ke=Q[Sw[0x3]];local rD;local rv={};rD=a({},{__index=function(e,Sw)local Sw=rv[Sw];return Sw[0x1][Sw[0x2]];end,__newindex=function(W,Sw,e)local Sw=rv[Sw]Sw[0x1][Sw[0x2]]=e;end;});for dJ=0x1,Sw[0x4]do W=W+0x1;local Sw=yE[W];if Sw[0x1]==0x7 then rv[dJ-0x1]={e,Sw[0x3]};else rv[dJ-0x1]={p,Sw[0x3]};end;P[#P+0x1]=rv;end;e[Sw[0x2]]=b(ke,rD,T);else for Sw=Sw[0x2],Sw[0x3]do e[Sw]=nil;end;end;end;else if rv<0x15 then if rv==0x13 then if(e[Sw[0x2]]==Sw[0x4])then W=W+0x1;else W=Sw[0x3];end;else e[Sw[0x2]]=(Sw[0x3]~=0x0);end;else if rv==0x15 then if e[Sw[0x2]]then W=W+0x1;else W=Sw[0x3];end;else local Sw=Sw[0x2];dJ=Sw+gn-0x1;for rv=Sw,dJ do local Sw=oq[rv-Sw];e[rv]=Sw;end;end;end;end;else if rv<0x1B then if rv<0x19 then if rv==0x17 then e[Sw[0x2]]=Sw[0x3];else e[Sw[0x2]]();end;else if rv==0x19 then local Sw=Sw[0x2];do return rD(e,Sw,dJ)end;else e[Sw[0x2]][Sw[0x3]]=e[Sw[0x4]];end;end;else if rv<0x1D then if rv==0x1B then local Sw=Sw[0x2]e[Sw]=e[Sw](rD(e,Sw+0x1,dJ))else local rv=Sw[0x2]e[rv](rD(e,rv+0x1,Sw[0x3]))end;else if rv==0x1D then local rv=Sw[0x2];do return e[rv](rD(e,rv+0x1,Sw[0x3]))end;else e[Sw[0x2]]=p[Sw[0x3]];end;end;end;end;end;W=W+0x1;end;end;end;return b(ke(0x290510E),{},w())();end)([==[[(jAj^::qm^WG3Sbgt.g^:D"n^Y[2Yg<IgTX1uEacdUV)bhA]Ef@o$0T@hW>h;6W)^:M(o^X(]le'l%C^V@P[dE9nOZbO8if?hmofuh^tbLY%f ^:V.p^Y%Dkg:k)3^VBNdbKot;bJ(?u^VA1MaP>S"d*0YWg:ju0^VA7EhV68tc.::p^7)gO^XpZPcch*)OP\=7Ok\.-cdTmre'QR*c/-O 'qU3a6g<>].b20bF^V@Is^V@Lp^V@P[dE9nOX1uEar6Wm<c.^Ccf$MhDe(E$lf#u[n^V@Ou^Uq7q^TFcU^V@Lt^V?DL^V@Ou^V.Cs]Y D4r]t_=s^U(\i^V7It^S\c\^V7=p^VAFXdb;FC^V@PYg<8j:c,nPlg:jr/^VBNdbKoP/c,nPlg:ju0^VBI.nF?A&gsFg0^:M(o^WG?]f%[mP^ ::qm^XUuWqqfNQ^:h:r^Xh/RS%l_QLlTo?cB"%CP)Y@UL6@JKNJ`mSN/HDRMM?l?h;-fAgP_$E^:_4q^XUuW^9#)a^\R9nqNC[AqYHBN mJ?[Bq<e%T^::qm^WOdSc/@1-^V7+j^VARKg>:$,gYgr3^7rBW^Q";6M3<p[P)kXhO,o!UO+iXUOcPQaP`LlZO,q#_^V@P;a3W>]g<AL3bJ'^c ^V>bhL5(kPNfoH`l]7*\O,o!UO-,KaO-G]dKo_;/]>)+qf>uOt^A>UZ^P[r(gYL]>hV3sIg5(`LN/H>Hgk^lDgY:J@MN<[ThM9pAM;=0HNn]DLL Y[`EhMI6JN/`gPgPsn@L5UrGO4oPOh:fTH^V@P8aO],(c.^CqbM_1&b0eDF^V@Ou^V@Ou^9YMg^XM&`bM^Y!bhC7uhTNXA^V@P7bi% @5bLXeh^:D"n^YI;hg<n*X[_KSlNfAjWO-,KcNk`?D^V6S[^V?nU^V7Is^V@OUZG4,g^;%@rXf0"I^V%=r^V?te^;%=q]t^2F^V7Is^U q7qYeRic^V@IsO1E$<^Uh1j^V@"f]>)+q[D.d5^Uq7i^UCnf]t_.nZbO5h^V@Cp^V@Oi^V7IbW5#pY[(jAjYGK"G^U:hf^Q5q?]>(\eZG2I2^U q7c^TbJ6\\GbkYJ76TO1E$;^TG8P^Q5q?]>(D]WkXV*^Uq7[^TtV8\\GbkW5#mXO1E$;^SeiD^TXKK]YCtk]>)+T^V7Iq^V@OuVSBj[^V@Ou^U(\i^V 7It^V.Cs^V7:o^VA4RbM:^`YeRrfjFEZXeCqooQfR+nifobD^V@Ot]"c"pT<c5G^V@Ot^TFHL]YD.p^V@OX^V7Iq^V@OuVSBj[^V@Ou^U(\i^V7It ^Uh1p^V7=p^V@t3ce?+D^V@P-bK\VcfY4u4^VAIQdG)C;^V@P<c-Xec`f\`sdu`5=bM(%o`k9($^V@Ou:Op3p^V@IZ^V@OcZ+mrd^;% Ft^UV%j^V7It^V@Ou]YD.p]t]u:^V%=`^V7Ir^Uq4p^V?nc^;$;G^V%=q^V%=`W5#pY]>)+qXf0"F^Uh1p^V?ha\A,bm^V@Oe^V%=k^V.CmWk Z3]XhVTb^V@Cp^V@Oc^V7ItTte7T^V@Ou^S/ES^V7It^V@:n]"bto^V@Oq^Uq7l^V@Ou\%fSj^V@Ou^S\cY^V@Ou^V?JW]YD.p^V@On^Uq7q^V@O u\A,Vi^;%Ft^T"uY^V@Ou^V@7m]YD4r^V@O\^V%=r^V@OuZbO8i^;%Ft^RN!Q^TFcU^V@Lt^V@=e^V@Om^V7Is^Uq4p^V@7m^;$eT^ V@Os^V@OcZ+n#f^;%FtXf0"J^V%=r^V?PY^V@Is^;%Fh^V@Ot^V@OcZ+n&g]t_=sXg,XT^Uq7q^V."h]t_=s^V@Ou^V7Ir^V.CaW5$$\]"c"p^SA QY^V.Cr^V."h^V@Lt^V@Ih^V7Ir^V@OuXhVQa]t_=sXg,XR^U_+o^TFcU]>(kj^V?DL^Uq7m^ULt[Z+mlb[_KSl\ZW]X^V%=q^V%=r\A,en^V@ Ou^UV%n^V7It^V@:n^V@Is^V@Oq^Uh1j^V@OuUqaRW^V@Is^UV%l^V%=r^TFcU]YCkh^V?nU^Uq7j^V@OUZG4#d]>(hiXf0"F^U1bj^V@@ p]>(nk^V@OZ^V%=r^V.CsVn]mZ^;%Cs^U(\i^V7It^A]==],((bit and bit.bxor)or(bit32 and bit32.bxor)),((bit and bit.rshift)or(bit32 and bit32.rshift)),((bit and bit.lshift)or(bit32 and bit32.lshift)),((bit32 and bit32.bnot)or(bit and bit.bnot)),((bit and bit.bor)or(bit32 and bit32.bor)),((bit and bit.band)or(bit32 and bit32.band)),(getfenv or function()return _ENV end),(table.create or function(Sw,...)return({unpack({},0x0,Sw)})end),(function(e)local Sw=''for rv=0x1,#e do Sw=Sw..e[rv]end;return Sw end),table.insert,table.remove,string.byte,string.char,string.sub,string.gsub,error,pcall,rawset,pairs,tonumber,setmetatable,select,type,(unpack or table.unpack),math.ldexp,math.floor)
Advertisement
Add Comment
Please, Sign In to add comment