Files
Techmino/parts/netPlayer.lua
2023-09-21 19:44:55 +07:00

272 lines
7.9 KiB
Lua

local gc=love.graphics
local gc_draw,gc_rectangle,gc_print,gc_printf=gc.draw,gc.rectangle,gc.print,gc.printf
local gc_setColor,gc_setLineWidth,gc_translate=gc.setColor,gc.setLineWidth,gc.translate
local gc_stencil,gc_setStencilTest=gc.stencil,gc.setStencilTest
local ins,rem=table.insert,table.remove
local setFont=FONT.set
local posLists={
-- 1~5
(function()
local L={}
for i=1,5 do
L[i]={x=70,y=20+90*i,w=790,h=80}
end
return L
end)(),
-- 6~17
(function()
local L={}
for i=1,10 do
L[i]={x=40,y=60+55*i,w=520,h=50}
end
for i=1,7 do
L[10+i]={x=600,y=60+55*i,w=520,h=50}
end
return L
end)(),
-- 18~31
(function()
local L={}
for i=1,11 do L[i]= {x=40,y=65+50*i,w=330,h=45} end
for i=1,11 do L[11+i]={x=400,y=65+50*i,w=330,h=45} end
for i=1,9 do L[22+i]= {x=760,y=65+50*i,w=330,h=45} end
return L
end)(),
-- 32~49
(function()
local L={}
for i=1,10 do L[i]= {x=30,y=60+50*i,w=200,h=45} end
for i=1,10 do L[10+i]={x=240,y=60+50*i,w=200,h=45} end
for i=1,10 do L[20+i]={x=450,y=60+50*i,w=200,h=45} end
for i=1,10 do L[30+i]={x=660,y=60+50*i,w=200,h=45} end
for i=1,9 do L[40+i]= {x=870,y=60+50*i,w=200,h=45} end
return L
end)(),
-- 50~99
(function()
local L={}
for i=1,11 do L[i]= {x=30,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+11]={x=135,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+22]={x=240,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+33]={x=345,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+44]={x=450,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+55]={x=555,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+66]={x=660,y=60+50*i,w=100,h=45} end
for i=1,11 do L[i+77]={x=765,y=60+50*i,w=100,h=45} end
for i=1,7 do L[i+88]= {x=870,y=60+50*i,w=100,h=45} end
for i=1,4 do L[i+95]= {x=975,y=60+50*i,w=100,h=45} end
return L
end)(),
}
local posList
local function _placeSort(a,b) return a.place<b.place end
local NETPLY
local nullIndex={
__index=function(self,k)
MES.traceback()
MES.new('error',"User not loaded: "..k)
NETPLY.add{
uid=k,
group=-1,
role='Normal',
playMode='Spectator',
readyMode='Standby',
config="",
place=1e99,
stat=false,
}
return self[k]
end
}
local PLYlist,PLYmap=setmetatable({},nullIndex),setmetatable({},nullIndex)
local function _freshPos()
table.sort(PLYlist,_placeSort)
if #PLYlist<=5 then
posList=posLists[1]
elseif #PLYlist<=17 then
posList=posLists[2]
elseif #PLYlist<=31 then
posList=posLists[3]
elseif #PLYlist<=49 then
posList=posLists[4]
else-- if #PLY<=99 then
posList=posLists[5]
end
end
NETPLY={
list=PLYlist,
map=PLYmap,
freshPos=_freshPos,
}
function NETPLY.clear()
TABLE.cut(PLYlist)
TABLE.clear(PLYmap)
end
function NETPLY.add(d)
local p={
uid=d.uid,
group=d.group,
role=d.role,-- 'Normal'|'Admin'
playMode=d.playMode,-- 'Gamer'|'Spectator'
readyMode=d.readyMode,-- 'Standby'|'Ready'|'Playing'|'Finished'
config=d.config,-- A long string generated by dumpBasicConfig()
place=1e99,
stat=false,
}
local a=math.random()*MATH.tau
p.x,p.y,p.w,p.h=640+2600*math.cos(a),360+2600*math.sin(a),47,47
ins(PLYlist,p)
PLYmap[p.uid]=p
_freshPos()
end
function NETPLY.remove(uid)
for i=1,#PLYlist do
if PLYlist[i].uid==uid then
PLYmap[PLYlist[i].uid]=nil
rem(PLYlist,i)
_freshPos()
break
end
end
end
function NETPLY.exist(uid)
return rawget(PLYmap,uid) and true or false
end
function NETPLY.setPlace(uid,place) PLYmap[uid].place=place end
function NETPLY.setStat(uid,S)
PLYmap[uid].stat={
lpm=("%.1f %s"):format(S.piece/S.time*24,text.radarData[5]),
apm=("%.1f %s"):format(S.atk/S.time*60,text.radarData[3]),
adpm=("%.1f %s"):format((S.atk+S.dig)/S.time*60,text.radarData[2]),
}
end
local selP,mouseX,mouseY
function NETPLY.mouseMove(x,y)
selP=nil
for i=1,#PLYlist do
local p=PLYlist[i]
if x>p.x and y>p.y and x<p.x+p.w and y<p.y+p.h then
mouseX,mouseY=x,y
selP=p
break
end
end
end
function NETPLY.update(dt)
for i=1,#PLYlist do
local p=PLYlist[i]
local t=posList[i]
local d=dt*12
p.x=MATH.expApproach(p.x,t.x,d)
p.y=MATH.expApproach(p.y,t.y,d)
p.w=MATH.expApproach(p.w,t.w,d)
p.h=MATH.expApproach(p.h,t.h,d)
end
end
local stencilW,stencilH
local function _playerFrameStencil()
gc_rectangle('fill',0,0,stencilW,stencilH)
end
function NETPLY.draw()
for i=1,#PLYlist do
local p=PLYlist[i]
gc_translate(p.x,p.y)
-- Rectangle
if p.playMode=='Gamer' then
if p.readyMode=='Standby' then
gc_setColor(COLOR.Z)
elseif p.readyMode=='Ready' then
gc_setColor(COLOR.N)
else
gc_setColor(.26,.62,.26,.26)
gc_rectangle('fill',0,0,p.w,p.h)
gc_setColor(COLOR.lG)
end
else
gc_setColor(COLOR.dX)
gc_rectangle('fill',0,0,p.w,p.h)
gc_setColor(COLOR.dH)
end
gc_setLineWidth(p.role=='Admin' and 4 or 2)
gc_rectangle('line',0,0,p.w,p.h)
-- Stencil
stencilW,stencilH=p.w,p.h
gc_setStencilTest('equal',1)
gc_stencil(_playerFrameStencil)
gc_setColor(1,1,1)
-- Avatar
local avatarSize=math.min(p.h,50)/128*.9
gc_draw(USERS.getAvatar(p.uid),2,2,nil,avatarSize)
-- Stat
local S=p.stat
if S and (p.h>=55 or p.w>=180) then
setFont(20)
local x=p.w-155
if p.h>=55 then
gc_printf(S.adpm,x,2,150,'right')
gc_printf(S.apm,x,24,150,'right')
gc_printf(S.lpm,x,46,150,'right')
else
gc_printf(S.adpm,x,0,150,'right')
gc_printf(S.lpm,x,19,150,'right')
end
end
-- UID & Username
gc_setColor(GROUP_COLORS[p.group] or COLOR.dH)
if p.h>=47 then
setFont(40)
gc_print("#"..p.uid,50,-5)
gc_print(USERS.getUsername(p.uid),210,-5)
else
setFont(15)
gc_print("#"..p.uid,46,-1)
setFont(30)
gc_print(USERS.getUsername(p.uid),p.h,8)
end
gc_setStencilTest()
gc_translate(-p.x,-p.y)
end
if selP then
gc_translate(math.min(mouseX,880),math.min(mouseY,460))
gc_setColor(COLOR.X)
gc_rectangle('fill',0,0,400,260)
gc_setColor(1,1,1)
gc_setLineWidth(2)
gc_rectangle('line',0,0,400,260)
gc_draw(USERS.getAvatar(selP.uid),5,5,nil,.5)
setFont(30)
gc_print("#"..selP.uid,75,0)
setFont(35)
gc_print(USERS.getUsername(selP.uid),75,25)
setFont(20)
gc_printf(USERS.getMotto(selP.uid),5,70,390)
if selP.stat then
local S=selP.stat
gc_print(S.lpm,5,193)
gc_print(S.apm,5,213)
gc_print(S.adpm,5,233)
end
gc_translate(-math.min(mouseX,880),-math.min(mouseY,460))
end
end
return NETPLY