Compare commits

...

39 Commits

Author SHA1 Message Date
Not
a840a5fa83 revert maploaded cvars 2022-08-24 16:18:24 +02:00
Not
bd5e3f24c6 add extra checks for spbattack 2022-08-23 17:10:10 +02:00
Not
27e596967c console record browser 2022-08-21 04:38:12 +02:00
Not
d7955feaf8 flash score on finish 2022-07-19 20:30:30 +02:00
Not
5a74a428b1 disable on battle maps 2022-07-08 19:58:34 +02:00
Not
4f138797a9 fix encore ruby icon 2022-07-08 19:22:10 +02:00
Not
22aa4ecd2f include zone and act in findmap 2022-05-27 15:07:57 +02:00
Not
1305fa2979 check only for max 2 ingame players 2022-05-25 19:00:55 +02:00
Not
13aeceeedd use TOL_SP and TOL_COOP as indicators of nuked race, battle maps 2022-05-20 19:49:49 +02:00
Not
7b28cd0777 verify the map in changelevel isn't a battle map 2022-05-20 19:32:32 +02:00
Not
ec982d10c3 display more map info on findmap 2022-05-20 19:09:27 +02:00
Not
f3ec32384a use ascii arithmetic to find letter values 2022-05-20 17:35:04 +02:00
Not
07dca46c92 force change level, enforce race mode 2022-05-20 17:17:12 +02:00
Not
14645dbc90 Merge branch 'lonsfor-patch-1' 2022-05-12 12:17:36 +02:00
Not
6c7cdf34b9 set players afkTime before enabling antiAFK 2022-05-12 12:14:48 +02:00
23a8373230 only look for scoreTable once 2022-04-30 23:11:52 +02:00
14f8769d93 dont do an iteration when the player is already known 2022-04-30 22:56:19 +02:00
5080672f7a Update 'leaderboard.lua' 2022-04-30 22:49:28 +02:00
5790a3c020 Dont iterate players if afk is disabled 2022-04-30 21:30:34 +02:00
e3c870eefd Prevent overflow of minutes 2022-04-30 21:00:55 +02:00
41b152ccf6 add VoteThinker hook 2022-04-30 20:55:38 +02:00
de63c4b2be Mmove local cv_teamchange to the top scope
No need to constantly look up the cvar when it can be saved
2022-04-30 20:52:42 +02:00
Not
8a6161a1e1 prevent netvar changes in replays 2022-04-30 15:50:23 +02:00
Not
5cecda05f1 rename cvar lb_spb_separate to lb_spb_combined, display spb flags on rival command 2022-04-27 13:55:41 +02:00
Not
775886f045 use correct function 2022-04-27 13:11:07 +02:00
Not
1a72fba49d draw spb enabled modes in bottom left 2022-04-22 17:10:30 +02:00
Not
8de3423ef8 warn afk players 10 sec ahead 2022-04-19 13:02:01 +02:00
Not
45b785c654 fix nil skin 2022-04-19 11:36:31 +02:00
Not
a1989d319b restore kartencore to initial value 2022-04-18 20:51:18 +02:00
Not
1ab596ebeb save stats everytime 2022-04-18 20:39:58 +02:00
Not
14d2e889b5 fix gamemode exploit 2022-04-18 19:39:22 +02:00
Not
f31c68aa52 add flags to netvar 2022-04-18 19:34:06 +02:00
Not
c46f40001c add cvar for separation of SPB, KARTBIG, and EXP 2022-04-18 19:32:05 +02:00
Not
553afc606d add encore to help message 2022-04-05 12:12:32 +02:00
Not
c792dd1079 allow join on disable 2022-04-04 23:07:31 +02:00
Not
ee251b7a44 Add encore support 2022-04-04 20:58:35 +02:00
Not
0bde2a7fea add encore support 2022-04-04 20:56:03 +02:00
Not
c49702c33b create README.md 2022-03-28 13:27:11 +02:00
Not
6244847b81 fix ranking numbers x offset for 10, 100 2022-03-28 13:19:50 +02:00
2 changed files with 540 additions and 160 deletions

2
README.md Normal file
View File

@ -0,0 +1,2 @@
# Leaderboard plugin for srb2kart
https://mb.srb2.org/addons/time-attack-leaderboard.3742/

View File

