why wont it save my whole tabke...? Data Store Probelms

here is my script

I want it to save Dollars, Level, Exp, and MaxExp too

but it wont...

    local dss = game:GetService("DataStoreService")
    local datas = dss:GetDataStore("DollarSaveStore")
    --local datalv = 
    local startercurrencyvalue = 30
    local starterlv = 1
    local starterexp = 0
    local startermaxexp = 100
local autosaves = 0

game.Players.PlayerAdded:Connect(function(plr)
    ---I wont add a data store thing right now too lazy


    local scope = "id-"..plr.UserId

        local leader = Instance.new("Folder")
        leader.Name = "leaderstats"
        leader.Parent = plr

        local currency = Instance.new("IntValue")
        currency.Name = "Dollars"
        currency.Parent = leader

        local getsaved = datas:GetAsync(scope)
        if getsaved then
            currency.Value = getsaved[1]
        else
            local numberstosave = {startercurrencyvalue,starterlv,starterexp,startermaxexp} 
            datas:SetAsync(scope,numberstosave)
        end


local   function OnAutoSave()
    while true do 
        wait(25)
        local scope = "id-"..plr.UserId
        local savetable = {plr.leaderstats:WaitForChild("Dollars").Value}
    autosaves = autosaves + 1   
    local sucsess, err = pcall(function() 
    datas:SetAsync(scope,savetable)



    end)
    if not sucsess then
print("During AutoSave No."..autosaves.." The Saving Prosses had failed for Player: "..plr.Name)
    else
        print("Save Succsful!!!   :D") 
        end
    end
    end

    local thread = coroutine.create(OnAutoSave)


    coroutine.resume(thread)





        while true do


            wait(5)
            currency.Value = currency.Value + 2

        end


                end)


game.Players.PlayerRemoving:Connect(function(plr)
    local scope = "id-"..plr.UserId
    local savetable = {plr.leaderstats:WaitForChild("Dollars").Value,plr:WaitForChild("Level").Value,plr:WaitForChild("Level").Exp.Value,plr:WaitForChild("Level").Exp.MaxExp.Value}
    local sucsess, err = pcall(function() 
    datas:SetAsync(scope,savetable)
    end)
    if not sucsess then
        warn("There was an error saving your IMPORTANT Wielding Data!")
    end
end)