DataStores messed it up?

Well I was making my custom leaderboard as I do, it all worked before but when I add DataStore support, it suddenly doesn't work. I don't know what the problem is and no errors occur. Here are the code chunks needed:

DataStore = game:GetService("DataStoreService"):GetDataStore("Values")

game.Players.PlayerAdded:connect(function(player)
local save = "plr-"..player.userId
local savedVals = DataStore:GetAsync(save)
   if savedVals then
        val = savedVals
   else 
        val = 0
        DataStore:SetAsync(save, val)
end
local pts = Instance.new("IntValue", player)
pts.Name = "Cash"
pts.Value = val

while wait() do
    newchatline.Text = player.Name.." - $"..pts.Value
end
end)

game.Players.PlayerRemoving:connect(function(p)
    for _,v in pairs(game.Players:GetChildren()) do
        for _,x in pairs(v.PlayerGui.Leaderboard:GetChildren()) do
            if x.Text == p.Name then
                local z = x.Name:sub(4)
                x:Destroy()
            for _,y in pairs(v.PlayerGui.Leaderboard:GetChildren()) do
                if y.Name:sub(4) > z then
                    y.Position = y.Position - UDim2.new(0, 0, 0, 29)
                end
            end
            end
        end
    end
end)

game.Players.PlayerRemoving:connect(function(plr)
    local val = plr.Cash.Value
    local save = "plr-"..plr.userId
    DataStore:SetAsync(save,val)
end)