@ -11,15 +11,36 @@ local prevLap = 0
local splits = {} local splits = {}
local PATCH = nil local PATCH = nil
local help = true local help = true
local EncoreInitial = nil
local scoreTable
-- Text flash on finish
local FlashTics = 0
local FlashRate
local FlashVFlags
local YellowFlash = {
[0] = V_YELLOWMAP,
[1] = V_ORANGEMAP,
[2] = 0
}
local RedFlash = {
[0] = V_REDMAP,
[1] = 0
}
-- Tracks if stats have been written or not
local StatTrack = false
local UNCLAIMED = "Unclaimed Record" local UNCLAIMED = "Unclaimed Record"
local HELP_MESSAGE = "\x89Leaderboard Commands:\nretry exit findmap changelevel spba_clearcheats lb_gui rival scroll" local HELP_MESSAGE = "\x89Leaderboard Commands:\nretry exit findmap changelevel spba_clearcheats lb_gui rival scroll encore records"
local FILENAME = "leaderboard.txt" local FILENAME = "leaderboard.txt"
-- Retry / changelevel map -- Retry / changelevel map
local nextMap = nil local nextMap = nil
local Flags = 0 local Flags = 0
local F_ENCORE = 0x80
-- SPB flags with the least significance first -- SPB flags with the least significance first
local F_SPBATK = 0x1 local F_SPBATK = 0x1
@ -27,11 +48,15 @@ local F_SPBJUS = 0x2
local F_SPBBIG = 0x4 local F_SPBBIG = 0x4
local F_SPBEXP = 0x8 local F_SPBEXP = 0x8
-- Score table separator
local ST_SEP = F_SPBATK
local clearcheats = false local clearcheats = false
local START_TIME = 6 * TICRATE + (3 * TICRATE / 4) local START_TIME = 6 * TICRATE + (3 * TICRATE / 4) + 1
local AFK_TIMEOUT = TICRATE * 5 local AFK_TIMEOUT = TICRATE * 5
local AFK_BALANCE = TICRATE * 60 local AFK_BALANCE = TICRATE * 60
local AFK_BALANCE_WARN = AFK_BALANCE - TICRATE * 10
local PREVENT_JOIN_TIME = START_TIME + TICRATE * 5 local PREVENT_JOIN_TIME = START_TIME + TICRATE * 5
local GUI_OFF = 0x0 local GUI_OFF = 0x0
@ -61,8 +86,14 @@ local clamp
local scroll_to local scroll_to
local ticsToTime local ticsToTime
local allowJoin
--------------- ---------------
-- cvars
local cv_teamchange
local cv_spbatk
local cv_gui = CV_RegisterVar({ local cv_gui = CV_RegisterVar({
name = "lb_gui", name = "lb_gui",
defaultvalue = GUI_ON, defaultvalue = GUI_ON,
@ -70,11 +101,24 @@ local cv_gui = CV_RegisterVar({
PossibleValue = {Off = GUI_OFF, Splits = GUI_SPLITS, On = GUI_ON} PossibleValue = {Off = GUI_OFF, Splits = GUI_SPLITS, On = GUI_ON}
}) })
local cv_afk = CV_RegisterVar({ local AntiAFK = true
CV_RegisterVar({
name = "lb_afk", name = "lb_afk",
defaultvalue = 1, defaultvalue = 1,
flags = CV_NETVAR, flags = CV_NETVAR | CV_CALL,
PossibleValue = CV_OnOff PossibleValue = CV_OnOff,
func = function(v)
-- Set players afkTime and toggle AntiAFK
if v.value then
for p in players.iterate do
p.afkTime = leveltime
end
AntiAFK = true
else
AntiAFK = false
end
end
}) })
local cv_enable = CV_RegisterVar({ local cv_enable = CV_RegisterVar({
@ -84,6 +128,9 @@ local cv_enable = CV_RegisterVar({
PossibleValue = CV_OnOff, PossibleValue = CV_OnOff,
func = function(v) func = function(v)
disable = $ or not v.value disable = $ or not v.value
if disable then
allowJoin(true)
end
end end
}) })
@ -106,25 +153,79 @@ local cv_interrupt = CV_RegisterVar({
end end
}) })
local function setST(t, map, flags, scoreTable)
local mode = flags & ST_SEP
t[mode] = t[mode] or {}
t[mode][map] = scoreTable
end
local function getST(t, map, flags)
local mode = flags & ST_SEP
return t[mode] and t[mode][map] or nil
end
local function setScoreTable(map, flags, scoreTable) local function setScoreTable(map, flags, scoreTable)
local mode = flags & F_SPBATK setST(lb, map, flags, scoreTable)
lb[mode] = lb[mode] or {}
lb[mode][map] = scoreTable
end end
local function getScoreTable(map, flags) local function getScoreTable(map, flags)
--local id = tostring(map) return getST(lb, map, flags)
--if flags & F_SPBATK then
-- id = id + "S"
--end
--return id
local mode = flags & F_SPBATK
return lb[mode] and lb[mode][map] or nil
end end
local function score_t(map, name, skin, color, time, splits, flags, restat) -- True if a is better than b
local function lbComp(a, b)
-- Calculates the difficulty, harder has higher priority
-- if s is positive then a is harder
-- if s is negative then b is harder
-- if s is 0 then compare time
local s = (a["flags"] & (F_SPBEXP | F_SPBBIG)) - (b["flags"] & (F_SPBEXP | F_SPBBIG))
return s > 0 or not(s < 0 or a["time"] >= b["time"])
end
local function sortScores()
for mode, t in pairs(lb) do
for map, scoreTable in pairs(t) do
table.sort(scoreTable, lbComp)
setScoreTable(map, mode, scoreTable)
end
end
end
-- Reinitialize lb based on new ST_SEP value
local function reinit_lb()
local nlb = {}
for mode, t in pairs(lb) do
for map, scoreTable in pairs(t) do
for i, score in ipairs(scoreTable) do
local st = getST(nlb, map, score["flags"]) or {}
table.insert(st, score)
setST(nlb, map, score["flags"], st)
end
end
end
lb = nlb
sortScores()
end
local cv_spb_separate = CV_RegisterVar({
name = "lb_spb_combined",
defaultvalue = 1,
flags = CV_NETVAR | CV_CALL,
PossibleValue = CV_YesNo,
func = function(v)
if v.value then
ST_SEP = F_SPBATK
else
ST_SEP = F_SPBATK | F_SPBBIG | F_SPBEXP
end
reinit_lb()
end
})
local function score_t(map, name, skin, color, time, splits, flags, stat)
return { return {
["map"] = map, ["map"] = map,
["name"] = name, ["name"] = name,
@ -133,11 +234,11 @@ local function score_t(map, name, skin, color, time, splits, flags, restat)
["time"] = time, ["time"] = time,
["splits"] = splits, ["splits"] = splits,
["flags"] = flags, ["flags"] = flags,
["restat"] = restat ["stat"] = stat
} }
end end
local function restat_t(speed, weight) local function stat_t(speed, weight)
if speed and weight then if speed and weight then
return { return {
["speed"] = speed, ["speed"] = speed,
@ -147,9 +248,9 @@ local function restat_t(speed, weight)
return nil return nil
end end
local function restat_str(restat) local function stat_str(stat)
if restat then if stat then
return string.format("%d%d", restat["speed"], restat["weight"]) return string.format("%d%d", stat["speed"], stat["weight"])
end end
return "0" return "0"
@ -160,7 +261,7 @@ local f = io.open(FILENAME, "r")
if f then if f then
for l in f:lines() do for l in f:lines() do
-- Leaderboard is stored in the following tab separated format -- Leaderboard is stored in the following tab separated format
-- mapnum, name, skin, color, time, splits, flags, restat -- mapnum, name, skin, color, time, splits, flags, stat
local t = {} local t = {}
for word in (l+"\t"):gmatch("(.-)\t") do for word in (l+"\t"):gmatch("(.-)\t") do
table.insert(t, word) table.insert(t, word)
@ -171,7 +272,7 @@ if f then
flags = tonumber(t[7]) flags = tonumber(t[7])
end end
local scoreTable = getScoreTable(tonumber(t[1]), flags) or {} scoreTable = getScoreTable(tonumber(t[1]), flags) or {}
local spl = {} local spl = {}
if t[6] != nil then if t[6] != nil then
@ -183,9 +284,9 @@ if f then
local stats = nil local stats = nil
if t[8] != nil then if t[8] != nil then
if #t[8] >= 2 then if #t[8] >= 2 then
local speed = string.sub(t[8], 1, 1) local speed = tonumber(string.sub(t[8], 1, 1))
local weight = string.sub(t[8], 2, 2) local weight = tonumber(string.sub(t[8], 2, 2))
stats = restat_t(speed, weight) stats = stat_t(speed, weight)
end end
end end
@ -202,15 +303,17 @@ if f then
stats stats
) )
) )
setScoreTable(tonumber(t[1]), flags, scoreTable) setScoreTable(tonumber(t[1]), flags, scoreTable)
end end
sortScores()
f:close() f:close()
else else
print("Failed to open file: ", FILENAME) print("Failed to open file: ", FILENAME)
end end
local function allowJoin(v) function allowJoin(v)
if not cv_interrupt.value then if not cv_interrupt.value then
local y local y
if v then if v then
@ -225,29 +328,40 @@ local function allowJoin(v)
end end
end end
local function ingame() -- Returns true if there is a single player ingame
local function singleplayer()
local n = 0 local n = 0
for p in players.iterate do for p in players.iterate do
if p.valid and not p.spectator then if p.valid and not p.spectator then
n = $ + 1 n = $ + 1
if n > 1 then
return false
end
end end
end end
return n return true
end end
local function initLeaderboard(player) local function initLeaderboard(player)
if disable and leveltime < START_TIME then if disable and leveltime < START_TIME then
disable = ingame() > 1 disable = not singleplayer()
else else
disable = disable or ingame() > 1 disable = disable or not singleplayer()
end end
disable = $ or not cv_enable.value disable = $ or not cv_enable.value or not (maptol & (TOL_SP | TOL_RACE))
-- Restore encore mode to initial value
if disable and EncoreInitial != nil then
COM_BufInsertText(server, string.format("kartencore %d", EncoreInitial))
EncoreInitial = nil
end
player.afkTime = leveltime player.afkTime = leveltime
end end
addHook("PlayerSpawn", initLeaderboard) addHook("PlayerSpawn", initLeaderboard)
local function doyoudare(player) local function doyoudare(player)
if ingame() > 1 or player.spectator then if not singleplayer() or player.spectator then
CONS_Printf(player, "How dare you") CONS_Printf(player, "How dare you")
return false return false
end end
@ -272,26 +386,58 @@ local function exitlevel(player, ...)
end end
COM_AddCommand("exit", exitlevel) COM_AddCommand("exit", exitlevel)
local function findMap(player, ...) local function zoneAct(map)
local search = ... local z = ""
if search == nil then if map.zonttl != "" then
z = " " + map.zonttl
return elseif not(map.levelflags & LF_NOZONE) then
z = " Zone"
end
if map.actnum != "" then
z = $ + " " + map.actnum
end end
return z
end
local function findMap(player, ...)
local search = ...
local hell = "\x85HELL"
local tol = {
[TOL_SP] = "\x81Race\x80", -- Nuked race maps
[TOL_COOP] = "\x8D\Battle\x80", -- Nuked battle maps
[TOL_RACE] = "\x88Race\x80",
[TOL_MATCH] = "\x87\Battle\x80"
}
local lvltype, map, lvlttl
for i = 1, #mapheaderinfo do for i = 1, #mapheaderinfo do
local map = mapheaderinfo[i] map = mapheaderinfo[i]
if map == nil then if map == nil then
continue continue
end end
if map.lvlttl:lower():find(search:lower()) then lvlttl = map.lvlttl + zoneAct(map)
if not search or lvlttl:lower():find(search:lower()) then
-- Only care for up to TOL_MATCH (0x10)
lvltype = tol[map.typeoflevel & 0x1F] or map.typeoflevel
-- If not battle print numlaps
lvltype = (map.typeoflevel & (TOL_MATCH | TOL_COOP) and lvltype)
or string.format("%s \x82%-2d\x80", lvltype, map.numlaps)
CONS_Printf( CONS_Printf(
player, player,
string.format( string.format(
"%s - %s", "%s %-9s %-30s - %s\t%s",
G_BuildMapName(i), G_BuildMapName(i),
map.lvlttl lvltype,
lvlttl,
map.subttl,
(map.menuflags & LF2_HIDEINMENU and hell) or ""
) )
) )
end end
@ -299,11 +445,128 @@ local function findMap(player, ...)
end end
COM_AddCommand("findmap", findMap) COM_AddCommand("findmap", findMap)
local function mapNotExists(player, map) local function mapnumFromExtended(map)
CONS_Printf(player, string.format("Map doesn't exist: %s", map:upper())) local p, q = map:upper():match("MAP(%w)(%w)$", 1)
if not (p and q) then
return nil
end
local mapnum = 0
local A = string.byte("A")
if tonumber(p) != nil then
-- Non extended map numbers
if tonumber(q) == nil then
return nil
end
mapnum = tonumber(p) * 10 + tonumber(q)
else
--Extended map numbers
p = string.byte(p) - A
local qn = tonumber(q)
if qn == nil then
qn = string.byte(q) - A + 10
end
mapnum = 36 * p + qn + 100
end
return mapnum
end end
local ALPH = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" local SPBModeSym = {
[F_SPBEXP] = "X",
[F_SPBBIG] = "B",
[F_SPBJUS] = "J",
}
local function modeToString(mode)
local modestr = "Time Attack"
if mode & F_SPBATK then
modestr = "SPB"
for k, v in pairs(SPBModeSym) do
if mode & k then
modestr = $ + v
end
end
end
return modestr
end
local function records(player, ...)
local mapid = ...
local mapnum = gamemap
if mapid then
mapnum = mapnumFromExtended(mapid)
if not mapnum then
CONS_Printf(player, string.format("Invalid map name: %s", mapid))
return
end
end
local map = mapheaderinfo[mapnum]
if map then
CONS_Printf(player,
string.format(
"\x83%s%8s",
map.lvlttl,
(map.menuflags & LF2_HIDEINMENU and "\x85HELL") or ""
)
)
local zoneact = zoneAct(map)
-- print the zone/act on the right hand size under the title
CONS_Printf(
player,
string.format(
string.format("\x83%%%ds%%s\x80 - \x88%%s", #map.lvlttl - #zoneact / 2 - 1),
" ",
zoneAct(map),
map.subttl
)
)
else
CONS_Printf(player, "\x85UNKNOWN MAP")
end
for mode, maps in pairs(lb) do
local maptbl = maps[mapnum]
if not maptbl then continue end
CONS_Printf(player, "")
CONS_Printf(player, modeToString(mode))
-- don't print flags for time attack
if mode then
for i, tbl in ipairs(maptbl) do
CONS_Printf(
player,
string.format(
"%2d %-21s \x89%8s \x80%s",
i,
tbl["name"],
ticsToTime(tbl["time"]),
modeToString(tbl["flags"])
)
)
end
else
for i, tbl in ipairs(maptbl) do
CONS_Printf(
player,
string.format(
"%2d %-21s \x89%8s",
i,
tbl["name"],
ticsToTime(tbl["time"])
)
)
end
end
end
end
COM_AddCommand("records", records)
local function changelevel(player, ...) local function changelevel(player, ...)
if not doyoudare(player) then if not doyoudare(player) then
@ -319,32 +582,19 @@ local function changelevel(player, ...)
return return
end end
local p, q = map:upper():match("MAP(%w)(%w)$", 1) local mapnum = mapnumFromExtended(map)
if not (p and q) then if not mapnum then
CONS_Printf(player, string.format("Invalid map name: %s", map)) CONS_Printf(player, string.format("Invalid map name: %s", map))
end
if mapheaderinfo[mapnum] == nil then
CONS_Printf(player, string.format("Map doesn't exist: %s", map:upper()))
return return
end end
local mapnum = 0 -- Verify valid race level
if tonumber(p) != nil then if not (mapheaderinfo[mapnum].typeoflevel & (TOL_SP | TOL_RACE)) then
-- Non extended map numbers CONS_Printf(player, "Battle maps are not supported")
if tonumber(q) == nil then
mapNotExists(player, map)
return
end
mapnum = tonumber(p) * 10 + tonumber(q)
else
--Extended map numbers
p = ALPH:find(p) - 1
local qn = tonumber(q)
if qn == nil then
qn = ALPH:find(q) + 9
end
mapnum = 36 * p + qn + 100
end
if mapheaderinfo[mapnum] == nil then
mapNotExists(player, map)
return return
end end
@ -352,6 +602,24 @@ local function changelevel(player, ...)
end end
COM_AddCommand("changelevel", changelevel) COM_AddCommand("changelevel", changelevel)
local function toggleEncore(player)
if not doyoudare(player) then
return
end
local enc = CV_FindVar("kartencore")
if EncoreInitial == nil then
EncoreInitial = enc.value
end
if enc.value then
COM_BufInsertText(server, "kartencore off")
else
COM_BufInsertText(server, "kartencore on")
end
end
COM_AddCommand("encore", toggleEncore)
local function clearcheats(player) local function clearcheats(player)
if not player.spectator then if not player.spectator then
clearcheats = true clearcheats = true
@ -385,7 +653,7 @@ local function findRival(player, ...)
[0] = "\x89", [0] = "\x89",
[-1] = "\x88" [-1] = "\x88"
} }
local sym = { local sym = {
[true] = "-", [true] = "-",
[false] = "", [false] = "",
@ -448,8 +716,6 @@ local function findRival(player, ...)
table.sort(tbl, sortf) table.sort(tbl, sortf)
local spb = mode & F_SPBATK and "SPB" or "TA"
for _, score in ipairs(tbl) do for _, score in ipairs(tbl) do
if o then if o then
o = o - 1 o = o - 1
@ -458,6 +724,8 @@ local function findRival(player, ...)
if i >= stop then break end if i >= stop then break end
i = i + 1 i = i + 1
local modestr = modeToString(score["rival"]["flags"])
if score["your"] then if score["your"] then
local diff = score["your"]["time"] - score["rival"]["time"] local diff = score["your"]["time"] - score["rival"]["time"]
local color = colors[clamp(-1, diff, 1)] local color = colors[clamp(-1, diff, 1)]
@ -470,7 +738,7 @@ local function findRival(player, ...)
ticsToTime(score["rival"]["time"]), ticsToTime(score["rival"]["time"]),
color, color,
sym[diff<0] + ticsToTime(abs(diff)), sym[diff<0] + ticsToTime(abs(diff)),
spb modestr
) )
) )
else else
@ -481,7 +749,7 @@ local function findRival(player, ...)
G_BuildMapName(score["rival"]["map"]), G_BuildMapName(score["rival"]["map"]),
ticsToTime(score["rival"]["time"]), ticsToTime(score["rival"]["time"]),
ticsToTime(0, true), ticsToTime(0, true),
spb modestr
) )
) )
end end
@ -525,7 +793,7 @@ COM_AddCommand("rival", findRival)
-- -- v[i]["flags"], -- -- v[i]["flags"],
-- -- "," -- -- ","
-- -- ) -- -- )
-- -- -- --
-- --end -- --end
-- end -- end
-- end -- end
@ -538,6 +806,7 @@ addHook("MapLoad", function()
drawState = DS_DEFAULT drawState = DS_DEFAULT
scrollY = 50 * FRACUNIT scrollY = 50 * FRACUNIT
scrollAcc = 0 scrollAcc = 0
FlashTics = 0
allowJoin(true) allowJoin(true)
--printTable(lb) --printTable(lb)
@ -551,7 +820,7 @@ function ticsToTime(tics, pure)
return string.format( return string.format(
"%d:%02d:%02d", "%d:%02d:%02d",
G_TicsToMinutes(tics), G_TicsToMinutes(tics, true),
G_TicsToSeconds(tics), G_TicsToSeconds(tics),
G_TicsToCentiseconds(tics) G_TicsToCentiseconds(tics)
) )
@ -570,6 +839,20 @@ local function drawitem(v, x, y, scale, itempatch, vflags)
) )
end end
local modePatches = {
[F_SPBATK] = "SPB",
[F_SPBJUS] = "HYUD",
[F_SPBBIG] = "BIG",
[F_SPBEXP] = "INV"
}
local function modePatch(flag)
if flag == F_SPBEXP then
return PATCH[modePatches[flag]][(leveltime / 4) % 6]
end
return PATCH[modePatches[flag]]
end
local cursors = { local cursors = {
[1] = ". ", [1] = ". ",
[2] = " ." [2] = " ."
@ -578,7 +861,7 @@ local function marquee(text, maxwidth)
if #text <= maxwidth then if #text <= maxwidth then
return text return text
end end
local shift = 16 local shift = 16
-- Creates an index range ranging from -shift to #text + shift -- Creates an index range ranging from -shift to #text + shift
@ -616,12 +899,26 @@ local FACERANK_DIM = 16
local FACERANK_SPC = FACERANK_DIM + 4 local FACERANK_SPC = FACERANK_DIM + 4
local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, textVFlags) local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, textVFlags)
textVFlags = textVFlags or V_HUDTRANSHALF textVFlags = textVFlags or V_HUDTRANSHALF
local me = player.name == score["name"]
--draw Patch/chili --draw Patch/chili
v.draw(x, y, faceRank, V_HUDTRANS | VFLAGS, v.getColormap("sonic", score["color"])) v.draw(x, y, faceRank, V_HUDTRANS | VFLAGS, v.getColormap("sonic", score["color"]))
if player.name == score["name"] then if me then
v.draw(x, y, PATCH["CHILI"][(leveltime / 4) % 8], V_HUDTRANS | VFLAGS) v.draw(x, y, PATCH["CHILI"][(leveltime / 4) % 8], V_HUDTRANS | VFLAGS)
end end
-- Encore
if score["flags"] & F_ENCORE then
local bob = sin((leveltime + i * 5) * (ANG10))
v.drawScaled(
x * FRACUNIT,
bob + (y + FACERANK_DIM / 2) * FRACUNIT,
FRACUNIT / 6,
PATCH["RUBY"],
V_HUDTRANS | VFLAGS
)
end
-- SPB -- SPB
if score["flags"] & F_SPBATK then if score["flags"] & F_SPBATK then
local scale = FRACUNIT / 4 local scale = FRACUNIT / 4
@ -630,7 +927,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
x - 2, x - 2,
y - 2, y - 2,
scale, scale,
PATCH["SPB"], modePatch(F_SPBATK),
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
if score["flags"] & F_SPBEXP then if score["flags"] & F_SPBEXP then
@ -639,7 +936,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
x + FACERANK_DIM - 4, x + FACERANK_DIM - 4,
y - 2, y - 2,
scale, scale,
PATCH["INV"][(leveltime / 4) % 6], modePatch(F_SPBEXP),
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
end end
@ -649,7 +946,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
x - 2, x - 2,
y + FACERANK_DIM - 4, y + FACERANK_DIM - 4,
scale, scale,
PATCH["BIG"], modePatch(F_SPBBIG),
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
end end
@ -659,7 +956,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
x + FACERANK_DIM - 4, x + FACERANK_DIM - 4,
y + FACERANK_DIM - 4, y + FACERANK_DIM - 4,
scale, scale,
PATCH["HYUD"], modePatch(F_SPBJUS),
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
end end
@ -670,15 +967,18 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
v.drawNum(x, y + 3, pos, textVFlags | VFLAGS) v.drawNum(x, y + 3, pos, textVFlags | VFLAGS)
end end
-- Restats -- Stats
local restat = score["restat"] local stat = score["stat"]
if restat then local pskin = score["skin"] and skins[score["skin"]]
v.drawString(x + FACERANK_DIM - 2, y + 4, restat["speed"], V_HUDTRANS | VFLAGS, "small") if stat and not (
v.drawString(x + FACERANK_DIM - 2, y + 8, restat["weight"], V_HUDTRANS | VFLAGS, "small") pskin
and pskin.kartweight == stat["weight"]
and pskin.kartspeed == stat["speed"]
) then
v.drawString(x + FACERANK_DIM - 2, y + 4, stat["speed"], V_HUDTRANS | VFLAGS, "small")
v.drawString(x + FACERANK_DIM - 2, y + 8, stat["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
local name = score["name"] local name = score["name"]
@ -699,11 +999,16 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
end end
end end
local flashV = 0
if me and FlashTics > leveltime then
flashV = FlashVFlags[leveltime / FlashRate % (#FlashVFlags + 1)]
end
v.drawString( v.drawString(
x + FACERANK_DIM + px, x + FACERANK_DIM + px,
y + py, y + py,
name, name,
textVFlags | V_ALLOWLOWERCASE | VFLAGS, textVFlags | V_ALLOWLOWERCASE | VFLAGS | flashV,
stralign stralign
) )
@ -721,7 +1026,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
x + px + FACERANK_DIM, x + px + FACERANK_DIM,
y + 8, y + 8,
ticsToTime(score["time"], true), ticsToTime(score["time"], true),
textVFlags | bodium[min(pos, 4)] | VFLAGS textVFlags | bodium[min(pos, 4)] | VFLAGS | flashV
) )
end end
end end
@ -766,11 +1071,11 @@ local function drawScroll(v, player, scoreTable, gui)
end end
local x = 10 local x = 10
if #scoreTable > 10 then if #scoreTable >= 10 then
x = x + 8
end
if #scoreTable > 100 then
x = x + 8 x = x + 8
if #scoreTable >= 100 then
x = x + 8
end
end end
local y = FixedInt(scrollY) local y = FixedInt(scrollY)
@ -808,13 +1113,19 @@ local stateFunctions = {
[DS_SCRLTO] = drawScrollTo [DS_SCRLTO] = drawScrollTo
} }
-- Draw mode and return pos + 1 if success
local function drawMode(v, pos, flag)
if not (Flags & flag) then return pos end
drawitem(v, pos * 6 + 1, 194, FRACUNIT / 4, modePatch(flag), V_SNAPTOBOTTOM | V_SNAPTOLEFT)
return pos + 1
end
local function drawScoreboard(v, player) local function drawScoreboard(v, player)
if disable then return end if disable then return end
if player != displayplayers[0] then return end if player != displayplayers[0] then return end
cachePatches(v) cachePatches(v)
local scoreTable = getScoreTable(gamemap, Flags)
local gui = cv_gui.value local gui = cv_gui.value
if leveltime < START_TIME or player.exiting or player.lives == 0 then if leveltime < START_TIME or player.exiting or player.lives == 0 then
@ -824,6 +1135,12 @@ local function drawScoreboard(v, player)
if gui then if gui then
stateFunctions[drawState](v, player, scoreTable, gui) stateFunctions[drawState](v, player, scoreTable, gui)
end end
local pos = 0
-- Draw current active modes bottom left
pos = drawMode(v, pos, F_SPBJUS)
pos = drawMode(v, pos, F_SPBBIG)
pos = drawMode(v, pos, F_SPBEXP)
end end
hud.add(drawScoreboard, "game") hud.add(drawScoreboard, "game")
@ -850,22 +1167,13 @@ function cachePatches(v)
end end
PATCH["BIG"] = v.cachePatch("K_ISGROW") PATCH["BIG"] = v.cachePatch("K_ISGROW")
PATCH["HYUD"] = v.cachePatch("K_ISHYUD") PATCH["HYUD"] = v.cachePatch("K_ISHYUD")
PATCH["RUBY"] = v.cachePatch("RUBYICON")
end end
end end
-- True if a is better than b
local function lbComp(a, b)
-- Calculates the difficulty, harder has higher priority
-- if s is positive then a is harder
-- if s is negative then b is harder
-- if s is 0 then compare time
local s = (a["flags"] & (F_SPBEXP | F_SPBBIG)) - (b["flags"] & (F_SPBEXP | F_SPBBIG))
return s > 0 or not(s < 0 or a["time"] >= b["time"])
end
-- Find location of player and scroll to it -- Find location of player and scroll to it
function scroll_to(player) function scroll_to(player)
local m = getScoreTable(gamemap, Flags) or {} local m = scoreTable or {}
scrollToPos = 2 scrollToPos = 2
for pos, score in ipairs(m) do for pos, score in ipairs(m) do
@ -878,9 +1186,26 @@ function scroll_to(player)
drawState = DS_SCRLTO drawState = DS_SCRLTO
end end
local function saveTime(player) -- Write skin stats to each score where there are none
local scoreTable = getScoreTable(gamemap, Flags) or {} local function writeStats()
for _, t in pairs(lb) do
for _, scoreTable in pairs(t) do
for _, score in ipairs(scoreTable) do
local skin = skins[score["skin"]]
if skin and not score["stat"] then
local stats = stat_t(skin.kartspeed, skin.kartweight)
score["stat"] = stats
end
end
end
end
end
local function saveTime(player)
scoreTable = $ or {}
local pskin = skins[player.mo.skin]
local newscore = score_t( local newscore = score_t(
gamemap, gamemap,
player.name, player.name,
@ -889,7 +1214,7 @@ local function saveTime(player)
timeFinished, timeFinished,
splits, splits,
Flags, Flags,
restat_t(player.HMRs, player.HMRw) stat_t(player.HMRs or pskin.kartspeed, player.HMRw or pskin.kartweight)
) )
-- Check if you beat your previous best -- Check if you beat your previous best
@ -898,10 +1223,16 @@ local function saveTime(player)
if lbComp(newscore, scoreTable[i]) then if lbComp(newscore, scoreTable[i]) then
table.remove(scoreTable, i) table.remove(scoreTable, i)
S_StartSound(nil, 130) S_StartSound(nil, 130)
FlashTics = leveltime + TICRATE * 3
FlashRate = 1
FlashVFlags = YellowFlash
break break
else else
-- You suck lol -- You suck lol
S_StartSound(nil, 201) S_StartSound(nil, 201)
FlashTics = leveltime + TICRATE * 3
FlashRate = 3
FlashVFlags = RedFlash
scroll_to(player) scroll_to(player)
return return
end end
@ -923,6 +1254,11 @@ local function saveTime(player)
setScoreTable(gamemap, Flags, scoreTable) setScoreTable(gamemap, Flags, scoreTable)
if not StatTrack then
writeStats()
StatTrack = true
end
local f = assert(io.open(FILENAME, "w")) local f = assert(io.open(FILENAME, "w"))
if f == nil then if f == nil then
print("Failed to open file for writing: " + FILENAME) print("Failed to open file for writing: " + FILENAME)
@ -940,7 +1276,7 @@ local function saveTime(player)
score["time"], "\t", score["time"], "\t",
table.concat(score["splits"], " "), "\t", table.concat(score["splits"], " "), "\t",
score["flags"], "\t", score["flags"], "\t",
restat_str(score["restat"]), "\n" stat_str(score["stat"]), "\n"
) )
end end
end end
@ -973,29 +1309,39 @@ local function getGamer()
end end
end end
local function changeMap()
COM_BufInsertText(server, "map " + nextMap + " -force -gametype race")
nextMap = nil
end
local function think() local function think()
if nextMap then if nextMap then changeMap() end
COM_BufInsertText(server, "map " + nextMap)
nextMap = nil
end
if disable then if disable then
if cv_afk.value and ingame() > 1 then if AntiAFK then
for p in players.iterate do if not singleplayer() then
if p.valid and not p.spectator and not p.exiting and p.lives > 0 then for p in players.iterate do
if p.cmd.buttons then if p.valid and not p.spectator and not p.exiting and p.lives > 0 then
p.afkTime = leveltime if p.cmd.buttons then
end p.afkTime = leveltime
if p.afkTime + AFK_BALANCE < leveltime then end
p.spectator = true
chatprint("\x89" + p.name + " was moved to the other team for game balance", true) --Away from kart
if p.afkTime + AFK_BALANCE_WARN == leveltime then
chatprintf(p, "[AFK] \x89You will be moved to spectator in 10 seconds!", false)
S_StartSound(nil, 26, p)
end
if p.afkTime + AFK_BALANCE < leveltime then
p.spectator = true
chatprint("\x89" + p.name + " was moved to the other team for game balance", true)
end
end end
end end
end else
else for p in players.iterate do
for p in players.iterate do if p.valid and not p.spectator then
if p.valid and not p.spectator then p.afkTime = leveltime
p.afkTime = leveltime end
end end
end end
end end
@ -1010,7 +1356,7 @@ local function think()
if leveltime < START_TIME then if leveltime < START_TIME then
-- Help message -- Help message
if leveltime == START_TIME - TICRATE * 3 then if leveltime == START_TIME - TICRATE * 3 then
if ingame() == 1 then if singleplayer() then
if help then if help then
help = false help = false
chatprint(HELP_MESSAGE, true) chatprint(HELP_MESSAGE, true)
@ -1021,7 +1367,13 @@ 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
@ -1030,39 +1382,57 @@ local function think()
end end
end end
end end
if not cv_spbatk then
cv_spbatk = CV_FindVar("spbatk")
end
-- Gamemode flags -- Gamemode flags
Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS) Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS)
if leveltime > START_TIME - (3 * TICRATE) / 2 and server.SPBArunning then if server.SPBArunning
and cv_spbatk.value
and leveltime > START_TIME - (3 * TICRATE) / 2 then
Flags = $ | F_SPBATK Flags = $ | F_SPBATK
if server.SPBAexpert then if server.SPBAexpert then
Flags = $ | F_SPBEXP Flags = $ | F_SPBEXP
end end
if clearcheats then if clearcheats then
clearcheats = false clearcheats = false
for p in players.iterate do for q in players.iterate do
p.SPBAKARTBIG = false q.SPBAKARTBIG = false
p.SPBAjustice = false q.SPBAjustice = false
p.SPBAshutup = false q.SPBAshutup = false
end end
end end
for p in players.iterate do
if not p.spectator then if p then
if p.SPBAKARTBIG then if p.SPBAKARTBIG then
Flags = $ | F_SPBBIG Flags = $ | F_SPBBIG
end end
if p.SPBAjustice then if p.SPBAjustice then
Flags = $ | F_SPBJUS Flags = $ | F_SPBJUS
end
end end
end end
end
if not (Flags & F_SPBATK) then -- make sure the spb actually spawned
if leveltime == START_TIME - 1 then
if not (server.SPBAbomb and server.SPBAbomb.valid) then
-- it didn't spawn, clear spb flags
Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS)
end
end
else
hud.enable("freeplay") hud.enable("freeplay")
end end
end
scoreTable = getScoreTable(gamemap, Flags)
if not cv_teamchange then
cv_teamchange = CV_FindVar("allowteamchange")
end end
local cv_teamchange = CV_FindVar("allowteamchange")
if p then if p then
-- 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
@ -1087,13 +1457,15 @@ local function think()
p.afkTime = leveltime p.afkTime = leveltime
end end
if leveltime > PREVENT_JOIN_TIME and p.afkTime + AFK_TIMEOUT > leveltime then if not replayplayback then
if cv_teamchange.value then if leveltime > PREVENT_JOIN_TIME and p.afkTime + AFK_TIMEOUT > leveltime then
allowJoin(false) if cv_teamchange.value then
end allowJoin(false)
elseif p.afkTime + AFK_TIMEOUT < leveltime then end
if not cv_teamchange.value then elseif p.afkTime + AFK_TIMEOUT < leveltime then
allowJoin(true) if not cv_teamchange.value then
allowJoin(true)
end
end end
end end
@ -1109,15 +1481,18 @@ end
addHook("ThinkFrame", think) addHook("ThinkFrame", think)
local function interThink() local function interThink()
if nextMap then if nextMap then changeMap() end
COM_BufInsertText(server, "map " + nextMap)
nextMap = nil if not cv_teamchange then
cv_teamchange = CV_FindVar("allowteamchange")
end end
if not CV_FindVar("allowteamchange").value then
if not cv_teamchange.value then
allowJoin(true) allowJoin(true)
end end
end end
addHook("IntermissionThinker", interThink) addHook("IntermissionThinker", interThink)
addHook("VoteThinker", interThink)
-- Returns the values clamed between min, max -- Returns the values clamed between min, max
function clamp(min_v, v, max_v) function clamp(min_v, v, max_v)
@ -1125,9 +1500,12 @@ function clamp(min_v, v, max_v)
end end
local function netvars(net) local function netvars(net)
lb = net($) Flags = net($)
splits = net($) splits = net($)
prevLap = net($) prevLap = net($)
drawState = net($) drawState = net($)
StatTrack = net($)
EncoreInitial = net($)
lb = net($)
end end
addHook("NetVars", netvars) addHook("NetVars", netvars)