Files
Techmino/parts/scenes/mg_tap.lua

83 lines
1.7 KiB
Lua

local gc=love.graphics
local int,max=math.floor,math.max
local format=string.format
local ins=table.insert
local mStr=mStr
local scene={}
local lastKey
local keyTime
local speed=0
local maxSpeed=260
function scene.sceneInit()
BG.set("grey")
BGM.play("push")
love.keyboard.setKeyRepeat(false)
lastKey=nil
speed=0
keyTime={}for i=1,40 do keyTime[i]=-1e99 end
end
function scene.sceneBack()
love.keyboard.setKeyRepeat(true)
end
function scene.keyDown(key)
if key=="escape"then
SCN.back()
else
if lastKey~=key then
lastKey=key
else
ins(keyTime,1,TIME())
keyTime[41]=nil
SFX.play("click",.3)
end
end
end
function scene.update()
local time=TIME()
local v=0
for i=2,40 do v=v+i*(i-1)*.075/(time-keyTime[i])end
speed=speed*.99+v*.01
if speed>maxSpeed then maxSpeed=speed end
end
function scene.draw()
setFont(70)gc.setColor(1,.6,.6)
mStr(format("%.2f",maxSpeed),640,20)
setFont(35)gc.setColor(.7,.7,1)
mStr(format("%.2f",maxSpeed/60),640,95)
setFont(100)gc.setColor(1,1,1)
mStr(format("%.2f",speed),640,150)
setFont(35)gc.setColor(1,1,1)
mStr(format("%.2f",speed/60),640,255)
setFont(60)gc.setColor(.7,.7,.7)
mStr("/min",640,310)
gc.setLineWidth(4)
if speed==maxSpeed then
local t=TIME()%.1>.05 and 1 or 0
gc.setColor(1,t,t)
else
gc.setColor(max(speed/maxSpeed*10-9,0),1-max(speed/maxSpeed*8-7,0),1-max(speed/maxSpeed*4-3,0))
end
gc.rectangle("fill",960,360,30,-320*max(speed/maxSpeed*4-3,0))
gc.setColor(1,1,1)
gc.rectangle("line",960,360,30,-320)
end
scene.widgetList={
WIDGET.newKey{name="tap", x=640,y=540,w=626,h=260,fText="TAP",color="white",font=100,code=pressKey"button"},
WIDGET.newButton{name="back", x=1140,y=640,w=170,h=80,font=40,code=backScene},
}
return scene