My DataStore Is Not Working To Save Players Leaderstats Any Way To Fix This?

There's a lot of problems in your script that I'm too lazy to list all. Here's the script, just observe this script and the previous one to learn your mistakes.

local plr = game:GetService("Players")
local DSS = game:GetService("DataStoreService")
local MyData = DSS:GetDataStore("MyData1") -- gets a data store and you can name it
local RunService = game:GetService("RunService")

local function waitForRequestBudget(requestType: Enum.DataStoreRequestType)
    local currentBudget = DataStoreService:GetRequestBudgetForRequestType(requestType)

    while currentBudget < 1 do
        currentBudget = DataStoreService:GetRequestBudgetForRequestType(requestType)
        task.wait(5)
    end
end

function loadData(player)
    print(player.Name)
    local text = player:WaitForChild("PlayerGui"):WaitForChild("ScreenGui").TextLabel
    text.Text = player.Name
    --- leaderstats
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player
    local Coins = Instance.new("IntValue")
    Coins.Name = "Coins"
    Coins.Parent = leaderstats
    Coins.Value = 100
    -- datastore
    local PlrId = "Player_"..player.UserId
    -- syncs player data from datastore GetAsync()
    wait
    waitForRequestBudgetType(Enum.DataStoreRequestType.GetAsync)
    local success, data1 = pcall(function() -- pcall stops errors
        return MyData:GetAsync(PlrId) 
    end)
    if success then
        -- set our data to our coin value
        Coins.Value = data1
    else
        warn(data1)
    end

    task.spawn(function()
        while true do
            task.wait(5)
            Coins.Value += 1
        end
    end)
end

function saveData(player, dontWait)
    local PlrId = "Player_"..player.UserId
    local plrdata = plr:WaitForChild("leaderstats"):WaitForChild("Coins").Value
    local success
    repeat
        if not dontWait then
            waitForRequestBudgetType(Enum.DataStoreRequestType.SetAsync)
        end
        success = pcall(function()
            MyData:SetAsync(PlrId, plrdata)
        end)
    until success
end

for _, player in ipairs(plr:GetPlayers()) do
    task.spawn(loadData, player)
end

plr.PlayerAdded:Connect(loadData)
plr.PlayerRemoving:Connect(saveData)
game:BindToClose(function()
    if RunService:IsStudio() then
        task.wait(2)
    else
        local finished = Instance.new("BindableEvent")
        local allPlayers = Players:GetPlayers()
        local leftPlayers = #allPlayers

        for _,player in ipairs(allPlayers) do
            task.spawn(function()
                saveData(player, true)
                leftPlayers -= 1
                if leftPlayers == 0 then
                    finished:Fire()
                end
            end)
        end

        finished.Event:Wait()
    end
end)