1 line
4.6 KiB
Lua
1 line
4.6 KiB
Lua
return(function(...)local N={"\099\105\068\065\048\081\101\079\077\049\103\086\048\081\089\074","\055\047\080\121\043\082\061\061";"\097\066\103\070";"\109\081\089\073\097\119\048\086\099\090\051\122\043\047\051\105\068\082\061\061";"\043\066\113\075\097\066\103\070","\099\090\103\121\097\085\061\061","\068\111\047\119\056\119\085\082\043\111\047\106\057\067\087\055\048\082\061\061";"\087\067\120\050\049\066\052\112\073\055\069\119\099\078\065\120\087\066\085\061","\066\100\109\069\073\121\087\050\066\119\107\105\087\047\087\052\066\068\061\061","\097\066\104\065\073\072\061\061","\097\066\104\120","\055\047\080\054\087\066\120\061";"\116\078\113\050\105\078\071\052\069\066\086\069\069\078\086\055","\101\066\052\082\043\066\048\122";"\097\066\104\065\073\100\069\065\073\066\082\061","\043\090\086\107\097\055\072\061";"\099\112\101\049\068\075\069\120\097\065\109\079\116\066\113\079";"\043\066\113\075","\116\066\109\055\056\066\086\050\087\065\086\079\073\081\085\090\073\072\061\061";"\055\047\080\051\097\111\109\103\056\072\061\061";"\049\047\113\067\109\047\087\110\048\104\103\122\043\105\069\111\097\069\067\061","\068\066\080\057\048\112\069\057\101\100\048\086\105\049\087\105\087\100\072\061"}local function P(P)return N[P-38574]end for P,i in ipairs({{1;22};{1,19},{20,22}})do while i[1]<i[2]do N[i[1]],N[i[2]],i[1],i[2]=N[i[2]],N[i[1]],i[1]+1,i[2]-1 end end do local P=string.len local i=table.concat local W=string.char local G=N local m=math.floor local J=string.sub local H=table.insert local R=type local o={Z=54,f=47;b=11,["\043"]=24,y=39,S=59;N=6;["\053"]=31;t=14;J=2,v=10;F=46,M=18,g=37,P=61,H=0,a=27,X=15,u=62;s=34,i=20;r=60;I=26;c=28,q=9;["\051"]=41,A=52;["\057"]=12;E=21,l=58;R=48;["\048"]=13,Q=35;Y=1,x=56,o=38;["\056"]=30;["\055"]=23,D=16,G=40,K=51,T=45,j=8,w=4;B=22;e=29,V=49,W=25;z=43;O=55,["\054"]=44,h=5,["\052"]=57;C=36;U=32;["\050"]=50,["\047"]=53;n=42,m=17,["\049"]=19,L=63,d=7;k=33,p=3}for N=1,#G,1 do local K=G[N]if R(K)=="\115\116\114\105\110\103"then local R=P(K)local l={}local O=1 local x=0 local c=0 while O<=R do local N=J(K,O,O)local P=o[N]if P then x=x+P*64^(3-c)c=c+1 if c==4 then c=0 local N=m(x/65536)local P=m((x%65536)/256)local i=x%256 H(l,W(N,P,i))x=0 end elseif N=="\061"then H(l,W(m(x/65536)))if O>=R or J(K,O+1,O+1)~="\061"then H(l,W(m((x%65536)/256)))end break end O=O+1 end G[N]=i(l)end end end return(function(N,W,G,m,J,H,R,K,x,i,j,o,l,c,q,B,v,O,L)L,B,l,q,j,i,v,o,x,c,K,O=function(N,P)local W=x(P)local G=function(...)return i(N,{...},P,W)end return G end,function(N)K[N]=K[N]-1 if K[N]==0 then K[N],o[N]=nil,nil end end,function()O=O+1 K[O]=1 return O end,function(N,P)local W=x(P)local G=function(G,m,J)return i(N,{G;m;J},P,W)end return G end,function(N,P)local W=x(P)local G=function(G,m,J,H,R,o,K)return i(N,{G;m,J,H,R,o;K},P,W)end return G end,function(i,G,m,J)local x,o,R,c,l,O,K while i do if i<12027101 then if i<2778402 then if i<1411238 then if i<1227814 then i=1 R={i}i=N[P(38594)]else R=0 i=o<R i=i and 13515208 or 2435158 end else if i<1734624 then o=G[1]R=0 i=o>R i=i and 4754293 or 9881175 else i=0 R={i}i=N[P(38584)]end end else if i<7053989 then if i<3633005 then i=0 R={i}i=N[P(38575)]else i=1 R={i}i=N[P(38592)]end else if i<10291436 then R=0 i=o<R i=i and 13305478 or 2821122 else l=P(38581)R=N[l]l=P(38596)o=G[1]i=R[l]O=G[3]c=P(38581)x=N[c]c=P(38582)K=G[2]l=x[c]x=l(o,K)R={i(x,O)}i=N[P(38578)]R={W(R)}end end end else if i<15497190 then if i<13588926 then if i<13374105 then i=-1 R={i}i=N[P(38580)]else i=-1 R={i}i=N[P(38590)]end else if i<13980735 then K=P(38586)i={}l=P(38586)o=G R=P(38586)N[R]=i R=N[K]O=N[l]K=P(38591)R[K]=O R=j(15971673,{})O=P(38576)K=P(38586)K=N[K]K[O]=R K=P(38586)R=q(16427375,{})O=P(38577)K=N[K]K[O]=R R=v(1728393,{})K=P(38586)O=P(38577)K=N[K]K[O]=R O=P(38587)R=q(11126688,{})K=P(38586)K=N[K]K[O]=R i=N[P(38593)]R={}else i=N[P(38588)]R={o}end end else if i<16306831 then if i<15917836 then i=N[P(38579)]R={K}else x=P(38581)o=G[1]l=P(38581)K=G[2]O=N[l]l=P(38589)R=O[l]O=R(o)l=N[x]x=P(38589)R=l[x]l=R(K)i=O<l i=i and 14017430 or 15872467 end else o=G[1]R=0 i=o>R i=i and 361794 or 1305643 end end end end i=#J return W(R)end,function(N,P)local W=x(P)local G=function(G,m)return i(N,{G,m},P,W)end return G end,{},function(N)for P=1,#N,1 do K[N[P]]=1+K[N[P]]end if G then local i=G(true)local W=J(i)W[P(38591)],W[P(38595)],W[P(38583)]=N,c,function()return 3218582 end return i else return m({},{[P(38595)]=c;[P(38591)]=N;[P(38583)]=function()return 3218582 end})end end,function(N)local P,i=1,N[1]while i do K[i],P=K[i]-1,1+P if K[i]==0 then K[i],o[i]=nil,nil end i=N[P]end end,{},0 return(L(13863633,{}))(W(R))end)(getfenv and getfenv()or _ENV,unpack or table[P(38585)],newproxy,setmetatable,getmetatable,select,{...})end)(...) |