Compare commits
1 Commits
| Author | SHA1 | Date |
|---|---|---|
 Not
|
aabc4bdaee |
498
browser.lua
498
browser.lua
|
|
@ -1,498 +0,0 @@
|
|||
local MapRecords
|
||||
local maps
|
||||
local mapIndex = 1
|
||||
local scrollPos = 1
|
||||
local modes = nil
|
||||
local mode = 1
|
||||
local prefMode = nil
|
||||
local ModeSep
|
||||
|
||||
---- Imported functions ----
|
||||
|
||||
-- lb_common.lua
|
||||
local ZoneAct = lb_ZoneAct
|
||||
local TicsToTime = lb_TicsToTime
|
||||
local mapChecksum = lb_map_checksum
|
||||
|
||||
-- lb_store.lua
|
||||
local GetMapRecords = lb_get_map_records
|
||||
|
||||
-----------------------------
|
||||
|
||||
local cv_kartencore
|
||||
|
||||
local function mapIndexOffset(n)
|
||||
return (mapIndex + n + #maps - 1) % #maps + 1
|
||||
end
|
||||
|
||||
local function getMap(offset)
|
||||
return maps[mapIndexOffset(offset or 0)]
|
||||
end
|
||||
|
||||
local function updateModes()
|
||||
-- set available modes for this map
|
||||
modes = {}
|
||||
for mode, _ in pairs(MapRecords) do
|
||||
table.insert(modes, mode)
|
||||
end
|
||||
table.sort(modes)
|
||||
|
||||
mode = 1
|
||||
-- select pref mode
|
||||
for i, m in ipairs(modes) do
|
||||
if m == prefMode then
|
||||
mode = i
|
||||
break
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
local function updateMapIndex(n)
|
||||
mapIndex = mapIndexOffset(n)
|
||||
scrollPos = 1
|
||||
|
||||
MapRecords = GetMapRecords(maps[mapIndex], mapChecksum(maps[mapIndex]), ModeSep)
|
||||
|
||||
updateModes()
|
||||
end
|
||||
|
||||
local scalar = 2
|
||||
local hlfScrnWdth = 320 / 2
|
||||
local mappY = 26
|
||||
local ttlY = mappY + FixedMul(30, FRACUNIT / scalar)
|
||||
local scoresY = ttlY + 16
|
||||
|
||||
local sin = sin
|
||||
local function drawMapPatch(v, offset)
|
||||
local scale = FRACUNIT / (abs(offset) + scalar)
|
||||
local mapName = G_BuildMapName(getMap(offset))
|
||||
local patchName = mapName.."P"
|
||||
local mapp = v.patchExists(patchName) and v.cachePatch(patchName) or v.cachePatch("BLANKLVL")
|
||||
|
||||
local scaledWidth = FixedMul(mapp.width, scale)
|
||||
local scaledHeight = FixedMul(mapp.height, scale)
|
||||
|
||||
v.drawScaled(
|
||||
(hlfScrnWdth + offset * scaledWidth - scaledWidth / 2) * FRACUNIT,
|
||||
(mappY - scaledHeight / 2) * FRACUNIT,
|
||||
scale,
|
||||
mapp
|
||||
)
|
||||
|
||||
end
|
||||
|
||||
local function drawEncore(v)
|
||||
if not cv_kartencore then
|
||||
cv_kartencore = CV_FindVar("kartencore")
|
||||
end
|
||||
|
||||
if not cv_kartencore.value then
|
||||
return
|
||||
end
|
||||
|
||||
local rubyp = v.cachePatch("RUBYICON")
|
||||
local bob = sin(leveltime * ANG10) * 2
|
||||
v.drawScaled(
|
||||
hlfScrnWdth * FRACUNIT,
|
||||
mappY * FRACUNIT + bob,
|
||||
FRACUNIT,
|
||||
rubyp
|
||||
)
|
||||
end
|
||||
|
||||
local colors = {
|
||||
[0] = 0,
|
||||
[1] = 215
|
||||
}
|
||||
local function drawMapBorder(v)
|
||||
local mapWidth = FixedMul(160, FRACUNIT / scalar)
|
||||
local mapHeight = FixedMul(100, FRACUNIT / scalar)
|
||||
v.drawFill(
|
||||
hlfScrnWdth - mapWidth / 2 - 1,
|
||||
mappY - mapHeight / 2 -1,
|
||||
mapWidth + 2,
|
||||
mapHeight + 2,
|
||||
colors[leveltime / 4 % 2]
|
||||
)
|
||||
end
|
||||
|
||||
local function drawMapStrings(v)
|
||||
local map = mapheaderinfo[getMap()]
|
||||
local titleWidth = v.stringWidth(map.lvlttl)
|
||||
|
||||
-- title
|
||||
v.drawString(
|
||||
hlfScrnWdth,
|
||||
ttlY,
|
||||
map.lvlttl,
|
||||
V_SKYMAP,
|
||||
"center"
|
||||
)
|
||||
|
||||
-- zone/act
|
||||
local zone = ZoneAct(map)
|
||||
local zoneWidth = v.stringWidth(zone)
|
||||
v.drawString(
|
||||
hlfScrnWdth + titleWidth / 2,
|
||||
ttlY + 8,
|
||||
zone,
|
||||
V_SKYMAP,
|
||||
"right"
|
||||
)
|
||||
|
||||
-- subtitle
|
||||
v.drawString(
|
||||
hlfScrnWdth + titleWidth / 2 - zoneWidth,
|
||||
ttlY + 8,
|
||||
map.subttl,
|
||||
V_MAGENTAMAP,
|
||||
"small-right"
|
||||
)
|
||||
|
||||
-- hell
|
||||
if map.menuflags & LF2_HIDEINMENU then
|
||||
v.drawString(
|
||||
300,
|
||||
ttlY + 16,
|
||||
"HELL",
|
||||
V_REDMAP,
|
||||
"right"
|
||||
)
|
||||
end
|
||||
end
|
||||
|
||||
local F_SPBATK = 0x1
|
||||
local F_SPBJUS = 0x2
|
||||
local F_SPBBIG = 0x4
|
||||
local F_SPBEXP = 0x8
|
||||
local F_ENCORE = 0x80
|
||||
|
||||
local function drawGamemode(v)
|
||||
local m = modes[mode] or 0
|
||||
|
||||
local modeX = 20
|
||||
local modeY = scoresY
|
||||
local scale = FRACUNIT / 2
|
||||
|
||||
if m == 0 then
|
||||
local clockp = v.cachePatch("K_LAPE02")
|
||||
v.drawScaled(
|
||||
modeX * FRACUNIT,
|
||||
modeY * FRACUNIT,
|
||||
scale,
|
||||
clockp
|
||||
)
|
||||
|
||||
v.drawString(
|
||||
modeX,
|
||||
modeY,
|
||||
"Time Attack!"
|
||||
)
|
||||
elseif m & F_SPBATK then
|
||||
local scaledHalf = FixedMul(50 * FRACUNIT, scale) / 2
|
||||
local xoff = 0
|
||||
if m & F_SPBBIG then
|
||||
xoff = $ + scaledHalf
|
||||
end
|
||||
if m & F_SPBEXP then
|
||||
xoff = $ + scaledHalf
|
||||
end
|
||||
|
||||
if m & F_SPBBIG then
|
||||
local growp = v.cachePatch("K_ITGROW")
|
||||
v.drawScaled(
|
||||
modeX * FRACUNIT - scaledHalf + xoff,
|
||||
modeY * FRACUNIT - scaledHalf,
|
||||
scale,
|
||||
growp
|
||||
)
|
||||
|
||||
xoff = $ - scaledHalf
|
||||
end
|
||||
|
||||
if m & F_SPBEXP then
|
||||
local invp = v.cachePatch("K_ITINV"..(leveltime / 3 % 7 + 1))
|
||||
v.drawScaled(
|
||||
modeX * FRACUNIT - scaledHalf + xoff,
|
||||
modeY * FRACUNIT - scaledHalf,
|
||||
scale,
|
||||
invp
|
||||
)
|
||||
end
|
||||
|
||||
local spbp = v.cachePatch("K_ITSPB")
|
||||
v.drawScaled(
|
||||
modeX * FRACUNIT - scaledHalf,
|
||||
modeY * FRACUNIT - scaledHalf,
|
||||
scale,
|
||||
spbp
|
||||
)
|
||||
|
||||
v.drawString(
|
||||
modeX,
|
||||
modeY,
|
||||
"SPB Attack!"
|
||||
)
|
||||
end
|
||||
end
|
||||
|
||||
local function drawFlags(v, x, y, flags)
|
||||
local nx = x * FRACUNIT
|
||||
local ny = y * FRACUNIT + 2 * FRACUNIT
|
||||
local margin = 4 * FRACUNIT
|
||||
if flags & F_ENCORE then
|
||||
local encp = v.cachePatch("RUBYICON")
|
||||
v.drawScaled(
|
||||
nx,
|
||||
ny + 2 * FRACUNIT,
|
||||
FRACUNIT / 5,
|
||||
encp
|
||||
)
|
||||
nx = $ + margin
|
||||
end
|
||||
if flags & F_SPBATK then
|
||||
local scale = FRACUNIT / 3
|
||||
local shift = 6 * FRACUNIT
|
||||
nx = $ - shift
|
||||
ny = $ - shift
|
||||
if flags & F_SPBJUS then
|
||||
local hyup = v.cachePatch("K_ISHYUD")
|
||||
v.drawScaled(nx, ny, scale, hyup)
|
||||
nx = $ + margin
|
||||
end
|
||||
if flags & F_SPBBIG then
|
||||
local growp = v.cachePatch("K_ISGROW")
|
||||
v.drawScaled(nx - FRACUNIT / 2, ny, scale, growp)
|
||||
nx = $ + margin
|
||||
end
|
||||
if flags & F_SPBEXP then
|
||||
local invp = v.cachePatch("K_ISINV"..(leveltime / 3 % 6 + 1))
|
||||
v.drawScaled(nx, ny, scale, invp)
|
||||
nx = $ + margin
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
local MSK_SPEED = 0xF0
|
||||
local MSK_WEIGHT = 0xF
|
||||
|
||||
local function drawStats(v, x, y, skin, stats)
|
||||
local s = skins[skin]
|
||||
if stats
|
||||
and not (s
|
||||
and s.kartspeed == (stats & MSK_SPEED) >> 4
|
||||
and s.kartweight == stats & MSK_WEIGHT
|
||||
) then
|
||||
v.drawString(x-2, y-2, (stats & MSK_SPEED) >> 4, V_ALLOWLOWERCASE, "thin")
|
||||
v.drawString(x + 13, y + 9, stats & MSK_WEIGHT, V_ALLOWLOWERCASE, "thin")
|
||||
end
|
||||
end
|
||||
|
||||
-- draw in columns
|
||||
-- pos, facerank, name, time, flags
|
||||
-- ______________________________________________
|
||||
-- | 3|[O]|InsertNameHere | 01:02:03 | EXB |
|
||||
-- ----------------------------------------------
|
||||
-- defined are widths of each column, x value is calculated below
|
||||
local column = {
|
||||
[1] = 18, -- facerank, pos, drawNum is right aligned
|
||||
[2] = 170, -- name
|
||||
[3] = 60, -- time
|
||||
[4] = 0 -- flags
|
||||
}
|
||||
do
|
||||
local w = 32 -- starting offset
|
||||
local t
|
||||
for i = 1, #column do
|
||||
t = column[i]
|
||||
column[i] = w
|
||||
w = $ + t
|
||||
end
|
||||
end
|
||||
|
||||
local colorFlags = {
|
||||
[0] = V_SKYMAP,
|
||||
[1] = 0
|
||||
}
|
||||
local function drawScore(v, i, pos, score, highlight)
|
||||
local y = scoresY + i * 18
|
||||
local textFlag = colorFlags[pos%2]
|
||||
|
||||
-- position
|
||||
v.drawNum(column[1], y, pos)
|
||||
|
||||
-- facerank
|
||||
local skin = skins[score["skin"]]
|
||||
local facerank = skin and v.cachePatch(skin.facerank) or v.cachePatch("M_NORANK")
|
||||
v.draw(column[1], y, facerank, 0, v.getColormap("sonic", score["color"]))
|
||||
|
||||
-- chili
|
||||
if highlight then
|
||||
local chilip = v.cachePatch("K_CHILI"..leveltime/4%8+1)
|
||||
v.draw(column[1], y, chilip)
|
||||
textFlag = V_YELLOWMAP
|
||||
end
|
||||
|
||||
-- stats
|
||||
drawStats(v, column[1], y, score["skin"], score["stat"])
|
||||
-- name
|
||||
v.drawString(column[2], y, score["name"], V_ALLOWLOWERCASE | textFlag)
|
||||
-- time
|
||||
v.drawString(column[3], y, TicsToTime(score["time"]), textFlag)
|
||||
-- flags
|
||||
drawFlags(v, column[4], y, score["flags"])
|
||||
end
|
||||
|
||||
local function drawBrowser(v, player)
|
||||
if not MapRecords then return end
|
||||
|
||||
v.fadeScreen(0xFF00, 16)
|
||||
|
||||
-- previous, next maps
|
||||
for i = 5, 1, -1 do
|
||||
drawMapPatch(v, -i)
|
||||
drawMapPatch(v, i)
|
||||
end
|
||||
|
||||
-- draw map border
|
||||
drawMapBorder(v)
|
||||
|
||||
-- current map
|
||||
drawMapPatch(v, 0)
|
||||
drawEncore(v)
|
||||
drawMapStrings(v)
|
||||
drawGamemode(v)
|
||||
|
||||
if not modes then return end
|
||||
|
||||
local records = MapRecords[modes[mode]]
|
||||
if not records then return end
|
||||
|
||||
local record_count = #records
|
||||
scrollPos = max(min(scrollPos, record_count - 3), 1)
|
||||
local endi = min(scrollPos + 7, record_count)
|
||||
for i = scrollPos, endi do
|
||||
drawScore(v, i - scrollPos + 1, i, records[i], records[i].name == player.name)
|
||||
end
|
||||
end
|
||||
rawset(_G, "DrawBrowser", drawBrowser)
|
||||
|
||||
local function initBrowser(modeSep)
|
||||
ModeSep = modeSep
|
||||
|
||||
-- set mapIndex to current map
|
||||
for i, m in ipairs(maps) do
|
||||
if m == gamemap then
|
||||
mapIndex = i
|
||||
break
|
||||
end
|
||||
end
|
||||
|
||||
-- initialize MapRecords
|
||||
MapRecords = GetMapRecords(gamemap, mapChecksum(gamemap), ModeSep)
|
||||
|
||||
scrollPos = 1
|
||||
updateModes()
|
||||
end
|
||||
rawset(_G, "InitBrowser", initBrowser)
|
||||
|
||||
-- initialize maps with racemaps only
|
||||
local function loadMaps()
|
||||
maps = {}
|
||||
local hell = {}
|
||||
for i = 0, #mapheaderinfo do
|
||||
local map = mapheaderinfo[i]
|
||||
if map and map.typeoflevel & TOL_RACE then
|
||||
if map.menuflags & LF2_HIDEINMENU then
|
||||
table.insert(hell, i)
|
||||
else
|
||||
table.insert(maps, i)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- append hell maps
|
||||
for _, map in ipairs(hell) do
|
||||
table.insert(maps, map)
|
||||
end
|
||||
end
|
||||
addHook("MapLoad", loadMaps)
|
||||
|
||||
local repeatCount = 0
|
||||
local keyRepeat = 0
|
||||
|
||||
local function updateKeyRepeat()
|
||||
S_StartSound(nil, 143)
|
||||
if repeatCount < 1 then
|
||||
keyRepeat = TICRATE / 4
|
||||
else
|
||||
keyRepeat = TICRATE / 15
|
||||
end
|
||||
repeatCount = $ + 1
|
||||
end
|
||||
|
||||
local function resetKeyRepeat()
|
||||
keyRepeat = 0
|
||||
repeatCount = 0
|
||||
end
|
||||
|
||||
local ValidButtons = BT_ACCELERATE | BT_BRAKE | BT_FORWARD | BT_BACKWARD | BT_DRIFT | BT_ATTACK
|
||||
|
||||
-- return value indicates we want to exit the browser
|
||||
local function controller(player)
|
||||
keyRepeat = max(0, $ - 1)
|
||||
|
||||
if not (player.cmd.driftturn or player.cmd.buttons) then
|
||||
resetKeyRepeat()
|
||||
end
|
||||
|
||||
local cmd = player.cmd
|
||||
if not keyRepeat then
|
||||
if not (cmd.buttons & ValidButtons or cmd.driftturn) then
|
||||
return
|
||||
end
|
||||
|
||||
updateKeyRepeat()
|
||||
|
||||
if cmd.buttons & BT_BRAKE then
|
||||
S_StartSound(nil, 115)
|
||||
return true
|
||||
elseif cmd.buttons & BT_ACCELERATE then
|
||||
COM_BufInsertText(player, "changelevel "..G_BuildMapName(maps[mapIndex]))
|
||||
return true
|
||||
elseif cmd.buttons & BT_ATTACK then
|
||||
COM_BufInsertText(player, "encore")
|
||||
elseif cmd.driftturn then
|
||||
local dir = cmd.driftturn > 0 and -1 or 1
|
||||
|
||||
if encoremode then
|
||||
updateMapIndex(-dir)
|
||||
else
|
||||
updateMapIndex(dir)
|
||||
end
|
||||
elseif cmd.buttons & BT_FORWARD then
|
||||
scrollPos = $ - 1
|
||||
elseif cmd.buttons & BT_BACKWARD then
|
||||
scrollPos = $ + 1
|
||||
elseif cmd.buttons & BT_DRIFT then
|
||||
scrollPos = 1
|
||||
if modes and #modes then
|
||||
mode = $ % #modes + 1
|
||||
prefMode = modes[mode]
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
rawset(_G, "BrowserController", controller)
|
||||
|
||||
local function netvars(net)
|
||||
maps = net($)
|
||||
mapIndex = net($)
|
||||
modes = net($)
|
||||
mode = net($)
|
||||
prefMode = net($)
|
||||
scrollPos = net($)
|
||||
MapRecords = net($)
|
||||
ModeSep = net($)
|
||||
end
|
||||
addHook("NetVars", netvars)
|
||||
109
lb_common.lua
109
lb_common.lua
|
|
@ -1,109 +0,0 @@
|
|||
rawset(_G, "lb_score_t", function(map, name, skin, color, time, splits, flags, stat, checksum)
|
||||
return {
|
||||
["map"] = map,
|
||||
["name"] = name,
|
||||
["skin"] = skin,
|
||||
["color"] = color,
|
||||
["time"] = time,
|
||||
["splits"] = splits,
|
||||
["flags"] = flags,
|
||||
["stat"] = stat,
|
||||
["checksum"] = checksum
|
||||
}
|
||||
end)
|
||||
|
||||
rawset(_G, "lb_TicsToTime", function(tics, pure)
|
||||
if tics == 0 and pure then
|
||||
return "-:--:--"
|
||||
end
|
||||
|
||||
return string.format(
|
||||
"%d:%02d:%02d",
|
||||
G_TicsToMinutes(tics, true),
|
||||
G_TicsToSeconds(tics),
|
||||
G_TicsToCentiseconds(tics)
|
||||
)
|
||||
end)
|
||||
|
||||
rawset(_G, "lb_ZoneAct", function(map)
|
||||
local z = ""
|
||||
if map.zonttl != "" then
|
||||
z = " " + map.zonttl
|
||||
elseif not(map.levelflags & LF_NOZONE) then
|
||||
z = " Zone"
|
||||
end
|
||||
if map.actnum != "" then
|
||||
z = $ + " " + map.actnum
|
||||
end
|
||||
|
||||
return z
|
||||
end)
|
||||
|
||||
rawset(_G, "lb_stat_t", function(speed, weight)
|
||||
if speed and weight then
|
||||
return (speed << 4) | weight
|
||||
end
|
||||
return 0
|
||||
end)
|
||||
|
||||
|
||||
local F_SPBBIG = 0x4
|
||||
local F_SPBEXP = 0x8
|
||||
-- True if a is better than b
|
||||
rawset(_G, "lb_comp", function(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 djb2(message)
|
||||
local digest = 5381
|
||||
for c in message:gmatch(".") do
|
||||
digest = (($ << 5) + $) + string.byte(c)
|
||||
end
|
||||
|
||||
return digest
|
||||
end
|
||||
|
||||
-- Produce a checksum by using the maps title, subtitle and zone
|
||||
rawset(_G, "lb_map_checksum", function(mapnum)
|
||||
local mh = mapheaderinfo[mapnum]
|
||||
if not mh then
|
||||
return nil
|
||||
end
|
||||
|
||||
local digest = string.format("%04x", djb2(mh.lvlttl..mh.subttl..mh.zonttl))
|
||||
return string.sub(digest, #digest - 3)
|
||||
end)
|
||||
|
||||
rawset(_G, "lb_mapnum_from_extended", function(map)
|
||||
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)
|
||||
394
lb_store.lua
394
lb_store.lua
|
|
@ -1,394 +0,0 @@
|
|||
-- This file handles the storage and related netvars of the leaderboard
|
||||
|
||||
---- Imported functions ----
|
||||
|
||||
-- lb_common.lua
|
||||
local stat_t = lb_stat_t
|
||||
local lbComp = lb_comp
|
||||
local score_t = lb_score_t
|
||||
local mapChecksum = lb_map_checksum
|
||||
local mapnumFromExtended = lb_mapnum_from_extended
|
||||
|
||||
----------------------------
|
||||
|
||||
local LEADERBOARD_FILE = "leaderboard.txt"
|
||||
local COLDSTORE_FILE = "leaderboard.coldstore.txt"
|
||||
|
||||
-- ColdStore are records loaded from lua addons
|
||||
-- this table should never be modified outside of the AddColdStore function
|
||||
local ColdStore = {}
|
||||
|
||||
-- Livestore are new records nad records loaded from leaderboard.txt file
|
||||
local LiveStore = {}
|
||||
|
||||
-- parse score function
|
||||
local parseScore
|
||||
|
||||
local MSK_SPEED = 0xF0
|
||||
local MSK_WEIGHT = 0xF
|
||||
local function stat_str(stat)
|
||||
if stat then
|
||||
return string.format("%d%d", (stat & MSK_SPEED) >> 4, stat & MSK_WEIGHT)
|
||||
end
|
||||
|
||||
return "0"
|
||||
end
|
||||
|
||||
local function isSameRecord(a, b, modeSep)
|
||||
return a.name == b.name and (a.flags & modeSep) == (b.flags & modeSep)
|
||||
end
|
||||
|
||||
-- insert or replace the score in dest
|
||||
local function insertOrReplace(dest, score, modeSep)
|
||||
for i, record in ipairs(dest) do
|
||||
if isSameRecord(record, score, modeSep) then
|
||||
if lbComp(score, record) then
|
||||
dest[i] = score
|
||||
end
|
||||
return
|
||||
end
|
||||
end
|
||||
|
||||
table.insert(dest, score)
|
||||
end
|
||||
|
||||
local function dumpStoreToFile(filename, store)
|
||||
local f = assert(
|
||||
io.open(filename, "w"),
|
||||
"Failed to open file for writing: "..filename
|
||||
)
|
||||
|
||||
f:setvbuf("line")
|
||||
|
||||
for mapid, checksums in pairs(store) do
|
||||
for checksum, records in pairs(checksums) do
|
||||
for _, record in ipairs(records) do
|
||||
if not record.checksum or record.checksum == "" then
|
||||
record.checksum = mapChecksum(record.map) or ""
|
||||
end
|
||||
|
||||
f:write(
|
||||
mapid, "\t",
|
||||
record.name, "\t",
|
||||
record.skin, "\t",
|
||||
record.color, "\t",
|
||||
record.time, "\t",
|
||||
table.concat(record.splits, " "), "\t",
|
||||
record.flags, "\t",
|
||||
stat_str(record.stat), "\t",
|
||||
record.checksum, "\n"
|
||||
)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
f:close()
|
||||
end
|
||||
|
||||
-- GLOBAL
|
||||
-- Returns a list of all maps with records
|
||||
local function MapList()
|
||||
local maps = {}
|
||||
for mapid, checksums in pairs(ColdStore) do
|
||||
maps[mapid] = $ or {}
|
||||
for checksum in pairs(checksums) do
|
||||
maps[mapid][checksum] = true
|
||||
end
|
||||
end
|
||||
for mapid, checksums in pairs(LiveStore) do
|
||||
maps[mapid] = $ or {}
|
||||
for checksum in pairs(checksums) do
|
||||
maps[mapid][checksum] = true
|
||||
end
|
||||
end
|
||||
|
||||
local maplist = {}
|
||||
for mapid, checksums in pairs(maps) do
|
||||
for checksum in pairs(checksums) do
|
||||
table.insert(maplist, {["id"] = mapid, ["checksum"] = checksum})
|
||||
end
|
||||
end
|
||||
table.sort(maplist, function(a, b) return a.id < b.id end)
|
||||
|
||||
return maplist
|
||||
end
|
||||
rawset(_G, "lb_map_list", MapList)
|
||||
|
||||
-- GLOBAL
|
||||
-- Function for adding a single record from lua
|
||||
local function AddColdStore(record)
|
||||
ColdStore[record.map] = $ or {}
|
||||
ColdStore[record.map][record.checksum] = $ or {}
|
||||
|
||||
table.insert(ColdStore[record.map][record.checksum], record)
|
||||
end
|
||||
rawset(_G, "lb_add_coldstore_record", AddColdStore)
|
||||
|
||||
-- GLOBAL
|
||||
-- Function for adding a single record in string form from lua
|
||||
local function AddColdStoreString(record)
|
||||
AddColdStore(parseScore(record))
|
||||
end
|
||||
rawset(_G, "lb_add_coldstore_record_string", AddColdStoreString)
|
||||
|
||||
-- Insert mode separated records from the flat sourceTable into dest
|
||||
local function insertRecords(dest, sourceTable, checksum, modeSep)
|
||||
if not sourceTable then return end
|
||||
if not sourceTable[checksum] then return end
|
||||
|
||||
local mode = nil
|
||||
for _, record in ipairs(sourceTable[checksum]) do
|
||||
mode = record.flags & modeSep
|
||||
dest[mode] = $ or {}
|
||||
table.insert(dest[mode], record)
|
||||
end
|
||||
end
|
||||
|
||||
-- GLOBAL
|
||||
-- Construct the leaderboard table of the supplied mapid
|
||||
-- combines the ColdStore and LiveStore records
|
||||
local function GetMapRecords(map, checksum, modeSep)
|
||||
local mapRecords = {}
|
||||
|
||||
-- Insert ColdStore records
|
||||
insertRecords(mapRecords, ColdStore[map], checksum, modeSep)
|
||||
|
||||
-- Insert LiveStore records
|
||||
insertRecords(mapRecords, LiveStore[map], checksum, modeSep)
|
||||
|
||||
-- Sort records
|
||||
for _, records in pairs(mapRecords) do
|
||||
table.sort(records, lbComp)
|
||||
end
|
||||
|
||||
-- Remove duplicate entries
|
||||
for _, records in pairs(mapRecords) do
|
||||
local players = {}
|
||||
local i = 1
|
||||
while i <= #records do
|
||||
if players[records[i].name] then
|
||||
table.remove(records, i)
|
||||
else
|
||||
players[records[i].name] = true
|
||||
i = i + 1
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
return mapRecords
|
||||
end
|
||||
rawset(_G, "lb_get_map_records", GetMapRecords)
|
||||
|
||||
-- GLOBAL
|
||||
-- Save a record to the LiveStore and write to disk
|
||||
-- SaveRecord will replace the record holders previous record
|
||||
local function SaveRecord(score, map, modeSep)
|
||||
local checksum = mapChecksum(map)
|
||||
LiveStore[map] = $ or {}
|
||||
LiveStore[map][checksum] = $ or {}
|
||||
insertOrReplace(LiveStore[map][checksum], score, modeSep)
|
||||
|
||||
print("Saving score")
|
||||
if isserver then
|
||||
dumpStoreToFile(LEADERBOARD_FILE, LiveStore)
|
||||
end
|
||||
end
|
||||
rawset(_G, "lb_save_record", SaveRecord)
|
||||
|
||||
local function netvars(net)
|
||||
LiveStore = net($)
|
||||
end
|
||||
|
||||
addHook("NetVars", netvars)
|
||||
|
||||
function parseScore(str)
|
||||
-- Leaderboard is stored in the following tab separated format
|
||||
-- mapnum, name, skin, color, time, splits, flags, stat
|
||||
local t = {}
|
||||
for word in (str.."\t"):gmatch("(.-)\t") do
|
||||
table.insert(t, word)
|
||||
end
|
||||
|
||||
local splits = {}
|
||||
if t[6] != nil then
|
||||
for str in t[6]:gmatch("([^ ]+)") do
|
||||
table.insert(splits, tonumber(str))
|
||||
end
|
||||
end
|
||||
|
||||
local flags = 0
|
||||
if t[7] != nil then
|
||||
flags = tonumber(t[7])
|
||||
end
|
||||
|
||||
local stats = nil
|
||||
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
|
||||
|
||||
local checksum = t[9] or ""
|
||||
|
||||
return score_t(
|
||||
tonumber(t[1]), -- Map
|
||||
t[2], -- Name
|
||||
t[3], -- Skin
|
||||
t[4], -- Color
|
||||
tonumber(t[5]), -- Time
|
||||
splits,
|
||||
flags,
|
||||
stats,
|
||||
checksum:lower()
|
||||
)
|
||||
end
|
||||
rawset(_G, "lb_parse_score", parseScore)
|
||||
|
||||
-- Read and parse a store file
|
||||
local function loadStoreFile(filename)
|
||||
local f = assert(
|
||||
io.open(filename, "r"),
|
||||
"Failed to open file for reading: "..filename
|
||||
)
|
||||
|
||||
local store = {}
|
||||
|
||||
for l in f:lines() do
|
||||
local score = parseScore(l)
|
||||
store[score.map] = $ or {}
|
||||
store[score.map][score.checksum] = $ or {}
|
||||
table.insert(store[score.map][score.checksum], score)
|
||||
end
|
||||
|
||||
f:close()
|
||||
|
||||
return store
|
||||
end
|
||||
|
||||
-- GLOBAL
|
||||
-- Command for moving records from one map to another
|
||||
local function moveRecords(from, to, modeSep)
|
||||
local function moveRecordsInStore(store)
|
||||
if not (store[from.id] and store[from.id][from.checksum]) then
|
||||
return 0
|
||||
end
|
||||
|
||||
store[to.id] = $ or {}
|
||||
store[to.id][to.checksum] = $ or {}
|
||||
for i, score in ipairs(store[from.id][from.checksum]) do
|
||||
score.map = to.id
|
||||
score.checksum = to.checksum
|
||||
insertOrReplace(store[to.id][to.checksum], score, modeSep)
|
||||
end
|
||||
|
||||
-- Destroy the original table
|
||||
store[from.id][from.checksum] = nil
|
||||
end
|
||||
|
||||
-- move livestore records and write to disk
|
||||
moveRecordsInStore(LiveStore)
|
||||
|
||||
if isserver then
|
||||
dumpStoreToFile(LEADERBOARD_FILE, LiveStore)
|
||||
|
||||
-- move coldstore records
|
||||
local ok, coldstore = pcall(loadStoreFile, COLDSTORE_FILE)
|
||||
if ok and coldstore then
|
||||
moveRecordsInStore(coldstore)
|
||||
dumpStoreToFile(COLDSTORE_FILE, coldstore)
|
||||
end
|
||||
end
|
||||
end
|
||||
rawset(_G, "lb_move_records", moveRecords)
|
||||
|
||||
-- Helper function for those upgrading from 1.2 to 1.3
|
||||
COM_AddCommand("lb_write_checksums", function(player)
|
||||
local count = 0
|
||||
local moved = {}
|
||||
|
||||
-- Gather movable records (no checksum, map loaded)
|
||||
for map, checksums in pairs(LiveStore) do
|
||||
for checksum, records in pairs(checksums) do
|
||||
if checksum == "" then
|
||||
local sum = mapChecksum(map)
|
||||
|
||||
if not sum then continue end
|
||||
|
||||
moved[map] = {}
|
||||
moved[map][sum] = {}
|
||||
|
||||
for i, record in ipairs(records) do
|
||||
record.checksum = sum
|
||||
table.insert(moved[map][sum], record)
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- Write moved to livestore
|
||||
for map, checksums in pairs(moved) do
|
||||
LiveStore[map] = $ or {}
|
||||
for checksum, records in pairs(checksums) do
|
||||
LiveStore[map][checksum] = $ or {}
|
||||
for i, score in ipairs(records) do
|
||||
table.insert(LiveStore[map][checksum], score)
|
||||
end
|
||||
count = $ + #records
|
||||
end
|
||||
LiveStore[map][""] = nil
|
||||
end
|
||||
|
||||
if isserver then
|
||||
dumpStoreToFile(LEADERBOARD_FILE, LiveStore)
|
||||
end
|
||||
|
||||
CONS_Printf(player, string.format("Successful operation on %d records", count))
|
||||
end, COM_ADMIN)
|
||||
|
||||
COM_AddCommand("lb_known_maps", function(player, map)
|
||||
local mapnum = gamemap
|
||||
if map then
|
||||
mapnum = mapnumFromExtended(map)
|
||||
if not mapnum then
|
||||
CONS_Printf(player, string.format("invalid map '%s'", map))
|
||||
return
|
||||
end
|
||||
end
|
||||
|
||||
local known = {}
|
||||
|
||||
if LiveStore[mapnum] then
|
||||
for checksum, records in pairs(LiveStore[mapnum]) do
|
||||
known[checksum] = #records
|
||||
end
|
||||
end
|
||||
if ColdStore[mapnum] then
|
||||
for checksum, records in pairs(ColdStore[mapnum]) do
|
||||
known[checksum] = $ or 0 + #records
|
||||
end
|
||||
end
|
||||
|
||||
CONS_Printf(player, "Map Chck Records")
|
||||
for checksum, count in pairs(known) do
|
||||
CONS_Printf(player, string.format("%s %s %d", G_BuildMapName(mapnum), checksum, count))
|
||||
end
|
||||
end)
|
||||
|
||||
COM_AddCommand("lb_download_live_records", function(player, filename)
|
||||
if not filename then
|
||||
CONS_Printf(player, "Usage: lb_download_live_records <filename>")
|
||||
return
|
||||
end
|
||||
|
||||
if filename:sub(#filename-3) != ".txt" then
|
||||
filename = $..".txt"
|
||||
end
|
||||
dumpStoreToFile(filename, LiveStore)
|
||||
end, COM_LOCAL)
|
||||
|
||||
-- Load the livestore
|
||||
if isserver then
|
||||
LiveStore = loadStoreFile(LEADERBOARD_FILE)
|
||||
end
|
||||
1102
leaderboard.lua
1102
leaderboard.lua
|
|
@ -1,64 +1,29 @@
|
|||
-- Leaderboards written by Not
|
||||
-- Reusable
|
||||
|
||||
---------- Imported functions -------------
|
||||
-- lb_common.lua
|
||||
local ticsToTime = lb_TicsToTime
|
||||
local zoneAct = lb_ZoneAct
|
||||
local stat_t = lb_stat_t
|
||||
local lbComp = lb_comp
|
||||
local mapChecksum = lb_map_checksum
|
||||
local score_t = lb_score_t
|
||||
local mapnumFromExtended = lb_mapnum_from_extended
|
||||
-- Leaderboard Table
|
||||
-- [mode][mapnum][scoreTable]
|
||||
local lb = {}
|
||||
|
||||
-- browser.lua
|
||||
local InitBrowser = InitBrowser
|
||||
local DrawBrowser = DrawBrowser
|
||||
local BrowserController = BrowserController
|
||||
|
||||
-- lb_store.lua
|
||||
local GetMapRecords = lb_get_map_records
|
||||
local SaveRecord = lb_save_record
|
||||
local MapList = lb_map_list
|
||||
local MoveRecords = lb_move_records
|
||||
--------------------------------------------
|
||||
|
||||
-- Holds the current maps records table including all modes
|
||||
local MapRecords = {}
|
||||
|
||||
local TimeFinished = 0
|
||||
local timeFinished = 0
|
||||
local disable = false
|
||||
local prevLap = 0
|
||||
local splits = {}
|
||||
local PATCH = nil
|
||||
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
|
||||
}
|
||||
local LIFE = {}
|
||||
local faceranks = {}
|
||||
local dvd = {}
|
||||
|
||||
local UNCLAIMED = "Unclaimed Record"
|
||||
local HELP_MESSAGE = "\x89Leaderboard Commands:\nretry exit findmap changelevel spba_clearcheats lb_gui rival scroll encore records levelselect"
|
||||
local HELP_MESSAGE = "\x89Leaderboard Commands:\nretry exit findmap changelevel spba_clearcheats lb_gui rival scroll"
|
||||
local FILENAME = "leaderboard.txt"
|
||||
|
||||
-- Retry / changelevel map
|
||||
local nextMap = nil
|
||||
|
||||
local Flags = 0
|
||||
local F_ENCORE = 0x80
|
||||
|
||||
-- SPB flags with the least significance first
|
||||
local F_SPBATK = 0x1
|
||||
|
|
@ -66,16 +31,11 @@ local F_SPBJUS = 0x2
|
|||
local F_SPBBIG = 0x4
|
||||
local F_SPBEXP = 0x8
|
||||
|
||||
-- Score table separator
|
||||
local ST_SEP = F_SPBATK
|
||||
|
||||
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_BROWSER = TICRATE * 15
|
||||
local AFK_BALANCE = TICRATE * 60
|
||||
local AFK_BALANCE_WARN = AFK_BALANCE - TICRATE * 10
|
||||
local PREVENT_JOIN_TIME = START_TIME + TICRATE * 5
|
||||
|
||||
local GUI_OFF = 0x0
|
||||
|
|
@ -87,7 +47,6 @@ local DS_DEFAULT = 0x0
|
|||
local DS_SCROLL = 0x1
|
||||
local DS_AUTO = 0x2
|
||||
local DS_SCRLTO = 0x4
|
||||
local DS_BROWSER = 0x8
|
||||
|
||||
local drawState = DS_DEFAULT
|
||||
|
||||
|
|
@ -105,12 +64,8 @@ local clamp
|
|||
|
||||
local scroll_to
|
||||
|
||||
local allowJoin
|
||||
|
||||
|
||||
-- cvars
|
||||
local cv_teamchange
|
||||
local cv_spbatk
|
||||
local ticsToTime
|
||||
---------------
|
||||
|
||||
local cv_gui = CV_RegisterVar({
|
||||
name = "lb_gui",
|
||||
|
|
@ -119,24 +74,11 @@ local cv_gui = CV_RegisterVar({
|
|||
PossibleValue = {Off = GUI_OFF, Splits = GUI_SPLITS, On = GUI_ON}
|
||||
})
|
||||
|
||||
local AntiAFK = true
|
||||
CV_RegisterVar({
|
||||
local cv_afk = CV_RegisterVar({
|
||||
name = "lb_afk",
|
||||
defaultvalue = 1,
|
||||
flags = CV_NETVAR | CV_CALL,
|
||||
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
|
||||
flags = CV_NETVAR,
|
||||
PossibleValue = CV_OnOff
|
||||
})
|
||||
|
||||
local cv_enable = CV_RegisterVar({
|
||||
|
|
@ -146,9 +88,6 @@ local cv_enable = CV_RegisterVar({
|
|||
PossibleValue = CV_OnOff,
|
||||
func = function(v)
|
||||
disable = $ or not v.value
|
||||
if disable then
|
||||
allowJoin(true)
|
||||
end
|
||||
end
|
||||
})
|
||||
|
||||
|
|
@ -171,24 +110,111 @@ local cv_interrupt = CV_RegisterVar({
|
|||
end
|
||||
})
|
||||
|
||||
local cv_spb_separate = CV_RegisterVar({
|
||||
name = "lb_spb_combined",
|
||||
defaultvalue = 1,
|
||||
flags = CV_NETVAR | CV_CALL | CV_NOINIT,
|
||||
PossibleValue = CV_YesNo,
|
||||
func = function(v)
|
||||
if v.value then
|
||||
ST_SEP = F_SPBATK
|
||||
else
|
||||
ST_SEP = F_SPBATK | F_SPBBIG | F_SPBEXP
|
||||
end
|
||||
local function setScoreTable(map, flags, scoreTable)
|
||||
local mode = flags & F_SPBATK
|
||||
lb[mode] = lb[mode] or {}
|
||||
lb[mode][map] = scoreTable
|
||||
end
|
||||
|
||||
local function getScoreTable(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
|
||||
|
||||
local function score_t(map, name, skin, color, time, splits, flags, restat)
|
||||
return {
|
||||
["map"] = map,
|
||||
["name"] = name,
|
||||
["skin"] = skin,
|
||||
["color"] = color,
|
||||
["time"] = time,
|
||||
["splits"] = splits,
|
||||
["flags"] = flags,
|
||||
["restat"] = restat
|
||||
}
|
||||
end
|
||||
|
||||
local function restat_t(speed, weight)
|
||||
if speed and weight then
|
||||
return {
|
||||
["speed"] = speed,
|
||||
["weight"] = weight
|
||||
}
|
||||
end
|
||||
})
|
||||
return nil
|
||||
end
|
||||
|
||||
local MSK_SPEED = 0xF0
|
||||
local MSK_WEIGHT = 0xF
|
||||
local function restat_str(restat)
|
||||
if restat then
|
||||
return string.format("%d%d", restat["speed"], restat["weight"])
|
||||
end
|
||||
|
||||
function allowJoin(v)
|
||||
return "0"
|
||||
end
|
||||
|
||||
-- Read the leaderboard
|
||||
local f = io.open(FILENAME, "r")
|
||||
if f then
|
||||
for l in f:lines() do
|
||||
-- Leaderboard is stored in the following tab separated format
|
||||
-- mapnum, name, skin, color, time, splits, flags, restat
|
||||
local t = {}
|
||||
for word in (l+"\t"):gmatch("(.-)\t") do
|
||||
table.insert(t, word)
|
||||
end
|
||||
|
||||
local flags = 0
|
||||
if t[7] != nil then
|
||||
flags = tonumber(t[7])
|
||||
end
|
||||
|
||||
local 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
|
||||
|
||||
local stats = nil
|
||||
if t[8] != nil then
|
||||
if #t[8] >= 2 then
|
||||
local speed = string.sub(t[8], 1, 1)
|
||||
local weight = string.sub(t[8], 2, 2)
|
||||
stats = restat_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)
|
||||
end
|
||||
|
||||
f:close()
|
||||
else
|
||||
print("Failed to open file: ", FILENAME)
|
||||
end
|
||||
|
||||
local function allowJoin(v)
|
||||
if not cv_interrupt.value then
|
||||
local y
|
||||
if v then
|
||||
|
|
@ -203,40 +229,29 @@ function allowJoin(v)
|
|||
end
|
||||
end
|
||||
|
||||
-- Returns true if there is a single player ingame
|
||||
local function singleplayer()
|
||||
local function ingame()
|
||||
local n = 0
|
||||
for p in players.iterate do
|
||||
if p.valid and not p.spectator then
|
||||
n = $ + 1
|
||||
if n > 1 then
|
||||
return false
|
||||
end
|
||||
end
|
||||
end
|
||||
return true
|
||||
return n
|
||||
end
|
||||
|
||||
local function initLeaderboard(player)
|
||||
if disable and leveltime < START_TIME then
|
||||
disable = not singleplayer()
|
||||
disable = ingame() > 1
|
||||
else
|
||||
disable = disable or not singleplayer()
|
||||
disable = disable or ingame() > 1
|
||||
end
|
||||
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
|
||||
|
||||
disable = $ or not cv_enable.value
|
||||
player.afkTime = leveltime
|
||||
end
|
||||
addHook("PlayerSpawn", initLeaderboard)
|
||||
|
||||
local function doyoudare(player)
|
||||
if not singleplayer() or player.spectator then
|
||||
if ingame() > 1 or player.spectator then
|
||||
CONS_Printf(player, "How dare you")
|
||||
return false
|
||||
end
|
||||
|
|
@ -245,12 +260,6 @@ end
|
|||
|
||||
local function retry(player, ...)
|
||||
if doyoudare(player) then
|
||||
-- Verify valid race level
|
||||
if not (mapheaderinfo[gamemap].typeoflevel & (TOL_SP | TOL_RACE)) then
|
||||
CONS_Printf(player, "Battle maps are not supported")
|
||||
return
|
||||
end
|
||||
|
||||
-- Prevents bind crash
|
||||
if leveltime < 20 then
|
||||
return
|
||||
|
|
@ -267,65 +276,26 @@ local function exitlevel(player, ...)
|
|||
end
|
||||
COM_AddCommand("exit", exitlevel)
|
||||
|
||||
local function initBrowser(player)
|
||||
if not doyoudare(player) then return end
|
||||
|
||||
-- TODO: allow in battle
|
||||
if mapheaderinfo[gamemap].typeoflevel & TOL_MATCH then
|
||||
CONS_Printf(player, "Please exit battle first")
|
||||
return
|
||||
end
|
||||
|
||||
if not InitBrowser then
|
||||
print("Browser is not loaded")
|
||||
return
|
||||
end
|
||||
|
||||
InitBrowser(ST_SEP)
|
||||
drawState = DS_BROWSER
|
||||
|
||||
player.afkTime = leveltime
|
||||
end
|
||||
COM_AddCommand("levelselect", initBrowser)
|
||||
|
||||
local function findMap(player, ...)
|
||||
local search = ...
|
||||
if search == nil then
|
||||
|
||||
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
|
||||
return
|
||||
end
|
||||
|
||||
for i = 1, #mapheaderinfo do
|
||||
map = mapheaderinfo[i]
|
||||
local map = mapheaderinfo[i]
|
||||
if map == nil then
|
||||
continue
|
||||
end
|
||||
|
||||
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)
|
||||
|
||||
|
||||
if map.lvlttl:lower():find(search:lower()) then
|
||||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"%s %-9s %-30s - %s\t%s",
|
||||
"%s - %s",
|
||||
G_BuildMapName(i),
|
||||
lvltype,
|
||||
lvlttl,
|
||||
map.subttl,
|
||||
(map.menuflags & LF2_HIDEINMENU and hell) or ""
|
||||
map.lvlttl
|
||||
)
|
||||
)
|
||||
end
|
||||
|
|
@ -333,100 +303,11 @@ local function findMap(player, ...)
|
|||
end
|
||||
COM_AddCommand("findmap", findMap)
|
||||
|
||||
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
|
||||
local function mapNotExists(player, map)
|
||||
CONS_Printf(player, string.format("Map doesn't exist: %s", map:upper()))
|
||||
end
|
||||
|
||||
local function records(player, ...)
|
||||
local mapid = ...
|
||||
local mapnum = gamemap
|
||||
local mapRecords = MapRecords
|
||||
|
||||
if mapid then
|
||||
mapnum = mapnumFromExtended(mapid)
|
||||
if not mapnum then
|
||||
CONS_Printf(player, string.format("Invalid map name: %s", mapid))
|
||||
return
|
||||
end
|
||||
|
||||
mapRecords = GetMapRecords(mapnum, mapChecksum(mapnum), ST_SEP)
|
||||
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, records in pairs(mapRecords) do
|
||||
CONS_Printf(player, "")
|
||||
CONS_Printf(player, modeToString(mode))
|
||||
|
||||
-- don't print flags for time attack
|
||||
if mode then
|
||||
for i, score in ipairs(records) do
|
||||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"%2d %-21s \x89%8s \x80%s",
|
||||
i,
|
||||
score["name"],
|
||||
ticsToTime(score["time"]),
|
||||
modeToString(score["flags"])
|
||||
)
|
||||
)
|
||||
end
|
||||
else
|
||||
for i, score in ipairs(records) do
|
||||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"%2d %-21s \x89%8s",
|
||||
i,
|
||||
score["name"],
|
||||
ticsToTime(score["time"])
|
||||
)
|
||||
)
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
COM_AddCommand("records", records)
|
||||
local ALPH = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
|
||||
|
||||
local function changelevel(player, ...)
|
||||
if not doyoudare(player) then
|
||||
|
|
@ -442,19 +323,32 @@ local function changelevel(player, ...)
|
|||
return
|
||||
end
|
||||
|
||||
local mapnum = mapnumFromExtended(map)
|
||||
if not mapnum then
|
||||
local p, q = map:upper():match("MAP(%w)(%w)$", 1)
|
||||
if not (p and q) then
|
||||
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
|
||||
end
|
||||
|
||||
-- Verify valid race level
|
||||
if not (mapheaderinfo[mapnum].typeoflevel & (TOL_SP | TOL_RACE)) then
|
||||
CONS_Printf(player, "Battle maps are not supported")
|
||||
local mapnum = 0
|
||||
if tonumber(p) != nil then
|
||||
-- Non extended map numbers
|
||||
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
|
||||
end
|
||||
|
||||
|
|
@ -462,24 +356,6 @@ local function changelevel(player, ...)
|
|||
end
|
||||
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)
|
||||
if not player.spectator then
|
||||
clearcheats = true
|
||||
|
|
@ -513,7 +389,7 @@ local function findRival(player, ...)
|
|||
[0] = "\x89",
|
||||
[-1] = "\x88"
|
||||
}
|
||||
|
||||
|
||||
local sym = {
|
||||
[true] = "-",
|
||||
[false] = "",
|
||||
|
|
@ -523,26 +399,21 @@ local function findRival(player, ...)
|
|||
local totalScores = 0
|
||||
local totalDiff = 0
|
||||
|
||||
|
||||
CONS_Printf(player, string.format("\x89%s's times:", rival))
|
||||
CONS_Printf(player, "MAP CHCK Time Diff Mode")
|
||||
CONS_Printf(player, "MAP Time Diff Mode")
|
||||
|
||||
local maplist = MapList()
|
||||
local mapRecords
|
||||
local rivalScore
|
||||
local yourScore
|
||||
for i = 1, #maplist do
|
||||
mapRecords = GetMapRecords(maplist[i].id, maplist[i].checksum, ST_SEP)
|
||||
for mode, tbl in pairs(lb) do
|
||||
scores[mode] = {}
|
||||
|
||||
for mode, records in pairs(mapRecords) do
|
||||
scores[mode] = $ or {}
|
||||
for map, scoreTable in pairs(tbl) do
|
||||
local rivalScore = nil
|
||||
local yourScore = nil
|
||||
|
||||
rivalScore = nil
|
||||
yourScore = nil
|
||||
|
||||
for _, score in ipairs(records) do
|
||||
if score.name == player.name then
|
||||
for _, score in pairs(scoreTable) do
|
||||
if score["name"] == player.name then
|
||||
yourScore = score
|
||||
elseif score.name == rival then
|
||||
elseif score["name"] == rival then
|
||||
rivalScore = score
|
||||
end
|
||||
|
||||
|
|
@ -552,7 +423,7 @@ local function findRival(player, ...)
|
|||
end
|
||||
|
||||
if rivalScore and yourScore then
|
||||
totalDiff = totalDiff + yourScore.time - rivalScore.time
|
||||
totalDiff = totalDiff + yourScore["time"] - rivalScore["time"]
|
||||
end
|
||||
|
||||
if rivalScore then
|
||||
|
|
@ -560,8 +431,8 @@ local function findRival(player, ...)
|
|||
table.insert(
|
||||
scores[mode],
|
||||
{
|
||||
rival = rivalScore,
|
||||
your = yourScore
|
||||
["rival"] = rivalScore,
|
||||
["your"] = yourScore
|
||||
}
|
||||
)
|
||||
end
|
||||
|
|
@ -581,6 +452,8 @@ local function findRival(player, ...)
|
|||
|
||||
table.sort(tbl, sortf)
|
||||
|
||||
local spb = mode & F_SPBATK and "SPB" or "TA"
|
||||
|
||||
for _, score in ipairs(tbl) do
|
||||
if o then
|
||||
o = o - 1
|
||||
|
|
@ -589,8 +462,6 @@ local function findRival(player, ...)
|
|||
if i >= stop then break end
|
||||
i = i + 1
|
||||
|
||||
local modestr = modeToString(score["rival"]["flags"])
|
||||
|
||||
if score["your"] then
|
||||
local diff = score["your"]["time"] - score["rival"]["time"]
|
||||
local color = colors[clamp(-1, diff, 1)]
|
||||
|
|
@ -598,25 +469,23 @@ local function findRival(player, ...)
|
|||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"%s %4s %8s %s%9s \x80%s",
|
||||
G_BuildMapName(score.rival.map),
|
||||
score.rival.checksum,
|
||||
ticsToTime(score.rival.time),
|
||||
"%s %8s %s%9s \x80%s",
|
||||
G_BuildMapName(score["rival"]["map"]),
|
||||
ticsToTime(score["rival"]["time"]),
|
||||
color,
|
||||
sym[diff<0] + ticsToTime(abs(diff)),
|
||||
modestr
|
||||
spb
|
||||
)
|
||||
)
|
||||
else
|
||||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"%s %4s %8s %9s %s",
|
||||
G_BuildMapName(score.rival.map),
|
||||
score.rival.checksum,
|
||||
ticsToTime(score.rival.time),
|
||||
"%s %8s %9s %s",
|
||||
G_BuildMapName(score["rival"]["map"]),
|
||||
ticsToTime(score["rival"]["time"]),
|
||||
ticsToTime(0, true),
|
||||
modestr
|
||||
spb
|
||||
)
|
||||
)
|
||||
end
|
||||
|
|
@ -644,64 +513,6 @@ local function findRival(player, ...)
|
|||
end
|
||||
COM_AddCommand("rival", findRival)
|
||||
|
||||
local function moveRecords(player, from_map, from_checksum, to_map, to_checksum)
|
||||
if not(from_map and from_checksum and to_map) then
|
||||
CONS_Printf(player, "Usage: lb_move_records <from_map> <from_checksum> <to_map> [<to_checksum>]")
|
||||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"Summary: Move records from one map to another.\n"..
|
||||
"If no <to_checksum> is supplied then the checksum of the current loaded map %s is used.\n"..
|
||||
"Hint: Use lb_known_maps to find checksums",
|
||||
to_map or "<to_map>"
|
||||
)
|
||||
)
|
||||
return
|
||||
end
|
||||
|
||||
local from = {
|
||||
["id"] = mapnumFromExtended(from_map),
|
||||
["checksum"] = from_checksum:lower()
|
||||
}
|
||||
|
||||
local to = {
|
||||
["id"] = mapnumFromExtended(to_map),
|
||||
}
|
||||
to.checksum = to_checksum or mapChecksum(to.id)
|
||||
|
||||
if not to.checksum then
|
||||
CONS_Printf(player, string.format("error: %s is not loaded; provide to_checksum to continue", to_map:upper()))
|
||||
return
|
||||
end
|
||||
if #to.checksum != 4 or to.checksum:match("[^a-f0-9]") then
|
||||
CONS_Printf(player, string.format("error: %s is an invalid checksum; checksums are of length 4 and can contain only 0-9a-f", to.checksum))
|
||||
return
|
||||
end
|
||||
|
||||
to.checksum = $:lower()
|
||||
|
||||
local mapRecords = GetMapRecords(from.id, from.checksum, F_SPBATK | F_SPBBIG | F_SPBEXP)
|
||||
local recordCount = 0
|
||||
for mode, records in pairs(mapRecords) do
|
||||
recordCount = $ + #records
|
||||
end
|
||||
|
||||
MoveRecords(from, to, ST_SEP)
|
||||
|
||||
CONS_Printf(
|
||||
player,
|
||||
string.format(
|
||||
"%d records have been moved from\x82 %s %s\x80 to\x88 %s %s",
|
||||
recordCount,
|
||||
from_map, from.checksum,
|
||||
to_map, to.checksum
|
||||
)
|
||||
)
|
||||
|
||||
CONS_Printf(player, "Please repack coldstore and restart the server for changes to take effect.")
|
||||
end
|
||||
COM_AddCommand("lb_move_records", moveRecords, COM_ADMIN)
|
||||
|
||||
--DEBUGGING
|
||||
--local function printTable(tb)
|
||||
-- for mode, tbl in pairs(tb) do
|
||||
|
|
@ -718,28 +529,169 @@ COM_AddCommand("lb_move_records", moveRecords, COM_ADMIN)
|
|||
-- -- v[i]["flags"],
|
||||
-- -- ","
|
||||
-- -- )
|
||||
-- --
|
||||
-- --
|
||||
-- --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()
|
||||
TimeFinished = 0
|
||||
timeFinished = 0
|
||||
splits = {}
|
||||
prevLap = 0
|
||||
drawState = DS_DEFAULT
|
||||
scrollY = 50 * FRACUNIT
|
||||
scrollAcc = 0
|
||||
FlashTics = 0
|
||||
|
||||
allowJoin(true)
|
||||
--printTable(lb)
|
||||
|
||||
MapRecords = GetMapRecords(gamemap, mapChecksum(gamemap), ST_SEP)
|
||||
LIFE = {}
|
||||
dvd = {}
|
||||
end
|
||||
)
|
||||
|
||||
local function life(player, ...)
|
||||
local n = ...
|
||||
spawnCells(n)
|
||||
end
|
||||
COM_AddCommand("life", life)
|
||||
|
||||
function ticsToTime(tics, pure)
|
||||
if tics == 0 and pure then
|
||||
return "-:--:--"
|
||||
end
|
||||
|
||||
return string.format(
|
||||
"%d:%02d:%02d",
|
||||
G_TicsToMinutes(tics),
|
||||
G_TicsToSeconds(tics),
|
||||
G_TicsToCentiseconds(tics)
|
||||
)
|
||||
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
|
||||
local iXoffset = 13 * FRACUNIT
|
||||
local iYoffset = 12 * FRACUNIT
|
||||
|
|
@ -753,20 +705,6 @@ local function drawitem(v, x, y, scale, itempatch, vflags)
|
|||
)
|
||||
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 / 3) % 6]
|
||||
end
|
||||
return PATCH[modePatches[flag]]
|
||||
end
|
||||
|
||||
local cursors = {
|
||||
[1] = ". ",
|
||||
[2] = " ."
|
||||
|
|
@ -775,7 +713,7 @@ local function marquee(text, maxwidth)
|
|||
if #text <= maxwidth then
|
||||
return text
|
||||
end
|
||||
|
||||
|
||||
local shift = 16
|
||||
|
||||
-- Creates an index range ranging from -shift to #text + shift
|
||||
|
|
@ -813,26 +751,12 @@ local FACERANK_DIM = 16
|
|||
local FACERANK_SPC = FACERANK_DIM + 4
|
||||
local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, textVFlags)
|
||||
textVFlags = textVFlags or V_HUDTRANSHALF
|
||||
local me = player.name == score["name"]
|
||||
|
||||
--draw Patch/chili
|
||||
v.draw(x, y, faceRank, V_HUDTRANS | VFLAGS, v.getColormap("sonic", score["color"]))
|
||||
if me then
|
||||
if player.name == score["name"] then
|
||||
v.draw(x, y, PATCH["CHILI"][(leveltime / 4) % 8], V_HUDTRANS | VFLAGS)
|
||||
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
|
||||
if score["flags"] & F_SPBATK then
|
||||
local scale = FRACUNIT / 4
|
||||
|
|
@ -841,7 +765,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
x - 2,
|
||||
y - 2,
|
||||
scale,
|
||||
modePatch(F_SPBATK),
|
||||
PATCH["SPB"],
|
||||
V_HUDTRANS | VFLAGS
|
||||
)
|
||||
if score["flags"] & F_SPBEXP then
|
||||
|
|
@ -850,7 +774,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
x + FACERANK_DIM - 4,
|
||||
y - 2,
|
||||
scale,
|
||||
modePatch(F_SPBEXP),
|
||||
PATCH["INV"][(leveltime / 4) % 6],
|
||||
V_HUDTRANS | VFLAGS
|
||||
)
|
||||
end
|
||||
|
|
@ -860,7 +784,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
x - 2,
|
||||
y + FACERANK_DIM - 4,
|
||||
scale,
|
||||
modePatch(F_SPBBIG),
|
||||
PATCH["BIG"],
|
||||
V_HUDTRANS | VFLAGS
|
||||
)
|
||||
end
|
||||
|
|
@ -870,7 +794,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
x + FACERANK_DIM - 4,
|
||||
y + FACERANK_DIM - 4,
|
||||
scale,
|
||||
modePatch(F_SPBJUS),
|
||||
PATCH["HYUD"],
|
||||
V_HUDTRANS | VFLAGS
|
||||
)
|
||||
end
|
||||
|
|
@ -881,18 +805,15 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
v.drawNum(x, y + 3, pos, textVFlags | VFLAGS)
|
||||
end
|
||||
|
||||
-- Stats
|
||||
local stat = score["stat"]
|
||||
local pskin = score["skin"] and skins[score["skin"]]
|
||||
if stat and not (
|
||||
pskin
|
||||
and pskin.kartweight == stat & MSK_WEIGHT
|
||||
and pskin.kartspeed == (stat & MSK_SPEED) >> 4
|
||||
) then
|
||||
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 & MSK_WEIGHT, V_HUDTRANS | VFLAGS, "small")
|
||||
-- Restats
|
||||
local restat = score["restat"]
|
||||
if restat then
|
||||
v.drawString(x + FACERANK_DIM - 2, y + 4, restat["speed"], V_HUDTRANS | VFLAGS, "small")
|
||||
v.drawString(x + FACERANK_DIM - 2, y + 8, restat["weight"], V_HUDTRANS | VFLAGS, "small")
|
||||
end
|
||||
|
||||
|
||||
|
||||
if gui == GUI_ON or (gui == GUI_SPLITS and showSplit) then
|
||||
local name = score["name"]
|
||||
|
||||
|
|
@ -913,16 +834,11 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
end
|
||||
end
|
||||
|
||||
local flashV = 0
|
||||
if me and FlashTics > leveltime then
|
||||
flashV = FlashVFlags[leveltime / FlashRate % (#FlashVFlags + 1)]
|
||||
end
|
||||
|
||||
v.drawString(
|
||||
x + FACERANK_DIM + px,
|
||||
y + py,
|
||||
name,
|
||||
textVFlags | V_ALLOWLOWERCASE | VFLAGS | flashV,
|
||||
textVFlags | V_ALLOWLOWERCASE | VFLAGS,
|
||||
stralign
|
||||
)
|
||||
|
||||
|
|
@ -940,7 +856,7 @@ local function drawScore(v, player, pos, x, y, gui, faceRank, score, drawPos, te
|
|||
x + px + FACERANK_DIM,
|
||||
y + 8,
|
||||
ticsToTime(score["time"], true),
|
||||
textVFlags | bodium[min(pos, 4)] | VFLAGS | flashV
|
||||
textVFlags | bodium[min(pos, 4)] | VFLAGS
|
||||
)
|
||||
end
|
||||
end
|
||||
|
|
@ -987,9 +903,9 @@ local function drawScroll(v, player, scoreTable, gui)
|
|||
local x = 10
|
||||
if #scoreTable >= 10 then
|
||||
x = x + 8
|
||||
if #scoreTable >= 100 then
|
||||
x = x + 8
|
||||
end
|
||||
end
|
||||
if #scoreTable >= 100 then
|
||||
x = x + 8
|
||||
end
|
||||
|
||||
local y = FixedInt(scrollY)
|
||||
|
|
@ -1020,47 +936,31 @@ local function drawScrollTo(v, player, scoreTable, gui)
|
|||
drawScroll(v, player, scoreTable, gui)
|
||||
end
|
||||
|
||||
local function drawBrowser(v, player)
|
||||
DrawBrowser(v, player)
|
||||
end
|
||||
|
||||
local stateFunctions = {
|
||||
[DS_DEFAULT] = drawDefault,
|
||||
[DS_SCROLL] = drawScroll,
|
||||
[DS_AUTO] = drawAuto,
|
||||
[DS_SCRLTO] = drawScrollTo,
|
||||
[DS_BROWSER] = drawBrowser
|
||||
[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)
|
||||
if disable then return end
|
||||
if player != displayplayers[0] then return end
|
||||
|
||||
cachePatches(v)
|
||||
|
||||
local gui = cv_gui.value or drawState == DS_BROWSER
|
||||
drawLife(v, player)
|
||||
drawDvd(v, player)
|
||||
|
||||
local scoreTable = getScoreTable(gamemap, Flags)
|
||||
|
||||
-- Force enable gui at start and end of the race
|
||||
local gui = cv_gui.value
|
||||
if leveltime < START_TIME or player.exiting or player.lives == 0 then
|
||||
gui = GUI_ON
|
||||
end
|
||||
|
||||
if gui then
|
||||
stateFunctions[drawState](v, player, ScoreTable, gui)
|
||||
|
||||
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)
|
||||
stateFunctions[drawState](v, player, scoreTable, gui)
|
||||
end
|
||||
end
|
||||
hud.add(drawScoreboard, "game")
|
||||
|
|
@ -1079,6 +979,7 @@ function cachePatches(v)
|
|||
PATCH["FACERANK"] = {}
|
||||
for skin in skins.iterate do
|
||||
PATCH["FACERANK"][skin.name] = v.cachePatch(skin.facerank)
|
||||
table.insert(faceranks, skin.name)
|
||||
end
|
||||
|
||||
PATCH["SPB"] = v.cachePatch("K_ISSPB")
|
||||
|
|
@ -1088,13 +989,22 @@ function cachePatches(v)
|
|||
end
|
||||
PATCH["BIG"] = v.cachePatch("K_ISGROW")
|
||||
PATCH["HYUD"] = v.cachePatch("K_ISHYUD")
|
||||
PATCH["RUBY"] = v.cachePatch("RUBYICON")
|
||||
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
|
||||
function scroll_to(player)
|
||||
local m = ScoreTable or {}
|
||||
local m = getScoreTable(gamemap, Flags) or {}
|
||||
|
||||
scrollToPos = 2
|
||||
for pos, score in ipairs(m) do
|
||||
|
|
@ -1107,119 +1017,91 @@ function scroll_to(player)
|
|||
drawState = DS_SCRLTO
|
||||
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 checkFlags(p)
|
||||
local flags = 0
|
||||
|
||||
-- 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
|
||||
local scoreTable = getScoreTable(gamemap, Flags) or {}
|
||||
|
||||
ScoreTable = $ or {}
|
||||
|
||||
local pskin = skins[player.mo.skin]
|
||||
local newscore = score_t(
|
||||
gamemap,
|
||||
player.name,
|
||||
player.mo.skin,
|
||||
player.skincolor,
|
||||
TimeFinished,
|
||||
timeFinished,
|
||||
splits,
|
||||
Flags,
|
||||
stat_t(player.HMRs or pskin.kartspeed, player.HMRw or pskin.kartweight),
|
||||
mapChecksum(gamemap)
|
||||
restat_t(player.HMRs, player.HMRw)
|
||||
)
|
||||
|
||||
-- Check if you beat your previous best
|
||||
for i = 1, #ScoreTable do
|
||||
if ScoreTable[i].name == player.name then
|
||||
if not lbComp(newscore, ScoreTable[i]) then
|
||||
for i = 1, #scoreTable do
|
||||
if scoreTable[i]["name"] == player.name then
|
||||
if lbComp(newscore, scoreTable[i]) then
|
||||
table.remove(scoreTable, i)
|
||||
S_StartSound(nil, 130)
|
||||
break
|
||||
else
|
||||
-- You suck lol
|
||||
S_StartSound(nil, 201)
|
||||
FlashTics = leveltime + TICRATE * 3
|
||||
FlashRate = 3
|
||||
FlashVFlags = RedFlash
|
||||
scroll_to(player)
|
||||
return
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
print("Saving score")
|
||||
table.insert(
|
||||
scoreTable,
|
||||
newscore
|
||||
)
|
||||
|
||||
-- Save the record
|
||||
SaveRecord(newscore, gamemap, ST_SEP)
|
||||
table.sort(scoreTable, lbComp)
|
||||
while #scoreTable > cv_saves.value do
|
||||
table.remove(scoreTable)
|
||||
end
|
||||
|
||||
-- Set players text flash and play chime sfx
|
||||
S_StartSound(nil, 130)
|
||||
FlashTics = leveltime + TICRATE * 3
|
||||
FlashRate = 1
|
||||
FlashVFlags = YellowFlash
|
||||
|
||||
-- Reload the MapRecords
|
||||
MapRecords = GetMapRecords(gamemap, mapChecksum(gamemap), ST_SEP)
|
||||
|
||||
-- Set the updated ScoreTable
|
||||
ScoreTable = MapRecords[Flags]
|
||||
|
||||
-- Scroll the gui to the player entry
|
||||
scroll_to(player)
|
||||
|
||||
setScoreTable(gamemap, Flags, scoreTable)
|
||||
|
||||
local f = assert(io.open(FILENAME, "w"))
|
||||
if f == nil then
|
||||
print("Failed to open file for writing: " + FILENAME)
|
||||
return
|
||||
end
|
||||
|
||||
for _, tbl in pairs(lb) do
|
||||
for _, scoreTable in pairs(tbl) do
|
||||
for _, score in ipairs(scoreTable) do
|
||||
f:write(
|
||||
score["map"], "\t",
|
||||
score["name"], "\t",
|
||||
score["skin"], "\t",
|
||||
score["color"], "\t",
|
||||
score["time"], "\t",
|
||||
table.concat(score["splits"], " "), "\t",
|
||||
score["flags"], "\t",
|
||||
restat_str(score["restat"]), "\n"
|
||||
)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
f:close()
|
||||
end
|
||||
|
||||
-- DEBUGGING
|
||||
--local function saveLeaderboard(player, ...)
|
||||
-- TimeFinished = tonumber(... or player.realtime)
|
||||
-- timeFinished = tonumber(... or player.realtime)
|
||||
-- splits = {1000, 2000, 3000}
|
||||
-- saveTime(player)
|
||||
--end
|
||||
--COM_AddCommand("save", saveLeaderboard)
|
||||
|
||||
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
|
||||
table.insert(splits, player.realtime)
|
||||
showSplit = 5 * TICRATE
|
||||
|
|
@ -1234,39 +1116,29 @@ local function getGamer()
|
|||
end
|
||||
end
|
||||
|
||||
local function changeMap()
|
||||
COM_BufInsertText(server, "map " + nextMap + " -force -gametype race")
|
||||
nextMap = nil
|
||||
end
|
||||
|
||||
local function think()
|
||||
if nextMap then changeMap() end
|
||||
if nextMap then
|
||||
COM_BufInsertText(server, "map " + nextMap)
|
||||
nextMap = nil
|
||||
end
|
||||
|
||||
if disable then
|
||||
if AntiAFK then
|
||||
if not singleplayer() then
|
||||
for p in players.iterate do
|
||||
if p.valid and not p.spectator and not p.exiting and p.lives > 0 then
|
||||
if p.cmd.buttons or p.cmd.driftturn 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
|
||||
if cv_afk.value and ingame() > 1 then
|
||||
for p in players.iterate do
|
||||
if p.valid and not p.spectator and not p.exiting and p.lives > 0 then
|
||||
if p.cmd.buttons then
|
||||
p.afkTime = leveltime
|
||||
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
|
||||
|
|
@ -1277,11 +1149,17 @@ local function think()
|
|||
|
||||
showSplit = max(0, showSplit - 1)
|
||||
|
||||
if leveltime % 10 == 0 then
|
||||
ticLife()
|
||||
end
|
||||
|
||||
ticDvd()
|
||||
|
||||
local p = getGamer()
|
||||
if leveltime < START_TIME then
|
||||
-- Help message
|
||||
if leveltime == START_TIME - TICRATE * 3 then
|
||||
if singleplayer() then
|
||||
if ingame() == 1 then
|
||||
if help then
|
||||
help = false
|
||||
chatprint(HELP_MESSAGE, true)
|
||||
|
|
@ -1301,44 +1179,40 @@ local function think()
|
|||
end
|
||||
end
|
||||
end
|
||||
|
||||
if leveltime > START_TIME - (3 * TICRATE) / 2 then
|
||||
|
||||
-- Gamemode flags
|
||||
Flags = $ & !(F_SPBATK | F_SPBEXP | F_SPBBIG | F_SPBJUS)
|
||||
if leveltime > START_TIME - (3 * TICRATE) / 2 and server.SPBArunning then
|
||||
Flags = $ | F_SPBATK
|
||||
if server.SPBAexpert then
|
||||
Flags = $ | F_SPBEXP
|
||||
end
|
||||
if clearcheats then
|
||||
clearcheats = false
|
||||
if p then
|
||||
for p in players.iterate do
|
||||
p.SPBAKARTBIG = false
|
||||
p.SPBAjustice = false
|
||||
p.SPBAshutup = false
|
||||
end
|
||||
end
|
||||
|
||||
Flags = checkFlags(p)
|
||||
|
||||
-- make sure the spb actually spawned
|
||||
if server.SPBArunning and 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)
|
||||
for p in players.iterate do
|
||||
if not p.spectator then
|
||||
if p.SPBAKARTBIG then
|
||||
Flags = $ | F_SPBBIG
|
||||
end
|
||||
if p.SPBAjustice then
|
||||
Flags = $ | F_SPBJUS
|
||||
end
|
||||
end
|
||||
end
|
||||
else
|
||||
end
|
||||
if not (Flags & F_SPBATK) then
|
||||
hud.enable("freeplay")
|
||||
end
|
||||
end
|
||||
|
||||
ScoreTable = MapRecords[ST_SEP & Flags]
|
||||
|
||||
if not cv_teamchange then
|
||||
cv_teamchange = CV_FindVar("allowteamchange")
|
||||
end
|
||||
|
||||
local cv_teamchange = CV_FindVar("allowteamchange")
|
||||
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
|
||||
-- Spectators can't input buttons so let the gamer do it
|
||||
if drawState == DS_SCROLL then
|
||||
|
|
@ -1352,48 +1226,30 @@ local function think()
|
|||
scrollAcc = 0
|
||||
end
|
||||
end
|
||||
elseif drawState == DS_BROWSER then
|
||||
if BrowserController(p) then
|
||||
drawState = DS_DEFAULT
|
||||
end
|
||||
end
|
||||
|
||||
-- prevent intermission while browsing
|
||||
if p.exiting then
|
||||
p.exiting = $ + 1
|
||||
end
|
||||
|
||||
-- disable spba hud
|
||||
if server.SPBArunning and server.SPBAdone then
|
||||
server.SPBArunning = false
|
||||
p.pflags = $ & !(PF_TIMEOVER)
|
||||
p.exiting = 100
|
||||
end
|
||||
|
||||
-- prevent softlocking the server
|
||||
if p.afkTime + AFK_BROWSER < leveltime then
|
||||
drawState = DS_DEFAULT
|
||||
S_StartSound(nil, 100)
|
||||
end
|
||||
elseif p.lives == 0 then
|
||||
if p.lives == 0 then
|
||||
drawState = DS_SCROLL
|
||||
end
|
||||
|
||||
if p.cmd.buttons or p.cmd.driftturn then
|
||||
if p.cmd.buttons then
|
||||
p.afkTime = leveltime
|
||||
end
|
||||
|
||||
if not replayplayback then
|
||||
if leveltime > PREVENT_JOIN_TIME and p.afkTime + AFK_TIMEOUT > leveltime then
|
||||
if cv_teamchange.value then
|
||||
allowJoin(false)
|
||||
end
|
||||
elseif p.afkTime + AFK_TIMEOUT < leveltime then
|
||||
if not cv_teamchange.value then
|
||||
allowJoin(true)
|
||||
end
|
||||
if leveltime > PREVENT_JOIN_TIME and p.afkTime + AFK_TIMEOUT > leveltime then
|
||||
if cv_teamchange.value then
|
||||
allowJoin(false)
|
||||
end
|
||||
elseif p.afkTime + AFK_TIMEOUT < leveltime then
|
||||
if not cv_teamchange.value then
|
||||
allowJoin(true)
|
||||
end
|
||||
end
|
||||
|
||||
if p.laps >= mapheaderinfo[gamemap].numlaps and timeFinished == 0 then
|
||||
timeFinished = p.realtime
|
||||
saveTime(p)
|
||||
end
|
||||
regLap(p)
|
||||
elseif cv_teamchange.value == 0 then
|
||||
allowJoin(true)
|
||||
|
|
@ -1402,18 +1258,15 @@ end
|
|||
addHook("ThinkFrame", think)
|
||||
|
||||
local function interThink()
|
||||
if nextMap then changeMap() end
|
||||
|
||||
if not cv_teamchange then
|
||||
cv_teamchange = CV_FindVar("allowteamchange")
|
||||
if nextMap then
|
||||
COM_BufInsertText(server, "map " + nextMap)
|
||||
nextMap = nil
|
||||
end
|
||||
|
||||
if not cv_teamchange.value then
|
||||
if not CV_FindVar("allowteamchange").value then
|
||||
allowJoin(true)
|
||||
end
|
||||
end
|
||||
addHook("IntermissionThinker", interThink)
|
||||
addHook("VoteThinker", interThink)
|
||||
|
||||
-- Returns the values clamed between min, max
|
||||
function clamp(min_v, v, max_v)
|
||||
|
|
@ -1421,12 +1274,9 @@ function clamp(min_v, v, max_v)
|
|||
end
|
||||
|
||||
local function netvars(net)
|
||||
Flags = net($)
|
||||
lb = net($)
|
||||
splits = net($)
|
||||
prevLap = net($)
|
||||
drawState = net($)
|
||||
EncoreInitial = net($)
|
||||
MapRecords = net($)
|
||||
TimeFinished = net($)
|
||||
end
|
||||
addHook("NetVars", netvars)
|
||||
|
|
|
|||
|
|
@ -1,125 +0,0 @@
|
|||
#!/usr/bin/env python3
|
||||
import sys
|
||||
from os import path
|
||||
linesep = "\n"
|
||||
|
||||
if len(sys.argv) != 3 or not sys.argv[1] or not sys.argv[2]:
|
||||
print("Usage: coldstore.py <game_directory> <leaderboard_records.lua>")
|
||||
print("\t<game_directory>\t\tthe game directory where wads and luafiles reside. Usually at '$HOME/.srb2kart'.")
|
||||
print("\t<leaderboard_records.lua>\tthe output name for the records packed lua file. It will be saved within <game_directory>.")
|
||||
quit()
|
||||
|
||||
if not sys.argv[2].endswith(".lua"):
|
||||
print("{} must end with .lua".format(sys.argv[2]))
|
||||
quit()
|
||||
|
||||
game_dir = sys.argv[1]
|
||||
leaderboard_txt = path.join(game_dir, "luafiles", "leaderboard.txt")
|
||||
coldstore_txt = path.join(game_dir, "luafiles", "leaderboard.coldstore.txt")
|
||||
records_lua = path.join(game_dir, sys.argv[2])
|
||||
|
||||
def ParseScore(score):
|
||||
# Map Name Skin Color Time Splits Flags Stat
|
||||
split = score.split("\t")
|
||||
|
||||
checksum = ""
|
||||
if len(split) > 8:
|
||||
checksum = split[8]
|
||||
|
||||
return {
|
||||
"map": split[0],
|
||||
"name": split[1],
|
||||
"skin": split[2],
|
||||
"color": split[3],
|
||||
"time": int(split[4]),
|
||||
"splits": split[5],
|
||||
"flags": int(split[6]),
|
||||
"stat": split[7],
|
||||
"checksum": checksum
|
||||
}
|
||||
|
||||
# Compare scores
|
||||
def CompareScore(a, b):
|
||||
return a["time"] < b["time"]
|
||||
|
||||
F_SEP = 0xF
|
||||
def SameScore(a, b):
|
||||
return a["name"] == b["name"] and a["checksum"] == b["checksum"] and (a["flags"] & F_SEP) == (b["flags"] & F_SEP)
|
||||
|
||||
def LoadRecordsFromFile(path):
|
||||
records = []
|
||||
try:
|
||||
with open(path, "r") as f:
|
||||
for line in f.readlines():
|
||||
line = line.strip()
|
||||
if line != "":
|
||||
records.append(ParseScore(line))
|
||||
except FileNotFoundError:
|
||||
pass
|
||||
|
||||
return records
|
||||
|
||||
def AddScore(records, score):
|
||||
mapid = score["map"]
|
||||
mapTable = records.get(mapid) or []
|
||||
|
||||
for i in range(len(mapTable)):
|
||||
scoreb = mapTable[i]
|
||||
if SameScore(score, scoreb):
|
||||
if CompareScore(score, scoreb):
|
||||
mapTable[i] = score
|
||||
records[mapid] = mapTable
|
||||
return
|
||||
mapTable.append(score)
|
||||
records[mapid] = mapTable
|
||||
|
||||
# load leaderboard.txt and coldstore.txt
|
||||
recordsList = LoadRecordsFromFile(leaderboard_txt)
|
||||
recordsList.extend(LoadRecordsFromFile(coldstore_txt))
|
||||
|
||||
|
||||
# construct the map tables
|
||||
records = {}
|
||||
for score in recordsList:
|
||||
AddScore(records, score)
|
||||
|
||||
# convert records to flat list
|
||||
recordsList = []
|
||||
rejected = []
|
||||
for mapTable in records.values():
|
||||
for score in mapTable:
|
||||
scoreStr = "\t".join([str(v) for v in list(score.values())])
|
||||
# only allow records with checksums
|
||||
if score["checksum"] != "":
|
||||
recordsList.append(scoreStr)
|
||||
else:
|
||||
rejected.append(scoreStr)
|
||||
|
||||
# truncate and write records to coldstore
|
||||
with open(coldstore_txt, "w") as f:
|
||||
for score in recordsList:
|
||||
f.write(score + linesep)
|
||||
|
||||
luaA = """do
|
||||
local AddColdStore = lb_add_coldstore_record_string
|
||||
local records = {
|
||||
"""
|
||||
luaB = """ }
|
||||
for _, str in ipairs(records) do
|
||||
AddColdStore(str)
|
||||
end
|
||||
end
|
||||
"""
|
||||
# pack the records.lua file
|
||||
with open(records_lua, "w") as f:
|
||||
f.write(luaA)
|
||||
for score in recordsList:
|
||||
score = score.replace("\\", "\\\\")
|
||||
score = score.replace("\"", "\\\"")
|
||||
f.write("\t\t\"{}\",{}".format(score, linesep))
|
||||
f.write(luaB)
|
||||
|
||||
# truncate and rewrite rejected scores to leaderboard.txt
|
||||
with open(leaderboard_txt, "w") as f:
|
||||
for score in rejected:
|
||||
f.write(score + linesep)
|
||||
Loading…
Reference in New Issue