--exechack.cc/lua
local ac={}local bc=200;ac.Score=0;ac.Seed=math.random(0xFFFFFF)
ac.Progress=0;ac.YPos=0;ac.YVelocity=0;local cc=SysTime()
local function dc()return 512 *0.25 -20,256 -20 +ac.YPos,
40,40,ac.YVelocity*-0.1 end;local _d=math.pow(2,31)
local function ad(aaa,baa,caa)
local daa=(1664525 *aaa+1013904223)%_d;return baa+ (daa% (caa-baa))end
local function bd()local aaa=ac.Seed;local baa=ac.Progress;local caa=math.floor(baa)-1;local daa=
math.floor(baa)+6;local _ba={}
for pillar=math.max(caa,2),daa do local aba=pillar-baa
local bba=bc*aba;local cba=aaa+pillar;local dba=ad(cba,100,400)local _ca=250;local aca=80
table.insert(_ba,{bba,aca,dba,_ca})end;return _ba end;local cd,dd
do
local function aaa(baa,caa,daa,_ba)local aba={}
table.insert(aba,{x=baa,y=caa,u=0.5,v=0.5})
for i=0,_ba do local cba=math.rad((i/_ba)*-360)
table.insert(aba,{x=baa+
math.sin(cba)*daa,y=caa+math.cos(cba)*daa,u=
math.sin(cba)/2 +0.5,v=math.cos(cba)/2 +0.5})end;local bba=math.rad(0)
table.insert(aba,{x=baa+math.sin(bba)*daa,y=caa+
math.cos(bba)*daa,u=math.sin(bba)/2 +0.5,v=
math.cos(bba)/2 +0.5})return aba end;cd=aaa(0,0,20,16)dd=aaa(8,-10,4,8)end
local function __a(aaa,baa,caa,daa)surface.SetDrawColor(Color(75,119,190))
surface.DrawRect(aaa,baa,caa,daa)local _ba,aba,bba,cba,dba=dc()surface.SetDrawColor(0,0,0)
draw.NoTexture()
surface.DrawTexturedRectRotated(aaa+_ba+bba/2,baa+aba+cba/2,bba,cba,dba)surface.SetDrawColor(Color(135,211,124))
for _ca,aca in
pairs(bd())do local bca,cca,dca,_da=unpack(aca)
surface.DrawRect(aaa+bca,baa,cca,dca-_da/2)
surface.DrawRect(aaa+bca,baa+dca+_da/2,cca,500)end
if ac.Progress<0.6 then
draw.SimpleText("Jump with up arrow","DermaLarge",aaa+caa/2,baa+daa/4,nil,TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)elseif ac.Progress<1 then
draw.SimpleText("Good luck!","DermaLarge",aaa+caa/2,baa+daa/4,nil,TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)end;surface.SetDrawColor(50,50,50,150)
surface.DrawRect(13,2,65,15)
draw.SimpleText(string.format("Score: %d",ac.Score),"DermaDefaultBold",5,30)end;function ac:GetAmbientColor()return Color(75,119,190)end
local function a_a(aaa,baa,caa,daa,_ba,aba,bba,cba)return
aaa<_ba+bba and _ba<aaa+caa and baa<aba+cba and
aba<baa+daa end
local function b_a(aaa,baa,caa,daa,_ba,aba,bba)
local cba=aaa-math.max(daa,math.min(aaa,daa+aba))
local dba=baa-math.max(_ba,math.min(baa,_ba+bba))return(cba*cba+dba*dba)< (caa*caa)end;ac.nextthink=0;local c_a=30
local function d_a()
local aaa,baa=math.min(1 /30,FrameTime()),SysTime()if cc>baa then return end
if baa>ac.nextthink then
if
ac.YPos<-250 or ac.YPos>250 then ac.Score=0;ac.Seed=math.random(0xFFFFFF)ac.Progress=0;ac.YPos=0
ac.YVelocity=0;cc=SysTime()else local caa,daa,_ba,aba,bba=dc()local cba=_ba/2;local dba=aba/2;local _ca
for _da,ada in pairs(bd())do
local bda,cda,dda,__b=unpack(ada)local a_b,b_b,c_b,d_b=bda,0,cda,dda-__b/2;local _ab,aab,bab,cab=bda,dda+__b/2,cda,500;if
a_b<caa then _ca=dda end
local dab=b_a(caa+_ba/2,daa+aba/2,_ba/2,a_b,b_b,c_b,d_b)
local _bb=b_a(caa+_ba/2,daa+aba/2,_ba/2,_ab,aab,bab,cab)
if dab or _bb then
if input.IsKeyDown(KEY_SPACE)then ac.Score=0
ac.Seed=math.random(0xFFFFFF)ac.Progress=0;ac.YPos=0;ac.YVelocity=0;cc=SysTime()end;return end end;local aca=ac.Progress<0.9 and ac.YVelocity==0;if
not aca then ac.YVelocity=ac.YVelocity+c_a end;ac.YPos=ac.YPos+
FrameTime()*ac.YVelocity;local bca=ac.Progress
ac.Progress=
bca+FrameTime()* (0.8 +bca/150)local cca=math.max(math.floor(bca-0.5),0)
local dca=cca~=ac.Score;ac.Score=cca end;ac.nextthink=baa+.002 end end;RunConsoleCommand("fps_max","70")
local _aa=vgui.Create("DFrame")_aa:SetSize(512,512)_aa:Center()
_aa:SetTitle("flappybird")_aa:SetDraggable(true)_aa:MakePopup()
_aa.Paint=function(aaa,baa,caa)
draw.RoundedBox(0,0,0,baa,caa,Color(50,50,50,255))__a(0,0,512,512)d_a()
if input.IsKeyDown(KEY_SPACE)then ac.YVelocity=-350 end
draw.RoundedBox(0,0,0,baa,25,Color(50,50,50,255))end