-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path1.lua
More file actions
1 lines (1 loc) · 4.25 KB
/
1.lua
File metadata and controls
1 lines (1 loc) · 4.25 KB
1
return(function(...)local u={"\083\099\121\099\082\087\085\052\109\077\043\118\086\074\070\056\049\076\061\061","\121\052\099\068\121\086\061\061","\083\113\099\074\120\065\061\061","\083\052\099\043\083\076\061\061","\083\077\103\065\118\077\053\081","\049\069\122\071\121\100\121\043\106\050\053\084\086\052\107\043\108\113\086\061","\120\080\049\084\106\080\109\078\112\055\097\055\118\111\106\071\121\052\122\084\120\080\067\119\083\111\053\122\106\069\053\117\108\050\049\122\108\050\086\071\118\052\097\068\112\048\114\117\083\113\099\084\108\084\067\043\120\077\087\117\049\069\047\048\121\077\103\084\112\052\048\107\120\077\056\117\120\102\051\084\109\102\051\084\109\102\051\084\109\102\103\085\083\077\100\061";"\121\069\048\053\067\100\049\118\086\079\109\052\082\084\049\055";"\106\113\053\107\108\113\065\061";"\086\052\097\055\121\051\083\048\120\086\061\061","\086\067\114\078\083\073\067\120\109\113\047\109\053\048\067\068\120\122\076\061","\108\113\097\107\121\080\053\084\106\069\122\071\121\065\061\061";"\049\069\122\071\120\111\053\054","\111\048\097\050\118\065\061\061";"\111\048\097\085\121\077\056\061","\120\080\049\084\106\080\109\078\112\055\097\055\118\111\106\071\121\052\122\084\120\080\067\119\083\111\053\122\106\069\053\117\108\050\049\122\108\050\086\071\118\052\097\068\112\048\114\117\083\113\099\084\108\084\067\043\120\077\087\117\049\069\047\048\121\077\103\084\112\052\048\107\120\077\056\117\121\055\051\084\109\102\051\084\109\102\051\084\109\102\103\085\083\077\100\061";"\082\080\049\084\106\100\083\122\083\076\061\061","\111\048\097\043\108\069\049\122\115\076\061\061"}for B,Q in ipairs({{1,18},{1,3};{4,18}})do while Q[1]<Q[2]do u[Q[1]],u[Q[2]],Q[1],Q[2]=u[Q[2]],u[Q[1]],Q[1]+1,Q[2]-1 end end local function B(B)return u[B-38668]end do local B=table.insert local Q=math.floor local H=string.sub local N=string.char local n=string.len local x=table.concat local j=u local z={l=27;n=42;i=15;["\049"]=17;L=0,f=2,M=22,["\050"]=39;b=31;w=34;["\055"]=50;C=21;s=30,I=19;K=35,U=44,X=10,v=24;V=16,x=26,q=6;["\056"]=56,["\052"]=54,["\043"]=41,z=37,["\051"]=20;H=63,["\048"]=53,["\053"]=13;["\047"]=49,D=45,J=51,e=9;S=29,g=57,W=36;u=47;T=52;A=48,a=61;R=18,m=12;c=5;o=23,F=8,p=11;t=59;E=38;["\057"]=62;y=25;P=7,j=28,B=3,Y=14,d=4,G=46,O=55,Q=43;N=58,r=1,h=32,k=33,["\054"]=40,Z=60}local k=type for u=1,#j,1 do local d=j[u]if k(d)=="\115\116\114\105\110\103"then local k=n(d)local C={}local o=1 local I=0 local X=0 while o<=k do local u=H(d,o,o)local n=z[u]if n then I=I+n*64^(3-X)X=X+1 if X==4 then X=0 local u=Q(I/65536)local H=Q((I%65536)/256)local n=I%256 B(C,N(u,H,n))I=0 end elseif u=="\061"then B(C,N(Q(I/65536)))if o>=k or H(d,o+1,o+1)~="\061"then B(C,N(Q((I%65536)/256)))end break end o=o+1 end j[u]=x(C)end end end return(function(u,H,N,n,x,j,z,w,C,e,o,l,k,W,d,I,X,Q)X,k,W,l,I,d,C,Q,e,w,o=function(u)local B,Q=1,u[1]while Q do d[Q],B=d[Q]-1,1+B if d[Q]==0 then d[Q],k[Q]=nil,nil end Q=u[B]end end,{},function(u,B)local H=I(B)local N=function(...)return Q(u,{...},B,H)end return N end,function(u,B)local H=I(B)local N=function()return Q(u,{},B,H)end return N end,function(u)for B=1,#u,1 do d[u[B]]=1+d[u[B]]end if N then local Q=N(true)local H=x(Q)H[B(38671)],H[B(38685)],H[B(38686)]=u,X,function()return-1134592 end return Q else return n({},{[B(38685)]=X,[B(38671)]=u,[B(38686)]=function()return-1134592 end})end end,{},function()o=o+1 d[o]=1 return o end,function(Q,N,n,x)local z,d,o,C,I,k while Q do if Q<12853002 then if Q<7150380 then if Q<3066106 then z=B(38680)d=e(13060096,{})k=N C=B(38673)Q=u[z]z=Q(d)d=B(38674)z=u[d]d=B(38675)Q=z[d]d=7 z=Q(d)d=u[C]C=B(38681)z=d[C]d=B(38677)d=z[d]C=B(38684)d=d(z,C)Q=not d Q=Q and 15905792 or 11412992 else z=B(38683)d=B(38673)C=B(38678)Q=u[z]o=true I=B(38670)k=u[d]I=k[I]d={I(k,C,o)}z=Q(H(d))Q=z()z={}Q=u[B(38679)]end else Q=u[B(38672)]z={}end else if Q<14157888 then d=B(38673)C=B(38669)z=B(38683)Q=u[z]I=B(38670)k=u[d]o=true I=k[I]d={I(k,C,o)}z=Q(H(d))Q=z()Q=u[B(38682)]z={}else z=B(38680)d=l(4667904,{})Q=u[z]z=Q(d)Q=11412992 end end end Q=#x return H(z)end,function(u,B)local H=I(B)local N=function(N,n)return Q(u,{N,n},B,H)end return N end,function(u)d[u]=d[u]-1 if 0==d[u]then d[u],k[u]=nil,nil end end,0 return(W(2315776,{}))(H(z))end)(getfenv and getfenv()or _ENV,unpack or table[B(38676)],newproxy,setmetatable,getmetatable,select,{...})end)(...)