触屏每帧只采样一次

This commit is contained in:
MrZ626
2021-01-01 16:43:21 +08:00
parent caf99c2605
commit fc15e2fe3d
2 changed files with 324 additions and 5 deletions

320
parts/scenes/net_game.lua Normal file
View File

@@ -0,0 +1,320 @@
local gc=love.graphics
local gc_setColor,gc_circle=gc.setColor,gc.circle
local tc=love.touch
local max,sin=math.max,math.sin
local SCR=SCR
local VK=virtualkey
local function onVirtualkey(x,y)
local dist,nearest=1e10
for K=1,#VK do
local B=VK[K]
if B.ava then
local d1=(x-B.x)^2+(y-B.y)^2
if d1<B.r^2 then
if d1<dist then
nearest,dist=K,d1
end
end
end
end
return nearest
end
local lastBackTime=0
local noTouch=false
local touchMoveLastFrame=false
local scene={}
function scene.sceneInit()
love.keyboard.setKeyRepeat(false)
if GAME.init then
resetGameData()
GAME.init=false
end
noTouch=not SETTING.VKSwitch
end
function scene.touchDown(_,x,y)
if noTouch then return end
local t=onVirtualkey(x,y)
if t then
PLAYERS[1]:pressKey(t)
if SETTING.VKSFX>0 then
SFX.play("virtualKey",SETTING.VKSFX)
end
local B=VK[t]
B.isDown=true
B.pressTime=10
if SETTING.VKTrack then
if SETTING.VKDodge then--Button collision (not accurate)
for i=1,#VK do
local b=VK[i]
local d=B.r+b.r-((B.x-b.x)^2+(B.y-b.y)^2)^.5--Hit depth(Neg means distance)
if d>0 then
b.x=b.x+(b.x-B.x)*d*b.r*5e-4
b.y=b.y+(b.y-B.y)*d*b.r*5e-4
end
end
end
local O=VK_org[t]
local _FW,_CW=SETTING.VKTchW,1-SETTING.VKCurW
local _OW=1-_FW-_CW
--Auto follow: finger, current, origin (weight from setting)
B.x,B.y=x*_FW+B.x*_CW+O.x*_OW,y*_FW+B.y*_CW+O.y*_OW
end
VIB(SETTING.VKVIB)
end
end
function scene.touchUp(_,x,y)
if noTouch then return end
local t=onVirtualkey(x,y)
if t then
PLAYERS[1]:releaseKey(t)
end
end
function scene.touchMove()
if noTouch or touchMoveLastFrame then return end
touchMoveLastFrame=true
local L=tc.getTouches()
for i=#L,1,-1 do
L[2*i-1],L[2*i]=SCR.xOy:inverseTransformPoint(tc.getPosition(L[i]))
end
for n=1,#VK do
local B=VK[n]
if B.ava then
for i=1,#L,2 do
if(L[i]-B.x)^2+(L[i+1]-B.y)^2<=B.r^2 then
goto continue
end
end
PLAYERS[1]:releaseKey(n)
end
::continue::
end
end
function scene.keyDown(key)
if key=="escape"then
if TIME()-lastBackTime<1 then
WSCONN=false
SCN.back()
else
lastBackTime=TIME()
end
else
local m=keyMap
for k=1,20 do
if key==m[1][k]or key==m[2][k]then
PLAYERS[1]:pressKey(k)
VK[k].isDown=true
VK[k].pressTime=10
return
end
end
end
end
function scene.keyUp(key)
local m=keyMap
for k=1,20 do
if key==m[1][k]or key==m[2][k]then
PLAYERS[1]:releaseKey(k)
VK[k].isDown=false
return
end
end
end
function scene.gamepadDown(key)
local m=keyMap
for k=1,20 do
if key==m[3][k]or key==m[4][k]then
PLAYERS[1]:pressKey(k)
VK[k].isDown=true
VK[k].pressTime=10
return
end
end
if key=="back"then pauseGame()end
end
function scene.gamepadUp(key)
local m=keyMap
for k=1,20 do
if key==m[3][k]or key==m[4][k]then
PLAYERS[1]:releaseKey(k)
VK[k].isDown=false
return
end
end
end
function scene.update(dt)
local _
local P1=PLAYERS[1]
local GAME=GAME
GAME.frame=GAME.frame+1
touchMoveLastFrame=false
--Update virtualkey animation
if SETTING.VKSwitch then
for i=1,#VK do
_=VK[i]
if _.pressTime>0 then
_.pressTime=_.pressTime-1
end
end
end
--Replay
if GAME.replaying then
_=GAME.replaying
local L=GAME.rep
while GAME.frame==L[_]do
local k=L[_+1]
if k>0 then
P1:pressKey(k)
VK[k].isDown=true
VK[k].pressTime=10
else
VK[-k].isDown=false
P1:releaseKey(-k)
end
_=_+2
end
GAME.replaying=_
end
--Counting,include pre-das,directy RETURN,or restart counting
if GAME.frame<180 then
if GAME.frame==179 then
gameStart()
elseif GAME.frame==60 or GAME.frame==120 then
SFX.play("ready")
end
for p=1,#PLAYERS do
local P=PLAYERS[p]
if P.movDir~=0 then
if P.moving<P.gameEnv.das then
P.moving=P.moving+1
end
else
P.moving=0
end
end
return
end
--Update players
for p=1,#PLAYERS do
PLAYERS[p]:update(dt)
end
--Warning check
if P1.alive then
if GAME.frame%26==0 and SETTING.warn then
local F=P1.field
local height=0--Max height of row 4~7
for x=4,7 do
for y=#F,1,-1 do
if F[y][x]>0 then
if y>height then
height=y
end
break
end
end
end
GAME.warnLVL0=math.log(height-15+P1.atkBuffer.sum*.8)
end
_=GAME.warnLVL
if _<GAME.warnLVL0 then
_=_*.95+GAME.warnLVL0*.05
elseif _>0 then
_=max(_-.026,0)
end
GAME.warnLVL=_
elseif GAME.warnLVL>0 then
GAME.warnLVL=max(GAME.warnLVL-.026,0)
end
end
function scene.draw()
local t=TIME()
if MARKING then
setFont(25)
gc_setColor(1,1,1,.2+.1*(sin(3*t)+sin(2.6*t)))
mStr(text.marking,190,60+26*sin(t))
end
--Players
for p=1,#PLAYERS do
PLAYERS[p]:draw()
end
--Virtual keys
gc_setColor(1,1,1)
if SETTING.VKSwitch then
local a=SETTING.VKAlpha
local _
if SETTING.VKIcon then
local icons=TEXTURE.VKIcon
for i=1,#VK do
if VK[i].ava then
local B=VK[i]
gc_setColor(1,1,1,a)
gc.setLineWidth(B.r*.07)
gc_circle("line",B.x,B.y,B.r,10)--Button outline
_=VK[i].pressTime
gc.draw(icons[i],B.x,B.y,nil,B.r*.026+_*.08,nil,18,18)--Icon
if _>0 then
gc_setColor(1,1,1,a*_*.08)
gc_circle("fill",B.x,B.y,B.r*.94,10)--Glow when press
gc_circle("line",B.x,B.y,B.r*(1.4-_*.04),10)--Ripple
end
end
end
else
for i=1,#VK do
if VK[i].ava then
local B=VK[i]
gc_setColor(1,1,1,a)
gc.setLineWidth(B.r*.07)
gc_circle("line",B.x,B.y,B.r,10)
_=VK[i].pressTime
if _>0 then
gc_setColor(1,1,1,a*_*.08)
gc_circle("fill",B.x,B.y,B.r*.94,10)
gc_circle("line",B.x,B.y,B.r*(1.4-_*.04),10)
end
end
end
end
end
--Mode info
gc_setColor(1,1,1,.8)
gc.draw(drawableText.modeName,485,10)
gc.draw(drawableText.levelName,511+drawableText.modeName:getWidth(),10)
--Warning
gc.push("transform")
gc.origin()
if GAME.warnLVL>0 then
SHADER.warning:send("level",GAME.warnLVL)
gc.setShader(SHADER.warning)
gc.rectangle("fill",0,0,SCR.w,SCR.h)
gc.setShader()
end
gc.pop()
end
scene.widgetList={
WIDGET.newKey{name="quit",x=1235,y=45,w=80,font=25,code=WIDGET.lnk_pressKey("escape")},
}
return scene

View File

@@ -23,7 +23,7 @@ local function onVirtualkey(x,y)
end
local noTouch,noKey=false,false
local touchMoveLastFrame=0
local touchMoveLastFrame=false
local scene={}
@@ -80,9 +80,8 @@ function scene.touchUp(_,x,y)
end
end
function scene.touchMove()
if noTouch then return end
if touchMoveLastFrame>1 then return end
touchMoveLastFrame=touchMoveLastFrame+1
if noTouch or touchMoveLastFrame then return end
touchMoveLastFrame=true
local L=tc.getTouches()
for i=#L,1,-1 do
@@ -161,7 +160,7 @@ function scene.update(dt)
local GAME=GAME
GAME.frame=GAME.frame+1
touchMoveLastFrame=0
touchMoveLastFrame=false
--Update virtualkey animation
if SETTING.VKSwitch then