Compare commits

..

1 Commits

Author SHA1 Message Date
Not
aabc4bdaee april fools 2022-04-01 20:24:51 +02:00

View File

@ -11,22 +11,19 @@ local prevLap = 0
local splits = {} local splits = {}
local PATCH = nil local PATCH = nil
local help = true local help = true
local EncoreInitial = nil
local cv_teamchange
local scoreTable
-- Tracks if stats have been written or not local LIFE = {}
local StatTrack = false local faceranks = {}
local dvd = {}
local UNCLAIMED = "Unclaimed Record" local UNCLAIMED = "Unclaimed Record"
local HELP_MESSAGE = "\x89Leaderboard Commands:\nretry exit findmap changelevel spba_clearcheats lb_gui rival scroll encore" local HELP_MESSAGE = "\x89Leaderboard Commands:\nretry exit findmap changelevel spba_clearcheats lb_gui rival scroll"
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
@ -34,15 +31,11 @@ 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) + 1 local START_TIME = 6 * TICRATE + (3 * TICRATE / 4)
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
@ -72,8 +65,6 @@ local clamp
local scroll_to local scroll_to
local ticsToTime local ticsToTime
local allowJoin
--------------- ---------------
local cv_gui = CV_RegisterVar({ local cv_gui = CV_RegisterVar({
@ -97,9 +88,6 @@ 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
}) })
@ -122,79 +110,25 @@ 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)
setST(lb, map, flags, scoreTable) local mode = flags & F_SPBATK
lb[mode] = lb[mode] or {}
lb[mode][map] = scoreTable
end end
local function getScoreTable(map, flags) local function getScoreTable(map, flags)
return getST(lb, map, flags) --local id = tostring(map)
--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
-- True if a is better than b local function score_t(map, name, skin, color, time, splits, flags, restat)
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,
@ -203,11 +137,11 @@ local function score_t(map, name, skin, color, time, splits, flags, stat)
["time"] = time, ["time"] = time,
["splits"] = splits, ["splits"] = splits,
["flags"] = flags, ["flags"] = flags,
["stat"] = stat ["restat"] = restat
} }
end end
local function stat_t(speed, weight) local function restat_t(speed, weight)
if speed and weight then if speed and weight then
return { return {
["speed"] = speed, ["speed"] = speed,
@ -217,9 +151,9 @@ local function stat_t(speed, weight)
return nil return nil
end end
local function stat_str(stat) local function restat_str(restat)
if stat then if restat then
return string.format("%d%d", stat["speed"], stat["weight"]) return string.format("%d%d", restat["speed"], restat["weight"])
end end
return "0" return "0"
@ -230,7 +164,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, stat -- mapnum, name, skin, color, time, splits, flags, restat
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)
@ -241,7 +175,7 @@ if f then
flags = tonumber(t[7]) flags = tonumber(t[7])
end end
scoreTable = getScoreTable(tonumber(t[1]), flags) or {} local scoreTable = getScoreTable(tonumber(t[1]), flags) or {}
local spl = {} local spl = {}
if t[6] != nil then if t[6] != nil then
@ -253,9 +187,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 = tonumber(string.sub(t[8], 1, 1)) local speed = string.sub(t[8], 1, 1)
local weight = tonumber(string.sub(t[8], 2, 2)) local weight = string.sub(t[8], 2, 2)
stats = stat_t(speed, weight) stats = restat_t(speed, weight)
end end
end end
@ -272,17 +206,15 @@ 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
function allowJoin(v) local 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
@ -314,13 +246,6 @@ local function initLeaderboard(player)
disable = disable or ingame() > 1 disable = disable or ingame() > 1
end end
disable = $ or not cv_enable.value disable = $ or not cv_enable.value
-- 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)
@ -431,24 +356,6 @@ 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
@ -540,17 +447,13 @@ local function findRival(player, ...)
return a["rival"]["map"] < b["rival"]["map"] return a["rival"]["map"] < b["rival"]["map"]
end end
local modestrings = {
[F_SPBEXP] = "X",
[F_SPBBIG] = "B",
[F_SPBJUS] = "J",
}
for mode, tbl in pairs(scores) do for mode, tbl in pairs(scores) do
if i >= stop then break end if i >= stop then break end
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
@ -559,16 +462,6 @@ local function findRival(player, ...)
if i >= stop then break end if i >= stop then break end
i = i + 1 i = i + 1
local modestr = "TA"
if score["rival"]["flags"] & F_SPBATK then
modestr = "SPB"
for k, v in pairs(modestrings) do
if score["rival"]["flags"] & k then
modestr = $ + v
end
end
end
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)]
@ -581,7 +474,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)),
modestr spb
) )
) )
else else
@ -592,7 +485,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),
modestr spb
) )
) )
end end
@ -642,6 +535,23 @@ COM_AddCommand("rival", findRival)
-- end -- end
--end --end
local cellSize = 16
local function spawnCells(n)
local p = leveltime
for i = 0,n do
local x = (i * p) % (320/cellSize)
p = p + 7
local y = (i * p) % (200/cellSize)
p = p % 42 + 1
if not(LIFE[x] and LIFE[y]) then
LIFE[x] = $ or {}
LIFE[x][y] = true
end
end
end
addHook("MapLoad", function() addHook("MapLoad", function()
timeFinished = 0 timeFinished = 0
splits = {} splits = {}
@ -652,9 +562,18 @@ addHook("MapLoad", function()
allowJoin(true) allowJoin(true)
--printTable(lb) --printTable(lb)
LIFE = {}
dvd = {}
end end
) )
local function life(player, ...)
local n = ...
spawnCells(n)
end
COM_AddCommand("life", life)
function ticsToTime(tics, pure) function ticsToTime(tics, pure)
if tics == 0 and pure then if tics == 0 and pure then
return "-:--:--" return "-:--:--"
@ -662,12 +581,117 @@ function ticsToTime(tics, pure)
return string.format( return string.format(
"%d:%02d:%02d", "%d:%02d:%02d",
G_TicsToMinutes(tics, true), G_TicsToMinutes(tics),
G_TicsToSeconds(tics), G_TicsToSeconds(tics),
G_TicsToCentiseconds(tics) G_TicsToCentiseconds(tics)
) )
end end
local function ticLife()
local neigh = {}
local new = {}
for x, t in pairs(LIFE) do
for y, v in pairs(t) do
neigh[x-1] = $ or {}
neigh[x] = $ or {}
neigh[x+1] = $ or {}
neigh[x-1][y-1] = $ and $ + 1 or 1
neigh[x-1][y] = $ and $ + 1 or 1
neigh[x-1][y+1] = $ and $ + 1 or 1
neigh[x][y-1] = $ and $ + 1 or 1
neigh[x][y+1] = $ and $ + 1 or 1
neigh[x+1][y-1] = $ and $ + 1 or 1
neigh[x+1][y] = $ and $ + 1 or 1
neigh[x+1][y+1] = $ and $ + 1 or 1
end
end
for x, t in pairs(neigh) do
if x >= 0 and x * cellSize < 320 then
for y, v in pairs(t) do
if y >= 0 and y * cellSize < 200 then
-- 3 neighbours dead cell
if v == 3 and (LIFE[x] == nil or LIFE[x][y] == nil) then
new[x] = $ or {}
new[x][y] = true
elseif v >= 2 and v <= 3 and (LIFE[x] and LIFE[x][y] != nil) then
new[x] = $ or {}
new[x][y] = true
end
end
end
end
end
LIFE = new
end
local function drawLife(v, player)
for x, t in pairs(LIFE) do
for y, _ in pairs(t) do
v.drawScaled(
x * cellSize * FRACUNIT,
y * cellSize * FRACUNIT,
FixedDiv(cellSize * FRACUNIT, 16 * FRACUNIT),
PATCH["FACERANK"][faceranks[((x + y) % #faceranks) + 1]],
0,
v.getColormap("sonic", player.skincolor)
)
end
end
end
local function spawnDvd(p)
local size = (((p + leveltime) % 3) + 1) * 16
local rank = (#faceranks and faceranks[((p + leveltime) % #faceranks) + 1]) or "sonic"
local d = {
["x"] = max(((p + leveltime % 320) - size), 0) * FRACUNIT,
["y"] = max(((p + leveltime % 200) - size), 0) * FRACUNIT,
["xvel"] = (((p + leveltime) % 7) + 1) * FRACUNIT / 2,
["yvel"] = (((p + leveltime) % 5) + 1) * FRACUNIT / 2,
["rank"] = rank,
["color"] = ((p + leveltime) % MAXSKINCOLORS - 1) + 1,
["size"] = size,
}
table.insert(dvd, d)
end
local function ticDvd()
for i, d in ipairs(dvd) do
d.x = $ + d.xvel
d.y = $ + d.yvel
if d.x < 0 or d.x + d.size * FRACUNIT > 320 * FRACUNIT then
d.xvel = -$
clamp(0, d.x, 320 * FRACUNIT)
end
if d.y < 0 or d.y + d.size * FRACUNIT > 200 * FRACUNIT then
d.yvel = -$
clamp(0, d.y, 200 * FRACUNIT)
end
end
end
local function drawDvd(v, player)
for i, d in ipairs(dvd) do
v.drawScaled(
d.x,
d.y,
FixedDiv(d.size * FRACUNIT, 16 * FRACUNIT),
PATCH["FACERANK"][d.rank],
0,
v.getColormap("sonic", d.color)
)
end
end
-- Item patches have the amazing property of being displaced 12x 13y pixels -- Item patches have the amazing property of being displaced 12x 13y pixels
local iXoffset = 13 * FRACUNIT local iXoffset = 13 * FRACUNIT
local iYoffset = 12 * FRACUNIT local iYoffset = 12 * FRACUNIT
@ -681,20 +705,6 @@ 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] = " ."
@ -741,25 +751,12 @@ 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
--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 player.name == score["name"] 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
)
end
-- SPB -- SPB
if score["flags"] & F_SPBATK then if score["flags"] & F_SPBATK then
local scale = FRACUNIT / 4 local scale = FRACUNIT / 4
@ -768,7 +765,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
x - 2, x - 2,
y - 2, y - 2,
scale, scale,
modePatch(F_SPBATK), PATCH["SPB"],
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
if score["flags"] & F_SPBEXP then if score["flags"] & F_SPBEXP then
@ -777,7 +774,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,
modePatch(F_SPBEXP), PATCH["INV"][(leveltime / 4) % 6],
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
end end
@ -787,7 +784,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,
modePatch(F_SPBBIG), PATCH["BIG"],
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
end end
@ -797,7 +794,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,
modePatch(F_SPBJUS), PATCH["HYUD"],
V_HUDTRANS | VFLAGS V_HUDTRANS | VFLAGS
) )
end end
@ -808,18 +805,15 @@ 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
-- Stats -- Restats
local stat = score["stat"] local restat = score["restat"]
local pskin = score["skin"] and skins[score["skin"]] if restat then
if stat and not ( v.drawString(x + FACERANK_DIM - 2, y + 4, restat["speed"], V_HUDTRANS | VFLAGS, "small")
pskin v.drawString(x + FACERANK_DIM - 2, y + 8, restat["weight"], V_HUDTRANS | VFLAGS, "small")
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"]
@ -909,9 +903,9 @@ local function drawScroll(v, player, scoreTable, gui)
local x = 10 local x = 10
if #scoreTable >= 10 then if #scoreTable >= 10 then
x = x + 8 x = x + 8
if #scoreTable >= 100 then end
x = x + 8 if #scoreTable >= 100 then
end x = x + 8
end end
local y = FixedInt(scrollY) local y = FixedInt(scrollY)
@ -949,20 +943,17 @@ 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)
drawLife(v, player)
drawDvd(v, player)
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
gui = GUI_ON gui = GUI_ON
@ -971,12 +962,6 @@ 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")
@ -994,6 +979,7 @@ function cachePatches(v)
PATCH["FACERANK"] = {} PATCH["FACERANK"] = {}
for skin in skins.iterate do for skin in skins.iterate do
PATCH["FACERANK"][skin.name] = v.cachePatch(skin.facerank) PATCH["FACERANK"][skin.name] = v.cachePatch(skin.facerank)
table.insert(faceranks, skin.name)
end end
PATCH["SPB"] = v.cachePatch("K_ISSPB") PATCH["SPB"] = v.cachePatch("K_ISSPB")
@ -1003,13 +989,22 @@ 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 = scoreTable or {} local m = getScoreTable(gamemap, Flags) or {}
scrollToPos = 2 scrollToPos = 2
for pos, score in ipairs(m) do for pos, score in ipairs(m) do
@ -1022,26 +1017,9 @@ function scroll_to(player)
drawState = DS_SCRLTO drawState = DS_SCRLTO
end end
-- Write skin stats to each score where there are none
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) local function saveTime(player)
local scoreTable = getScoreTable(gamemap, Flags) or {}
scoreTable = $ or {}
local pskin = skins[player.mo.skin]
local newscore = score_t( local newscore = score_t(
gamemap, gamemap,
player.name, player.name,
@ -1050,7 +1028,7 @@ local function saveTime(player)
timeFinished, timeFinished,
splits, splits,
Flags, Flags,
stat_t(player.HMRs or pskin.kartspeed, player.HMRw or pskin.kartweight) restat_t(player.HMRs, player.HMRw)
) )
-- Check if you beat your previous best -- Check if you beat your previous best
@ -1084,11 +1062,6 @@ 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)
@ -1106,7 +1079,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",
stat_str(score["stat"]), "\n" restat_str(score["restat"]), "\n"
) )
end end
end end
@ -1125,6 +1098,10 @@ end
local function regLap(player) local function regLap(player)
if player.laps > prevLap and timeFinished == 0 then if player.laps > prevLap and timeFinished == 0 then
spawnCells(1000)
for i = 0,player.laps * 3 do
spawnDvd((i + 1) + 7)
end
prevLap = player.laps prevLap = player.laps
table.insert(splits, player.realtime) table.insert(splits, player.realtime)
showSplit = 5 * TICRATE showSplit = 5 * TICRATE
@ -1146,30 +1123,22 @@ local function think()
end end
if disable then if disable then
if cv_afk.value then if cv_afk.value and ingame() > 1 then
if ingame() > 1 then for p in players.iterate do
for p in players.iterate do if p.valid and not p.spectator and not p.exiting and p.lives > 0 then
if p.valid and not p.spectator and not p.exiting and p.lives > 0 then if p.cmd.buttons then
if p.cmd.buttons then
p.afkTime = leveltime
end
--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
else
for p in players.iterate do
if p.valid and not p.spectator then
p.afkTime = leveltime p.afkTime = leveltime
end 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
else
for p in players.iterate do
if p.valid and not p.spectator then
p.afkTime = leveltime
end end
end end
end end
@ -1180,6 +1149,12 @@ local function think()
showSplit = max(0, showSplit - 1) showSplit = max(0, showSplit - 1)
if leveltime % 10 == 0 then
ticLife()
end
ticDvd()
local p = getGamer() local p = getGamer()
if leveltime < START_TIME then if leveltime < START_TIME then
-- Help message -- Help message
@ -1195,13 +1170,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
@ -1220,34 +1189,29 @@ local function think()
end end
if clearcheats then if clearcheats then
clearcheats = false clearcheats = false
for q in players.iterate do for p in players.iterate do
q.SPBAKARTBIG = false p.SPBAKARTBIG = false
q.SPBAjustice = false p.SPBAjustice = false
q.SPBAshutup = false p.SPBAshutup = false
end end
end end
for p in players.iterate do
if p then if not p.spectator 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 end
if not (Flags & F_SPBATK) then if not (Flags & F_SPBATK) then
hud.enable("freeplay") hud.enable("freeplay")
end end
end end
scoreTable = getScoreTable(gamemap, Flags) local cv_teamchange = CV_FindVar("allowteamchange")
if not cv_teamchange then
cv_teamchange = CV_FindVar("allowteamchange")
end
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
@ -1298,17 +1262,11 @@ local function interThink()
COM_BufInsertText(server, "map " + nextMap) COM_BufInsertText(server, "map " + nextMap)
nextMap = nil nextMap = nil
end end
if not CV_FindVar("allowteamchange").value then
if not cv_teamchange then
cv_teamchange = CV_FindVar("allowteamchange")
end
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)
@ -1316,12 +1274,9 @@ function clamp(min_v, v, max_v)
end end
local function netvars(net) local function netvars(net)
Flags = net($) lb = 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)