require("scripts/gugus/functions")

-- ============================================================
-- Left and Right Panel functions
-- ============================================================

-----------------------
-- left : 0.0.0:00:0 --
-- right: 0:00.0.0:0 --
-----------------------

function leftDigitsEvent(swFunction)
	lPanel = DigitsEvent(swFunction, "L")
	if lPanel == nil then lPanel = "-.--.---" end
	SetLeftDigits( lPanel )
	return 1
end
function rightDigitsEvent(swFunction)
	rPanel = DigitsEvent(swFunction, "R")
	if rPanel == nil then rPanel = "-:--.---" end
	SetRightDigits( rPanel )
	return 1
end

function DigitsEvent(swFunction, where)
	local swValue = swFunction + 1
	local displaylaptime = GetContextInfo("displaylaptime")
	local displaysectorsplit = mSectorSplit < GetTicks()

	local lr = ""
	if where == "R" then
		lr = "."
	else
		lr = ":"
	end

	local Output = nil

	qi = GetContextInfo("quickinfobutton")
	if qi then
			-- 1.speed [ 3.rpm/gear ]
		    if swValue ==  1 then qi = false ; swValue =  3
			-- 8.laps/total [ 9.remaining laps / total ]
		elseif swValue ==  8 then qi = false ; swValue =  9
		elseif swValue ==  9 then qi = false ; swValue =  8
			-- 11.fuel/speed [ 12.fuel / remaining laps with fuel ]
		elseif swValue == 11 then qi = false ; swValue = 12
			-- 13.water temp [ 14.oil temp ]
		elseif swValue == 13 then qi = false ; swValue = 14
		elseif swValue == 14 then qi = false ; swValue = 13
		-- lap/sector times
			-- 36.current lap time [ 39.last lap time ]
		elseif swValue == 36 then qi = false ; swValue = 39
			-- 38.current lap time + best sector splits [ current sector time ]
		elseif swValue == 37 then qi = false ; swValue = 47
			-- 39.best lap time [ virtual best lap time ]
		elseif swValue == 38 then qi = false ; swValue = 52
		elseif swValue == 39 then qi = false ; swValue = 49
		elseif swValue == 40 then qi = false ; swValue = 49
		elseif swValue == 41 then qi = false ; swValue = 47
		elseif swValue == 45 then qi = false ; swValue = 49
		elseif swValue == 46 then qi = false ; swValue = 49
		elseif swValue == 47 then qi = false ; swValue = 49
		elseif swValue == 48 then qi = false ; swValue = 47
		end
	end
	local NotQI = qi == false

	-- 1.speed [ rpm/gear ]
	    if swValue == 1 then
		Output = GetString("speed", where)

	-- 2.rpm
	elseif swValue == 2 then
		Output = GetString("rpm", where)

	-- 3.rpm/gear
	elseif swValue == 3 then
		Output = GetString("rpm", where .. "l") .. ":" .. GetString("gear", where .. "r")

	-- 4.position/speed
	elseif swValue == 4 then
		Output = GetString("position", where .. "l") .. lr.. GetString("speed", where .. "r")

	-- 5.sector/speed
	elseif swValue == 5 then
		Output = GetString("sector", where .. "l") .. lr .. GetString("speed", where .. "r")

	-- 6.laps/sector
	elseif swValue == 6 then
		Output = GetString("laps", where .. "l") .. lr .. GetString("sector", where .. "r")

	-- 7.laps/position
	elseif swValue == 7 then
		Output = GetString("laps", where .. "l") .. lr .. GetString("position", where .. "r")

	-- 8.laps/total [ remaining laps / total ]
	elseif swValue == 8 then
		Output = GetString("laps", where .. "l") .. lr .. GetString("totallaps", where .. "r")

	-- 9.remaining laps/total [ laps / total ]
	elseif swValue == 9 then
		Output = GetString("remaininglaps", where .. "l") .. lr .. GetString("totallaps", where .. "r")

	-- 10.fuel
	elseif swValue == 10 then
		Output = GetString("fuel", where)

	-- 11.fuel/speed
	elseif swValue == 11 then
		Output = GetString("fuel", where .. "l") .. lr .. GetString("speed", where .. "r")

	-- 12.fuel/remaining laps with fuel
	elseif swValue == 12 then
		Output = GetString("fuel", where .. "l") .. lr .. GetString("remaininglapsintank", where .. "r")

	-- 13.water temp [ oil temp ]
	elseif swValue == 13 then
		Output = GetString("watertemp", where)

	-- 14.oil temp [ water temp ]
	elseif swValue == 14 then
		Output = GetString("oiltemp", where)

	-- 15.wheels temp FL [ RL ]
	elseif swValue == 15 then
		if NotQI then
			Output = GetString("wtfl", where)
		else
			Output = GetString("wtrl", where)
		end

	-- 16.wheels temp FR [ RR ]
	elseif swValue == 16 then
		if NotQI then
			Output = GetString("wtfr", where)
		else
			Output = GetString("wtrr", where)
		end

	-- 17.wheels temp L/R FRONT [ L/R REAR ]
	elseif swValue == 17 then
		if NotQI then
			Output = GetString("wtfl", where .. "l") .. lr .. GetString("wtfr", where .. "r")
		else
			Output = GetString("wtrl", where .. "l") .. lr .. GetString("wtrr", where .. "r")
		end

	-- 18.wheels temp L/R FRONT [ wheels press L/R FRONT ]
	elseif swValue == 18 then
		if NotQI then
			Output = GetString("wtfl", where .. "l") .. lr .. GetString("wtfr", where .. "r")
		else
			Output = GetString("wpfl", where .. "l") .. lr .. GetString("wpfr", where .. "r")
		end

	-- 19.wheels temp L/R REAR [ wheels press L/R REAR ]
	elseif swValue == 19 then
		if NotQI then
			Output = GetString("wtrl", where .. "l") .. lr .. GetString("wtrr", where .. "r")
		else
			Output = GetString("wprl", where .. "l") .. lr .. GetString("wprr", where .. "r")
		end

	-- 20.wheels/brake temp left FRONT [ REAR ]
	elseif swValue == 20 then
		if NotQI then
			Output = GetString("wtfl", where .. "l") .. lr .. GetString("btfl", where .. "r")
		else
			Output = GetString("wtrl", where .. "l") .. lr .. GetString("btrl", where .. "r")
		end

	-- 21.brake/wheels temp right FRONT [ REAR ]
	elseif swValue == 21 then
		if NotQI then
			Output = GetString("btfr", where .. "l") .. lr .. GetString("wtfr", where .. "r")
		else
			Output = GetString("btrr", where .. "l") .. lr .. GetString("wtrr", where .. "r")
		end

	-- 22.wheels temp FL/ press FL [ RL/RL ]
	elseif swValue == 22 then
		if NotQI then
			Output = GetString("wtfl", where .. "l") .. lr .. GetString("wpfl", where .. "r")
		else
			Output = GetString("wtrl", where .. "l") .. lr .. GetString("wprl", where .. "r")
		end

	-- 23.wheels press FR/ temp FR [ RR/RR ]
	elseif swValue == 23 then
		if NotQI then
			Output = GetString("wpfr", where .. "l") .. lr .. GetString("wtfr", where .. "r")
		else
			Output = GetString("wprr", where .. "l") .. lr .. GetString("wtrr", where .. "r")
		end

	-- 24.wheels press FL [ RL ]
	elseif swValue == 24 then
		if NotQI then
			Output = GetString("wpfl", where)
		else
			Output = GetString("wprl", where)
		end

	-- 25.wheels press FR [ RR ]
	elseif swValue == 25 then
		if NotQI then
			Output = GetString("wpfr", where)
		else
			Output = GetString("wprr", where)
		end

	-- 26.wheels press L/R FRONT [ L/R REAR ]
	elseif swValue == 26 then
		if NotQI then
			Output = GetString("wpfl", where .. "l") .. lr .. GetString("wpfr", where .. "r")
		else
			Output = GetString("wprl", where .. "l") .. lr .. GetString("wprr", where .. "r")
		end

	-- 27.brakes temp FL [ RL ]
	elseif swValue == 27 then
		if NotQI then
			Output = GetString("btfl", where)
		else
			Output = GetString("btrl", where)
		end

	-- 28.brakes temp FR [ RR ]
	elseif swValue == 28 then
		if NotQI then
			Output = GetString("btfr", where)
		else
			Output = GetString("btrr", where)
		end

	-- 29.brakes temp L/R FRONT [ L/R REAR ]
	elseif swValue == 29 then
		if NotQI then
			Output = GetString("btfl", where .. "l") .. lr .. GetString("btfr", where .. "r")
		else
			Output = GetString("btrl", where .. "l") .. lr .. GetString("btrr", where .. "r")
		end

	-- 30.track percent [ track size ]
	elseif swValue == 30 then
		if NotQI then
			Output = GetString("trackpercent", where)
		else
			Output = GetString("tracksize", where)
		end

	-- 31.total distance
	elseif swValue == 31 then
		Output = GetString("distance", where)

	-- 32.kers
	elseif swValue == 32 then

	-- 33.kers max
	elseif swValue == 33 then

	-- 34.kers percent
	elseif swValue == 34 then

	-- 35.drs
	elseif swValue == 35 then

	-- 36.current lap time [ last lap time ]
	elseif swValue == 36 then
		Output = GetTimeString("laptime", where)

	-- 37.current lap time + sector splits [ current sector time ]
	elseif swValue == 37 then
		if displaysectorsplit == false then
			Output = GetTimeString("laptime", where)
		else
			Output = GetTimeString("lastsectorsplitVSlast", where)
		end

	-- 38.current lap time + best sector splits [ current sector time ]
	elseif swValue == 38 then
		if displaysectorsplit == false then
			Output = GetTimeString("laptime", where)
		else
			Output = GetTimeString("lastsectorsplitVSbest", where)
		end

	-- 39.best lap time [ virtual best lap time ]
	elseif swValue == 39 then
		Output = GetTimeString("bestlaptime", where)

	-- 40.best lap time + best sector splits [ virtual best lap time ]
	elseif swValue == 40 then
		if displaysectorsplit == false then
			Output = GetTimeString("bestlaptime", where)
		else
			Output = GetTimeString("lastsectorsplitVSbest", where)
		end

	-- 41.last lap time [ last sector ]
	elseif swValue == 41 then

	-- 42.last lap time + sector splits [ last sector ]
	elseif swValue == 42 then

	-- 43.real time diff vs best [ bestlap time ]
	elseif swValue == 43 then

	-- 44.real time diff vs best + best sector split [ best sector time ]
	elseif swValue == 44 then

	-- 45.real time diff vs best + bestlap sector split [ bestlap sector time ]
	elseif swValue == 45 then

	-- 46.real time diff vs last [ last lap time ]
	elseif swValue == 46 then

	-- 47.real time diff vs last + sector split [ last sector time ]
	elseif swValue == 47 then

	-- 48.last sector time [ last sector best time ]
	elseif swValue == 48 then
		Output = GetTimeString("lastsector", where)

	-- 49.sector split [ last sector time ]
	elseif swValue == 49 then

	-- 50.last sector best time
	elseif swValue == 50 then
		Output = GetTimeString("lastsectorbest", where)

	-- 51.best sector split [ best sector time ]
	elseif swValue == 51 then
		Output = GetTimeString("lastsectorsplitVSbest", where)

	-- 52.virtual best lap time (best sectors) [ best lap time ]
	elseif swValue == 52 then
		Output = GetTimeString("virtualbestlap", where)

	-- 53.time remaining [ time elapsed ]
	elseif swValue == 53 then
		Output = GetTimeString("timeremaining", where)

	-- 54.time elapsed [ time remaining ]
	elseif swValue == 54 then
		Output = GetTimeString("timeelapsed", where)

	-- 55.system time
	elseif swValue == 55 then
		Output = GetTimeString("clock", where)

	-- 56.PIT
	elseif swValue == 56 then
		if GetContextInfo("inpits") then
			Output = " Pits "
		else
			Output = "      "
		end

	-- 57.Safety Car
	elseif swValue == 57 then
		if GetContextInfo("safetycar") then
			Output = "Safety"
		else
			Output = "      "
		end

	end

	return Output
end


print ( "gugus> + slipro digits" )