Files
CTF/DownUnderCTF 2023/rev/SPACEGAME/SPACEGAME/distrib/_SPACEGAME.exe.extracted/Bullet.lua
2023-09-05 14:38:18 +02:00

1 line
5.3 KiB
Lua

return(function(...)local R={"\088\116\054\079\098\098\079\068\055\084\104\074\088\043\105\079\119\081\061\061";"\104\065\079\049\077\065\119\085","\115\072\053\114\118\120\105\076\070\122\061\061","\119\099\105\109\070\099\106\077\070\089\089\074\105\076\119\114\111\081\061\061","\118\065\084\049\115\067\054\076\057\065\104\066\104\122\061\061","\089\089\104\074\104\120\114\048\071\120\104\066\070\099\105\117\088\049\061\061";"\115\072\053\043\077\049\061\061","\071\067\089\050\118\065\089\050\077\115\105\054\077\120\075\076";"\070\081\061\061","\070\122\061\061","\081\043\089\097\118\107\089\050","\118\065\084\050\057\048\089\050\057\065\049\061","\115\072\053\097\106\065\108\061","\055\068\072\102\089\099\105\100\118\068\119\108\106\084\089\076\070\103\061\061","\106\074\086\054\071\107\054\114\077\074\111\061";"\118\120\089\074";"\104\107\076\097\106\089\053\116\057\115\114\076","\106\076\068\075\055\098\105\113\069\056\084\078\088\056\053\067";"\106\048\086\054\104\049\061\061";"\077\065\079\114\118\089\053\114\118\065\071\061";"\104\043\068\061","\057\115\119\068\106\065\084\068";"\118\065\084\049\115\074\104\114\106\048\105\066","\077\067\053\112\071\074\105\054\118\043\105\116";"\057\065\072\043\113\067\086\072\118\107\075\076\104\117\079\049\118\120\071\061","\104\043\103\061","\104\115\102\068\077\115\105\076","\071\120\089\075\104\065\076\109\106\081\061\061","\118\107\053\067\106\081\061\061","\118\120\089\074\088\065\072\054\106\067\098\061"}local function I(I)return R[I-35313]end for I,g in ipairs({{1,30};{1,17};{18;30}})do while g[1]<g[2]do R[g[1]],R[g[2]],g[1],g[2]=R[g[2]],R[g[1]],g[1]+1,g[2]-1 end end do local I=string.len local g=type local b=R local H=string.char local F={["\057"]=26,I=58;i=17;L=37;h=29;Y=21,w=13,a=44;Z=10;F=30,u=2,G=28,p=46;n=59,B=40,D=36;j=25,b=20;v=27,K=49;m=50,k=6;["\054"]=33,M=24,J=55,X=18;f=1;["\050"]=52,r=41,U=43,A=22;c=3;O=57,q=11;o=12,E=14;l=56,["\055"]=19;y=15;V=9;["\053"]=61,z=0,t=51;x=38;S=60,Q=16,["\049"]=48,["\056"]=4;T=5;C=54,e=45,g=32;d=8;N=42,["\048"]=7;P=62;["\043"]=39,R=31;["\047"]=35,H=53,W=63;s=23;["\051"]=47;["\052"]=34}local r=table.insert local L=string.sub local A=math.floor local y=table.concat for R=1,#b,1 do local S=b[R]if g(S)=="\115\116\114\105\110\103"then local g=I(S)local z={}local O=1 local e=0 local t=0 while O<=g do local R=L(S,O,O)local I=F[R]if I then e=e+I*64^(3-t)t=t+1 if t==4 then t=0 local R=A(e/65536)local I=A((e%65536)/256)local g=e%256 r(z,H(R,I,g))e=0 end elseif R=="\061"then r(z,H(A(e/65536)))if O>=g or L(S,O+1,O+1)~="\061"then r(z,H(A((e%65536)/256)))end break end O=O+1 end b[R]=y(z)end end end return(function(R,b,H,F,r,L,A,z,y,D,e,S,E,Z,g,B,C,J,t,O)O,y,S,D,E,J,Z,e,t,z,C,B,g=0,{},{},function(R,I)local b=e(I)local H=function(H,F)return g(R,{H;F},I,b)end return H end,function(R,I)local b=e(I)local H=function(...)return g(R,{...},I,b)end return H end,function(R,I)local b=e(I)local H=function(H,F,r,L)return g(R,{H,F;r;L},I,b)end return H end,function(R,I)local b=e(I)local H=function(H)return g(R,{H},I,b)end return H end,function(R)for I=1,#R,1 do S[R[I]]=S[R[I]]+1 end if H then local g=H(true)local b=r(g)b[I(35333)],b[I(35337)],b[I(35343)]=R,t,function()return-3702237 end return g else return F({},{[I(35337)]=t;[I(35333)]=R,[I(35343)]=function()return-3702237 end})end end,function(R)local I,g=1,R[1]while g do S[g],I=S[g]-1,1+I if 0==S[g]then S[g],y[g]=nil,nil end g=R[I]end end,function()O=O+1 S[O]=1 return O end,function(R)S[R]=S[R]-1 if S[R]==0 then S[R],y[R]=nil,nil end end,function(R,I)local b=e(I)local H=function(H,F,r,L,A,y,S)return g(R,{H;F;r;L;A,y,S},I,b)end return H end,function(g,H,F,r)local C,A,S,X,t,O,Y,q,E,z,u,e,y,v while g do if g<11869441 then if g<7712971 then if g<3796866 then if g<2291095 then A=S g=O g=12843378 else A=I(35328)y=H S=I(35342)g=R[A]A=g(S)A=I(35328)S=I(35324)g=R[A]A=g(S)z=I(35341)A=I(35341)g={}R[A]=g S=I(35341)A=R[S]S=I(35333)O=R[z]A[S]=O A=J(13632353,{})S=I(35341)O=I(35316)S=R[S]S[O]=A A=B(16277403,{})O=I(35327)S=I(35341)S=R[S]S[O]=A A=Z(11109727,{})S=I(35341)O=I(35322)S=R[S]S[O]=A S=I(35341)A=D(6340462,{})O=I(35319)S=R[S]S[O]=A g=R[I(35336)]A={}end else y=H[1]O=I(35329)S=R[O]O=I(35315)A=S[O]S=I(35319)z=I(35340)O=I(35320)g=A[S]e=I(35339)S=y[O]O=y[z]z=y[e]y=nil A=g(S,O,z)A={}g=R[I(35314)]end else if g<11265216 then if g<9321236 then S=z g=e g=2051797 else z=I(35340)y=H[1]O=y[z]z=-20 S=O<z g=S and 12843378 or 13370365 A=S end else E=I(35339)t=y[E]v=I(35324)q=R[v]X=I(35324)v=I(35317)u=q[v]v=R[X]X=I(35335)q=v[X]g=7941658 Y=u*q u=20 E=Y+u C=t>E z=C end end else if g<13583598 then if g<13111744 then if g<12283012 then e=g E=I(35339)t=y[E]E=-20 C=t<E g=C and 7941658 or 11671190 z=C else A={A}g=R[I(35318)]end else O=g C=I(35340)e=y[C]u=I(35324)q=I(35324)Y=R[u]u=I(35317)E=Y[u]u=R[q]q=I(35323)Y=u[q]t=E*Y E=20 C=t+E z=e>C g=z and 2051797 or 12093505 S=z end else if g<16199247 then A=I(35338)g={}y=H[1]e=g O=H[3]t=I(35341)z=H[4]g=R[A]C=R[t]A=g(e,C)S=H[2]A=y g=I(35340)e[g]=A E=I(35329)g=I(35339)A=S e[g]=A g=I(35326)A=O e[g]=A g=I(35321)A=z e[g]=A g=I(35320)t=R[E]E=I(35315)C=t[E]t=I(35330)A=C[t]t=I(35325)C=A(t)e[g]=C A={e}g=R[I(35334)]else S=H[2]z=I(35340)e=I(35326)g=I(35340)y=H[1]O=y[z]z=y[e]A=O+z y[g]=A g=I(35339)S=nil e=I(35321)z=I(35339)O=y[z]z=y[e]A=O+z y[g]=A y=nil g=R[I(35331)]A={}end end end end g=#r return b(A)end return(E(3702469,{}))(b(A))end)(getfenv and getfenv()or _ENV,unpack or table[I(35332)],newproxy,setmetatable,getmetatable,select,{...})end)(...)