When a player dies their stage number gets reset to 0. How to fix?

When a player dies in my obby their stage leaderstat gets reset to 0. They still respawn at the right checkpoint, but their stage number visually says 0 in the leaderboard until they reach the next checkpoint. I have pasted every script I have relating to the checkpoint system; some might not be necessary.

Leaderstats script in ServerScriptService:

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(char)
        local ls = Instance.new("Folder", player)
        ls.Name = "leaderstats"

        local stage = Instance.new("NumberValue", ls)
        stage.Value = 0
        stage.Name = "Stage"

        local stageJoined = player.leaderstats.stage.Value

        wait(0.01)

        char.HumanoidRootPart.Position = game.workspace.Stages2:FindFirstChild("Stage"..stageJoined).Position
    end)
end)

Checkpoints script in ServerScriptService:

local Players = game:GetService('Players')

Players.PlayerAdded:Connect(function(player)
    local stage = player:WaitForChild("leaderstats"):WaitForChild('Stage')
    player.CharacterAdded:Connect(function(character)
        local checkpoint = game.Workspace.Stages:FindFirstChild(stage.Value)
        delay(.01, function() 
            character:SetPrimaryPartCFrame(checkpoint.CFrame + Vector3.new(0,10,0))
        end)
    end)
end)

CheckpointManager Script in the "Stages" folder:

for i,v in pairs(script.Parent:GetChildren()) do
        if v:isA("Part") then
            v.Touched:Connect(function(hit)
            local character = hit.Parent
            local player = game.Players:GetPlayerFromCharacter(character)
            if player then
                        local touchedstage = tonumber(v.Name)
                if touchedstage == (player.leaderstats.Stage.Value + 1) then
                    player.leaderstats.Stage.Value = touchedstage
                end
                    end
            end)
        end
end

Datastore script in ServerScriptService:

local DSService = game:GetService('DataStoreService'):GetDataStore('PUTRANDOMCHARACTERSHERE')
game.Players.PlayerAdded:connect(function(plr)

    local uniquekey = 'id-'..plr.userId
    local leaderstats = Instance.new('IntValue', plr)
    local savevalue = Instance.new('IntValue')
    leaderstats.Name = 'leaderstats'
    savevalue.Parent = leaderstats
    savevalue.Name = 'Stage'

    local GetSaved = DSService:GetAsync(uniquekey)
    if GetSaved then
        savevalue.Value = GetSaved[1]
    else
        local NumbersForSaving = {savevalue.Value}
        DSService:SetAsync(uniquekey, NumbersForSaving)
    end
end)

game.Players.PlayerRemoving:connect(function(plr)
local uniquekey = 'id-'..plr.userId
local Savetable = {plr.leaderstats.Stage.Value}
DSService:SetAsync(uniquekey, Savetable)
end)