local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local ServerStorage = game:GetService("ServerStorage")
local Workspace = game:GetService("Workspace")

local RaceFolder = ReplicatedStorage:WaitForChild("Race")

local RaceMapsFolder = ServerStorage:WaitForChild("RaceMaps")
local RaceMaps = RaceMapsFolder:GetChildren()

local Remotes = ReplicatedStorage:WaitForChild("Remotes")
local Bindables = ReplicatedStorage:WaitForChild("Bindables")

local RaceGUI = RaceFolder:WaitForChild("Race")
local WinGUI = RaceFolder:WaitForChild("Winner")

local RaceConfig = require(ReplicatedStorage:WaitForChild("Configs"):WaitForChild("Races"))

local ChosenMap = nil

local GuiShown = false

local GuiClones = {}
local NotDecided = {}
local FinishedPlayers = {}

local function SpawnGui()
	for _, Player: Player in pairs(Players:GetPlayers()) do
		local GuiClone = RaceGUI:Clone()
		GuiClone.Parent = Player.PlayerGui
		table.insert(GuiClones, GuiClone)
		table.insert(NotDecided, Player)
	end
end

local function SpawnWinnerGui()
	for _, Player in pairs(Players:GetPlayers()) do
		local GuiClone = WinGUI:Clone()

		if #FinishedPlayers >= 3 then
			GuiClone.Frame.First.Icon.Image = Players:GetUserThumbnailAsync(FinishedPlayers[1].UserId, Enum.ThumbnailType.AvatarBust, Enum.ThumbnailSize.Size420x420)
			GuiClone.Frame.First.Title.Text = FinishedPlayers[1].Name

			GuiClone.Frame.Second.Icon.Image = Players:GetUserThumbnailAsync(FinishedPlayers[2].UserId, Enum.ThumbnailType.AvatarBust, Enum.ThumbnailSize.Size420x420)
			GuiClone.Frame.Second.Title.Text = FinishedPlayers[2].Name

			GuiClone.Frame.Third.Icon.Image = Players:GetUserThumbnailAsync(FinishedPlayers[3].UserId, Enum.ThumbnailType.AvatarBust, Enum.ThumbnailSize.Size420x420)
			GuiClone.Frame.Third.Title.Text = FinishedPlayers[3].Name
		elseif #FinishedPlayers == 2 then
			GuiClone.Frame.First.Icon.Image = Players:GetUserThumbnailAsync(FinishedPlayers[1].UserId, Enum.ThumbnailType.AvatarBust, Enum.ThumbnailSize.Size420x420)
			GuiClone.Frame.First.Title.Text = FinishedPlayers[1].Name

			GuiClone.Frame.Second.Icon.Image = Players:GetUserThumbnailAsync(FinishedPlayers[2].UserId, Enum.ThumbnailType.AvatarBust, Enum.ThumbnailSize.Size420x420)
			GuiClone.Frame.Second.Title.Text = FinishedPlayers[2].Name

			GuiClone.Frame.Third:Destroy()
		elseif #FinishedPlayers == 1 then
			GuiClone.Frame.First.Icon.Image = Players:GetUserThumbnailAsync(FinishedPlayers[1].UserId, Enum.ThumbnailType.AvatarBust, Enum.ThumbnailSize.Size420x420)
			GuiClone.Frame.First.Title.Text = FinishedPlayers[1].Name

			GuiClone.Frame.Second:Destroy()
			GuiClone.Frame.Third:Destroy()
		end

		GuiClone.Parent = Player.PlayerGui

		if #FinishedPlayers == 0 then
			GuiClone:Destroy()
		end
	end
end

local function DestroyGui(RemoveAll: boolean)
	if RemoveAll == false then
		for i, v in pairs(NotDecided) do
			local Index = table.find(GuiClones, v.PlayerGui.Race)
			if Index then
				table.remove(NotDecided, table.find(NotDecided, v))
				table.remove(GuiClones, Index)
				v.PlayerGui.Race:Destroy()
			end
		end

		for i, v in pairs(GuiClones) do
			v.Parent:WaitForChild("Top"):WaitForChild("RaceStatus").Text = `Race ending in`
		end
	else
		for i, v in pairs(GuiClones) do
			v:Destroy()
		end

		GuiClones = {}
	end
end

local function DestroyWinGui()
	for _, Player in pairs(Players:GetPlayers()) do
		if Player.PlayerGui:FindFirstChild("Winner") then
			Player.PlayerGui.Winner:Destroy()
		end
	end
end

local function UpdateGuiTimer(RaceInProgress: boolean)
	if RaceInProgress == false then
		for i, v in pairs(GuiClones) do
			if v.Parent:WaitForChild("Top"):WaitForChild("RaceStatus") and v:WaitForChild("Prompt") then
				v.Parent.Top.RaceStatus.Text = `Race starts in {string.format("%02i:%02i", RaceConfig.Timer / 60, RaceConfig.Timer % 60)}`
				v.Prompt.Title.Text = `A race is starting, want to join? ({RaceConfig.Timer})`
			end
		end
	else
		for i, v in pairs(GuiClones) do
			if v.Parent:WaitForChild("Top"):WaitForChild("RaceStatus") and v:WaitForChild("Prompt") then
				v.Parent.Top.RaceStatus.Text = `Race ends in {string.format("%02i:%02i", RaceConfig.InProgressTimer / 60, RaceConfig.InProgressTimer % 60)}`
			end
		end
	end
