april fools

leaderboard.lua

@@ -11,37 +11,19 @@ local prevLap = 0
 local splits = {}
 local PATCH = nil
 local help = true
-local EncoreInitial = nil
-local cv_teamchange
-local scoreTable
 
-
+local LIFE = {}
--- Text flash on finish
+local faceranks = {}
-local FlashTics = 0
+local dvd = {}
-local FlashRate
-local FlashVFlags
-local YellowFlash = {
-	[0] = V_YELLOWMAP,
-	[1] = V_ORANGEMAP,
-	[2] = 0
-}
-local RedFlash = {
-	[0] = V_REDMAP,
-	[1] = 0
-}
-
--- Tracks if stats have been written or not
-local StatTrack = false
 
 local UNCLAIMED = "Unclaimed Record"
-local 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"
+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
@@ -49,15 +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_BALANCE = TICRATE * 60
-local AFK_BALANCE_WARN = AFK_BALANCE - TICRATE * 10
 local PREVENT_JOIN_TIME = START_TIME + TICRATE * 5
 
 local GUI_OFF    = 0x0
@@ -87,8 +65,6 @@ local clamp
 local scroll_to
 
 local ticsToTime
-
-local allowJoin
 ---------------
 
 local cv_gui = CV_RegisterVar({
@@ -98,24 +74,11 @@ local cv_gui = CV_RegisterVar({
 	PossibleValue = {Off = GUI_OFF, Splits = GUI_SPLITS, On = GUI_ON}
 })
 
-local AntiAFK = true
+local cv_afk = CV_RegisterVar({
-CV_RegisterVar({
 	name = "lb_afk",
 	defaultvalue = 1,
-	flags = CV_NETVAR | CV_CALL,
+	flags = CV_NETVAR,
-	PossibleValue = CV_OnOff,
+	PossibleValue = CV_OnOff
-	func = function(v)
-		-- Set players afkTime and toggle AntiAFK
-		if v.value then
-			for p in players.iterate do
-				p.afkTime = leveltime
-			end
-
-			AntiAFK = true
-		else
-			AntiAFK = false
-		end
-	end
 })
 
 local cv_enable = CV_RegisterVar({
@@ -125,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
 })
 
@@ -150,100 +110,25 @@ local cv_interrupt = CV_RegisterVar({
 	end
 })
 
-local function djb2(message)
-	local digest = 5381
-	for c in message:gmatch(".") do
-		digest = (($ << 5) + $) + string.byte(c)
-	end
-
-	return digest
-end
-
-local function mapChecksum(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
-
-local function setST(t, map, flags, scoreTable)
-	local mode = flags & ST_SEP
-	local cks = mapChecksum(map)
-	t[mode] = t[mode] or {}
-	t[mode][tostring(map)..(cks or "")] = scoreTable
-end
-
-local function getST(t, map, flags)
-	local mode = flags & ST_SEP
-	local cks = mapChecksum(map)
-	return t[mode] and t[mode][tostring(map)..(cks or "")] or nil
-end
-
 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
 
 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
 
--- 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, checksum)
 	return {
 		["map"]    = map,
 		["name"]   = name,
@@ -252,12 +137,11 @@ local function score_t(map, name, skin, color, time, splits, flags, stat, checks
 		["time"]   = time,
 		["splits"] = splits,
 		["flags"]  = flags,
-		["stat"] = stat,
+		["restat"] = restat
-		["checksum"] = checksum
 	}
 end
 
-local function stat_t(speed, weight)
+local function restat_t(speed, weight)
 	if speed and weight then
 		return {
 			["speed"] = speed,
@@ -267,55 +151,20 @@ local function stat_t(speed, weight)
 	return nil
 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
 
 	return "0"
 end
 
-local function writeScore(fh, score)
-	fh:write(
-		score["map"], "\t",
-		score["name"], "\t",
-		score["skin"], "\t",
-		score["color"], "\t",
-		score["time"], "\t",
-		table.concat(score["splits"], " "), "\t",
-		score["flags"], "\t",
-		stat_str(score["stat"]), "\t",
-		score["checksum"], "\n"
-	)
-end
-
-local function saveScores()
-	local f = assert(io.open(FILENAME + ".txt", "w"))
-	if f == nil then
-		print("Failed to open file for writing: " + FILENAME + ".txt")
-		return
-	end
-
-	for _, tbl in pairs(lb) do
-		for _, scoreTable in pairs(tbl) do
-			for _, score in ipairs(scoreTable) do
-				writeScore(f, score)
-			end
-		end
-	end
-
-	f:close()
-end
-
 -- Read the leaderboard
-local f = io.open(FILENAME + ".txt", "r")
+local f = io.open(FILENAME, "r")
 if f then
-	-- track if scores checksums have been written
-	local checksumWrite = false
-
 	for l in f:lines() do
 		-- Leaderboard is stored in the following tab separated format
-		-- mapnum, name, skin, color, time, splits, flags, stat, map_checksum
+		-- mapnum, name, skin, color, time, splits, flags, restat
 		local t = {}
 		for word in (l+"\t"):gmatch("(.-)\t") do
 			table.insert(t, word)
@@ -326,7 +175,7 @@ if f then
 			flags = tonumber(t[7])
 		end
 
-		scoreTable = getScoreTable(tonumber(t[1]), flags) or {}
+		local scoreTable = getScoreTable(tonumber(t[1]), flags) or {}
 
 		local spl = {}
 		if t[6] != nil then
@@ -338,65 +187,34 @@ if f then
 		local stats = nil
 		if t[8] != nil 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
-
-		local mapnum = tonumber(t[1])
-
-		-- Checksums
-		local cks = t[9] 
-
-		if cks == nil then
-			checksumWrite = true
-			cks = mapChecksum(mapnum)
-
-			-- We have no previous recognition of this map
-			-- remove it
-			if cks == nil then
-				local rsfh = io.open(FILENAME + "_removed_scores.txt", "a")
-				if not rsfh then
-					print("Failed to open file: ", FILENAME + "_removed_scores.txt")
-					continue
-				end
-				rsfh:write(l, "\n")
-				rsfh:close()
-				continue
 			end
 		end
 
 		table.insert(
 			scoreTable,
 			score_t(
-				mapnum,
+				tonumber(t[1]),
 				t[2],
 				t[3],
 				t[4],
 				tonumber(t[5]),
 				spl,
 				flags,
-				stats,
+				stats
-				cks
 			)
 		)
-
 		setScoreTable(tonumber(t[1]), flags, scoreTable)
 	end
 
-	sortScores()
 	f:close()
-
-	-- save scores
-	if checksumWrite then
-		saveScores()
-	end
 else
-	print("Failed to open file: ", FILENAME + ".txt")
+	print("Failed to open file: ", FILENAME)
 end
 
-function allowJoin(v)
+local function allowJoin(v)
 	if not cv_interrupt.value then
 		local y
 		if v then
@@ -411,40 +229,29 @@ function allowJoin(v)
 	end
 end
 
--- Returns true if there is a single player ingame
+local function ingame()
-local function singleplayer()
 	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))
+	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
 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
@@ -471,57 +278,24 @@ COM_AddCommand("exit", exitlevel)
 
 local function findMap(player, ...)
 	local search = ...
+	if search == nil then 
 
-	local hell = "\x85HELL"
+		return
-	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
-
-	local zoneAct = function(zone, act, levelflags)
-		local z = ""
-		if zone != "" then
-			z = " " + zone
-		elseif not(levelflags & LF_NOZONE) then
-			z = " Zone"
-		end
-		if act != "" then
-			z = $ + " " + act
-		end
-
-		return z
 	end
 
-
 	for i = 1, #mapheaderinfo do
-		map = mapheaderinfo[i]
+		local map = mapheaderinfo[i]
 		if map == nil then
 			continue
 		end
 
-		lvlttl = map.lvlttl + zoneAct(map.zonttl, map.actnum, map.levelflags)
+		if map.lvlttl:lower():find(search:lower()) then
-
-		if not search or lvlttl:lower():find(search:lower()) then
-			-- Only care for up to TOL_MATCH (0x10)
-			lvltype = tol[map.typeoflevel & 0x1F] or map.typeoflevel
-
-			-- If not battle print numlaps
-			lvltype = (map.typeoflevel & (TOL_MATCH | TOL_COOP) and lvltype)
-				or string.format("%s \x82%-2d\x80", lvltype, map.numlaps)
-
-
 			CONS_Printf(
 				player,
 				string.format(
-					"%s %-9s %-30s - %s\t%s",
+					"%s - %s",
 					G_BuildMapName(i),
-					lvltype,
+					map.lvlttl
-					lvlttl,
-					map.subttl,
-					(map.menuflags & LF2_HIDEINMENU and hell) or ""
 				)
 			)
 		end
@@ -533,6 +307,8 @@ local function mapNotExists(player, map)
 	CONS_Printf(player, string.format("Map doesn't exist: %s", map:upper()))
 end
 
+local ALPH = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
+
 local function changelevel(player, ...)
 	if not doyoudare(player) then
 		return
@@ -554,8 +330,6 @@ local function changelevel(player, ...)
 	end
 
 	local mapnum = 0
-	local A = string.byte("A")
-
 	if tonumber(p) != nil then
 		-- Non extended map numbers
 		if tonumber(q) == nil then
@@ -565,12 +339,11 @@ local function changelevel(player, ...)
 		mapnum = tonumber(p) * 10 + tonumber(q)
 	else
 		--Extended map numbers
-		p = string.byte(p) - A
+		p = ALPH:find(p) - 1
 		local qn = tonumber(q)
 		if qn == nil then
-			qn = string.byte(q) - A + 10
+			qn = ALPH:find(q) + 9
 		end
-
 		mapnum = 36 * p + qn + 100
 	end
 	
@@ -579,34 +352,10 @@ local function changelevel(player, ...)
 		return
 	end
 
-	-- Verify valid race level
-	if not (mapheaderinfo[mapnum].typeoflevel & (TOL_SP | TOL_RACE)) then
-		CONS_Printf(player, "Battle maps are not supported")
-		return
-	end
-
 	nextMap = G_BuildMapName(mapnum)
 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
@@ -698,17 +447,13 @@ local function findRival(player, ...)
 		return a["rival"]["map"] < b["rival"]["map"]
 	end
 
-	local modestrings = {
-		[F_SPBEXP] = "X",
-		[F_SPBBIG] = "B",
-		[F_SPBJUS] = "J",
-	}
-
 	for mode, tbl in pairs(scores) do
 		if i >= stop then break end
 
 		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
@@ -717,16 +462,6 @@ local function findRival(player, ...)
 			if i >= stop then break end
 			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
 				local diff = score["your"]["time"] - score["rival"]["time"]
 				local color = colors[clamp(-1, diff, 1)]
@@ -739,7 +474,7 @@ local function findRival(player, ...)
 						ticsToTime(score["rival"]["time"]),
 						color,
 						sym[diff<0] + ticsToTime(abs(diff)),
-						modestr
+						spb
 					)
 				)
 			else
@@ -750,7 +485,7 @@ local function findRival(player, ...)
 						G_BuildMapName(score["rival"]["map"]),
 						ticsToTime(score["rival"]["time"]),
 						ticsToTime(0, true),
-						modestr
+						spb
 					)
 				)
 			end
