6 Commits

2 changed files with 143 additions and 124 deletions

View File

@ -266,15 +266,18 @@ local function drawFlags(v, x, y, flags)
end end
end end
local MSK_SPEED = 0xF0
local MSK_WEIGHT = 0xF
local function drawStats(v, x, y, skin, stats) local function drawStats(v, x, y, skin, stats)
local s = skins[skin] local s = skins[skin]
if not (s if stats
and s.kartspeed == stats["speed"] and not (s
and s.kartweight == stats["weight"] and s.kartspeed == (stats & MSK_SPEED) >> 4
) and s.kartweight == stats & MSK_WEIGHT
and stats then ) then
v.drawString(x-2, y-2, stats["speed"], V_ALLOWLOWERCASE, "thin") v.drawString(x-2, y-2, (stats & MSK_SPEED) >> 4, V_ALLOWLOWERCASE, "thin")
v.drawString(x + 13, y + 9, stats["weight"], V_ALLOWLOWERCASE, "thin") v.drawString(x + 13, y + 9, stats & MSK_WEIGHT, V_ALLOWLOWERCASE, "thin")
end end
end end

View File

@ -253,79 +253,81 @@ local function score_t(map, name, skin, color, time, splits, flags, stat)
} }
end end
local MSK_SPEED = 0xF0
local MSK_WEIGHT = 0xF
local function stat_t(speed, weight) local function stat_t(speed, weight)
if speed and weight then if speed and weight then
return { return (speed << 4) | weight
["speed"] = speed,
["weight"] = weight
}
end end
return nil return 0
end end
local function stat_str(stat) local function stat_str(stat)
if stat then if stat then
return string.format("%d%d", stat["speed"], stat["weight"]) return string.format("%d%d", (stat & MSK_SPEED) >> 4, stat & MSK_WEIGHT)
end end
return "0" return "0"
end end
-- Read the leaderboard -- Read the leaderboard
local f = io.open(FILENAME, "r") if isserver then
if f then local f = io.open(FILENAME, "r")
for l in f:lines() do if f then
-- Leaderboard is stored in the following tab separated format for l in f:lines() do
-- mapnum, name, skin, color, time, splits, flags, stat -- Leaderboard is stored in the following tab separated format
local t = {} -- mapnum, name, skin, color, time, splits, flags, stat
for word in (l+"\t"):gmatch("(.-)\t") do local t = {}
table.insert(t, word) for word in (l+"\t"):gmatch("(.-)\t") do
end table.insert(t, word)
local flags = 0
if t[7] != nil then
flags = tonumber(t[7])
end
scoreTable = getScoreTable(tonumber(t[1]), flags) or {}
local spl = {}
if t[6] != nil then
for str in t[6]:gmatch("([^ ]+)") do
table.insert(spl, tonumber(str))
end end
end
local stats = nil local flags = 0
if t[8] != nil then if t[7] != nil then
if #t[8] >= 2 then flags = tonumber(t[7])
local speed = tonumber(string.sub(t[8], 1, 1))
local weight = tonumber(string.sub(t[8], 2, 2))
stats = stat_t(speed, weight)
end end
end
table.insert( scoreTable = getScoreTable(tonumber(t[1]), flags) or {}
scoreTable,
score_t( local spl = {}
tonumber(t[1]), if t[6] != nil then
t[2], for str in t[6]:gmatch("([^ ]+)") do
t[3], table.insert(spl, tonumber(str))
t[4], end
tonumber(t[5]), end
spl,
flags, local stats = nil
stats if t[8] != nil then
if #t[8] >= 2 then
local speed = tonumber(string.sub(t[8], 1, 1))
local weight = tonumber(string.sub(t[8], 2, 2))
stats = stat_t(speed, weight)
end
end
table.insert(
scoreTable,
score_t(
tonumber(t[1]),
t[2],
t[3],
t[4],
tonumber(t[5]),
spl,
flags,
stats
)
) )
)
setScoreTable(tonumber(t[1]), flags, scoreTable) setScoreTable(tonumber(t[1]), flags, scoreTable)
end
sortScores()
f:close()
else
print("Failed to open file: ", FILENAME)
end end
sortScores()
f:close()
else
print("Failed to open file: ", FILENAME)
end end
function allowJoin(v) function allowJoin(v)
@ -987,11 +989,11 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
local pskin = score["skin"] and skins[score["skin"]] local pskin = score["skin"] and skins[score["skin"]]
if stat and not ( if stat and not (
pskin pskin
and pskin.kartweight == stat["weight"] and pskin.kartweight == stat & MSK_WEIGHT
and pskin.kartspeed == stat["speed"] and pskin.kartspeed == (stat & MSK_SPEED) >> 4
) then ) then
v.drawString(x + FACERANK_DIM - 2, y + 4, stat["speed"], V_HUDTRANS | VFLAGS, "small") v.drawString(x + FACERANK_DIM - 2, y + 4, (stat & MSK_SPEED) >> 4, V_HUDTRANS | VFLAGS, "small")
v.drawString(x + FACERANK_DIM - 2, y + 8, stat["weight"], V_HUDTRANS | VFLAGS, "small") v.drawString(x + FACERANK_DIM - 2, y + 8, stat & MSK_WEIGHT, V_HUDTRANS | VFLAGS, "small")
end end
if gui == GUI_ON or (gui == GUI_SPLITS and showSplit) then if gui == GUI_ON or (gui == GUI_SPLITS and showSplit) then
@ -1221,9 +1223,45 @@ local function writeStats()
end end
end end
local function saveTime(player) local function checkFlags(p)
local flags = 0
scoreTable = $ or {} -- Encore
if encoremode then
flags = $ | F_ENCORE
end
if not cv_spbatk then
cv_spbatk = CV_FindVar("spbatk")
end
-- SPBAttack
if server.SPBArunning and cv_spbatk.value then
flags = $ | F_SPBATK
if server.SPBAexpert then
flags = $ | F_SPBEXP
end
if p.SPBAKARTBIG then
flags = $ | F_SPBBIG
end
if p.SPBAjustice then
flags = $ | F_SPBJUS
end
end
return flags
end
local function saveTime(player)
-- Disqualify if the flags changed mid trial.
if checkFlags(player) != Flags then
print("Game mode change detected! Time has been disqualified.")
S_StartSound(nil, 110)
return
end
scoreTable = $ or {}
local pskin = skins[player.mo.skin] local pskin = skins[player.mo.skin]
local newscore = score_t( local newscore = score_t(
@ -1279,30 +1317,32 @@ local function saveTime(player)
StatTrack = true StatTrack = true
end end
local f = assert(io.open(FILENAME, "w")) if isserver then
if f == nil then local f = assert(io.open(FILENAME, "w"))
print("Failed to open file for writing: " + FILENAME) if f == nil then
return print("Failed to open file for writing: " + FILENAME)
end return
end
for _, tbl in pairs(lb) do for _, tbl in pairs(lb) do
for _, scoreTable in pairs(tbl) do for _, scoreTable in pairs(tbl) do
for _, score in ipairs(scoreTable) do for _, score in ipairs(scoreTable) do
f:write( f:write(
score["map"], "\t", score["map"], "\t",
score["name"], "\t", score["name"], "\t",
score["skin"], "\t", score["skin"], "\t",
score["color"], "\t", score["color"], "\t",
score["time"], "\t", score["time"], "\t",
table.concat(score["splits"], " "), "\t", table.concat(score["splits"], " "), "\t",
score["flags"], "\t", score["flags"], "\t",
stat_str(score["stat"]), "\n" stat_str(score["stat"]), "\n"
) )
end
end end
end end
end
f:close() f:close()
end
end end
-- DEBUGGING -- DEBUGGING
@ -1387,13 +1427,7 @@ local function think()
end end
-- Autospec -- Autospec
-- Encore
if leveltime == 1 then if leveltime == 1 then
Flags = $ & !F_ENCORE
if encoremode then
Flags = $ | F_ENCORE
end
if p then if p then
for s in players.iterate do for s in players.iterate do
if s.valid and s.spectator then if s.valid and s.spectator then
@ -1402,49 +1436,29 @@ local function think()
end end
end end
end end
if not cv_spbatk then
cv_spbatk = CV_FindVar("spbatk")
end
-- Gamemode flags if leveltime > START_TIME - (3 * TICRATE) / 2 then
Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS)
if server.SPBArunning
and cv_spbatk.value
and leveltime > START_TIME - (3 * TICRATE) / 2 then
Flags = $ | F_SPBATK
if server.SPBAexpert then
Flags = $ | F_SPBEXP
end
if clearcheats then if clearcheats then
clearcheats = false clearcheats = false
for q in players.iterate do if p then
q.SPBAKARTBIG = false p.SPBAKARTBIG = false
q.SPBAjustice = false p.SPBAjustice = false
q.SPBAshutup = false p.SPBAshutup = false
end end
end end
if p then Flags = checkFlags(p)
if p.SPBAKARTBIG then
Flags = $ | F_SPBBIG
end
if p.SPBAjustice then
Flags = $ | F_SPBJUS
end
end
-- make sure the spb actually spawned -- make sure the spb actually spawned
if leveltime == START_TIME - 1 then if server.SPBArunning and leveltime == START_TIME - 1 then
if not (server.SPBAbomb and server.SPBAbomb.valid) then if not (server.SPBAbomb and server.SPBAbomb.valid) then
-- it didn't spawn, clear spb flags -- it didn't spawn, clear spb flags
Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS) Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS)
end end
end end
else else
hud.enable("freeplay") hud.enable("freeplay")
end end
end end
scoreTable = getScoreTable(gamemap, Flags) scoreTable = getScoreTable(gamemap, Flags)
@ -1454,6 +1468,12 @@ local function think()
end end
if p then if p then
-- must be done before browser control
if p.laps >= mapheaderinfo[gamemap].numlaps and timeFinished == 0 then
timeFinished = p.realtime
saveTime(p)
end
-- Scroll controller -- Scroll controller
-- Spectators can't input buttons so let the gamer do it -- Spectators can't input buttons so let the gamer do it
if drawState == DS_SCROLL then if drawState == DS_SCROLL then
@ -1478,7 +1498,7 @@ local function think()
end end
-- disable spba hud -- disable spba hud
if server.SPBAdone then if server.SPBArunning and server.SPBAdone then
server.SPBArunning = false server.SPBArunning = false
p.pflags = $ & !(PF_TIMEOVER) p.pflags = $ & !(PF_TIMEOVER)
p.exiting = 100 p.exiting = 100
@ -1509,10 +1529,6 @@ local function think()
end end
end end
if p.laps >= mapheaderinfo[gamemap].numlaps and timeFinished == 0 then
timeFinished = p.realtime
saveTime(p)
end
regLap(p) regLap(p)
elseif cv_teamchange.value == 0 then elseif cv_teamchange.value == 0 then
allowJoin(true) allowJoin(true)