end

local function StartRace()
	FinishedPlayers = {}
	NotDecided = {}
	GuiShown = false
	ChosenMap.Wall.CanCollide = true
	
	local StartTimer = coroutine.create(RaceConfig.StartTimer)
	coroutine.resume(StartTimer)
end

Remotes.TeleportPlayer.OnServerEvent:Connect(function(Player: Player)
	if Player.Character then
		local Spawns = ChosenMap.SpawnParts:GetChildren()
		local Index = math.random(#Spawns)

		Player.Character:PivotTo(Spawns[Index].CFrame + Vector3.new(0, 2, 0))

		local TableIndex = table.find(NotDecided, Player)
		if TableIndex then
			table.remove(NotDecided, TableIndex)
		end
	end
end)

Remotes.DismissRace.OnServerEvent:Connect(function(Player: Player, GUI: ScreenGui)
	local Index = table.find(GuiClones, GUI)
	if Index then
		table.remove(NotDecided, table.find(NotDecided, Player))
		table.remove(GuiClones, Index)
		GUI:Destroy()
	end
end)

Bindables.StartRace.Event:Connect(function()
	DestroyGui(false)

	local RaceInProgress = coroutine.create(RaceConfig.RaceInProgress)
	coroutine.resume(RaceInProgress)

	local Wall = ChosenMap:WaitForChild("Wall")
	Wall.CanCollide = false
end)

Bindables.FinishRace.Event:Connect(function()
	DestroyGui(true)

	ChosenMap.Parent = RaceFolder

	for _, Player: Player in pairs(Players:GetPlayers()) do
		if Player.PlayerGui:WaitForChild("Top"):WaitForChild("RaceStatus") then
			Player.PlayerGui.Top.RaceStatus.Text = ``
		end
	end

	SpawnWinnerGui()

	if #FinishedPlayers >= 3 then
		FinishedPlayers[1]:WaitForChild("leaderstats"):WaitForChild("Races").Value += 1
		FinishedPlayers[1]:WaitForChild("Gems").Value += 500

		FinishedPlayers[2]:WaitForChild("leaderstats"):WaitForChild("Races").Value += 1
		FinishedPlayers[2]:WaitForChild("Gems").Value += 250

		FinishedPlayers[3]:WaitForChild("leaderstats"):WaitForChild("Races").Value += 1
		FinishedPlayers[3]:WaitForChild("Gems").Value += 100
	elseif #FinishedPlayers == 2 then
		FinishedPlayers[1]:WaitForChild("leaderstats"):WaitForChild("Races").Value += 1
		FinishedPlayers[1]:WaitForChild("Gems").Value += 500

		FinishedPlayers[2]:WaitForChild("leaderstats"):WaitForChild("Races").Value += 1
		FinishedPlayers[2]:WaitForChild("Gems").Value += 250
	elseif #FinishedPlayers == 1 then
		FinishedPlayers[1]:WaitForChild("leaderstats"):WaitForChild("Races").Value += 1
		FinishedPlayers[1]:WaitForChild("Gems").Value += 500
	end
	
	local Intermission = coroutine.create(RaceConfig.Intermission)
	coroutine.resume(Intermission)
end)

local function RandomMap()
	local ChosenMapIndex = math.random(#RaceMaps)
	RaceMaps[ChosenMapIndex].Parent = Workspace
	ChosenMap = RaceMaps[ChosenMapIndex]
end

local function LoadFirstRace()
	RandomMap()
	StartRace()
end

LoadFirstRace()

while task.wait(1) do
	if RaceConfig.Timer > 0 then
		if #RaceMapsFolder:GetChildren() == #RaceMaps then
			RandomMap()
		end

		if GuiShown == false then
			GuiShown = true
			SpawnGui()
		end

		UpdateGuiTimer(false)
	else
		UpdateGuiTimer(true)
		
		ChosenMap.FinishArea.Touched:Connect(function(Hit: BasePart)
			if Hit.Parent then
				local Player = Players:GetPlayerFromCharacter(Hit.Parent)
				if Player then
					if table.find(FinishedPlayers, Player) then
						return
					end
					
					table.insert(FinishedPlayers, Player)
					
					if Player.Character then
						Player.Character:PivotTo(Workspace.SpawnLocation.CFrame + Vector3.new(0, 2, 0))
					end
				end
			end
		end)
	end

	if RaceConfig.Timer <= 0 and RaceConfig.InProgressTimer <= 0 then
		task.wait(5)
		DestroyWinGui()
		
		if RaceConfig.IntermissionTimer <= 0 then
			StartRace()
		end
	end
end