@@ -800,6 +535,23 @@ COM_AddCommand("rival", findRival)
 --	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
 		splits = {}
@@ -807,13 +559,21 @@ addHook("MapLoad", function()
 		drawState = DS_DEFAULT
 		scrollY = 50 * FRACUNIT
 		scrollAcc = 0
-		FlashTics = 0
 
 		allowJoin(true)
 		--printTable(lb)
+
+		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 "-:--:--"
@@ -821,12 +581,117 @@ function ticsToTime(tics, pure)
 
 	return string.format(
 		"%d:%02d:%02d",
-		G_TicsToMinutes(tics, true),
+		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
@@ -840,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 / 4) % 6]
-	end
-	return PATCH[modePatches[flag]]
-end
-
 local cursors = {
 	[1] = ". ",
 	[2] = " ."
@@ -900,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
@@ -928,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
@@ -937,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
@@ -947,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
@@ -957,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
@@ -968,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
+	-- 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
 
+	
+	
 	if gui == GUI_ON or (gui == GUI_SPLITS and showSplit) then
 		local name = score["name"]
 
@@ -1000,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
 		)
 
@@ -1027,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
@@ -1074,9 +903,9 @@ local function drawScroll(v, player, scoreTable, gui)
 		local x = 10
 		if #scoreTable >= 10 then
 			x = x + 8
-			if #scoreTable >= 100 then
+		end
-				x = x + 8
+		if #scoreTable >= 100 then
-			end
+			x = x + 8
 		end
 
 		local y = FixedInt(scrollY)
@@ -1114,20 +943,17 @@ local stateFunctions = {
 	[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)
 
+	drawLife(v, player)
+	drawDvd(v, player)
+	
+	local scoreTable = getScoreTable(gamemap, Flags)
+
 	local gui = cv_gui.value
 	if leveltime < START_TIME or player.exiting or player.lives == 0 then
 		gui = GUI_ON
@@ -1136,12 +962,6 @@ local function drawScoreboard(v, player)
 	if gui then
 		stateFunctions[drawState](v, player, scoreTable, gui)
 	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
 hud.add(drawScoreboard, "game")
 
@@ -1159,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")
@@ -1168,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
@@ -1187,26 +1017,9 @@ 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 saveTime(player)
+	local scoreTable = getScoreTable(gamemap, Flags) or {}
 
-	scoreTable =  $ or {}
-
-	local pskin = skins[player.mo.skin]
 	local newscore = score_t(
 		gamemap,
 		player.name,
@@ -1215,8 +1028,7 @@ local function saveTime(player)
 		timeFinished,
 		splits,
 		Flags,
-		stat_t(player.HMRs or pskin.kartspeed, player.HMRw or pskin.kartweight),
+		restat_t(player.HMRs, player.HMRw)
-		mapChecksum(gamemap)
 	)
 
 	-- Check if you beat your previous best
@@ -1225,16 +1037,10 @@ local function saveTime(player)
 			if lbComp(newscore, scoreTable[i]) then
 				table.remove(scoreTable, i)
 				S_StartSound(nil, 130)
-				FlashTics = leveltime + TICRATE * 3
-				FlashRate = 1
-				FlashVFlags = YellowFlash
 				break
 			else
 				-- You suck lol
 				S_StartSound(nil, 201)
-				FlashTics = leveltime + TICRATE * 3
-				FlashRate = 3
-				FlashVFlags = RedFlash
 				scroll_to(player)
 				return
 			end
@@ -1256,12 +1062,30 @@ local function saveTime(player)
 
 	setScoreTable(gamemap, Flags, scoreTable)
 
-	if not StatTrack then
+	local f = assert(io.open(FILENAME, "w"))
-		writeStats()
+	if f == nil then
-		StatTrack = true
+		print("Failed to open file for writing: " + FILENAME)
+		return
 	end
 
-	saveScores()
+	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
@@ -1274,6 +1098,10 @@ end
 
 local function regLap(player)
 	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
@@ -1288,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 cv_afk.value and ingame() > 1 then
-			if not singleplayer() 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
 					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
@@ -1331,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)
@@ -1346,13 +1170,7 @@ local function think()
 		end
 
 		-- Autospec
-		-- Encore
 		if leveltime == 1 then
-			Flags = $ & !F_ENCORE
-			if encoremode then
-				Flags = $ | F_ENCORE
-			end
-
 			if p then
 				for s in players.iterate do
 					if s.valid and s.spectator then
@@ -1371,34 +1189,29 @@ local function think()
 			end
 			if clearcheats then
 				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
-
+			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
 		if not (Flags & F_SPBATK) then
 			hud.enable("freeplay")
 		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
 		-- Scroll controller
 		-- Spectators can't input buttons so let the gamer do it
@@ -1423,15 +1236,13 @@ local function think()
 			p.afkTime = leveltime
 		end
 
-		if not replayplayback then
+		if leveltime > PREVENT_JOIN_TIME and p.afkTime + AFK_TIMEOUT > leveltime then
-			if leveltime > PREVENT_JOIN_TIME and p.afkTime + AFK_TIMEOUT > leveltime then
+			if cv_teamchange.value then
-				if cv_teamchange.value then
+				allowJoin(false)
-					allowJoin(false)
+			end
-				end
+		elseif p.afkTime + AFK_TIMEOUT < leveltime then
-			elseif p.afkTime + AFK_TIMEOUT < leveltime then
+			if not cv_teamchange.value then
-				if not cv_teamchange.value then
+				allowJoin(true)
-					allowJoin(true)
-				end
 			end
 		end
 
@@ -1447,18 +1258,15 @@ end
 addHook("ThinkFrame", think)
 
 local function interThink()
-	if nextMap then changeMap() end
+	if nextMap then
-
+		COM_BufInsertText(server, "map " + nextMap)
-	if not cv_teamchange then
+		nextMap = nil
-		cv_teamchange = CV_FindVar("allowteamchange")
 	end
-
+	if not CV_FindVar("allowteamchange").value then
-	if not cv_teamchange.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)
@@ -1466,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($)
-	StatTrack = net($)
-	EncoreInitial = net($)
-	lb = net($)
 end
 addHook("NetVars", netvars)