Is there a way that I can simplify this script to prevent saves from being throttled?[Answered]

In the game that I had been making, I plan for players to be able to save their progress to continue form session to session. This can be easily achieved by using DataStore. Te problem is, I don't know how to use datastore that well. I made a script to save the values that I had wanted, but when I tested it out and updated the values, I had reviewed a message that the request had been throttled and that I should send fewer requests. Is there a way that I could save all five of these values(With plans to add two more on a later date) under one datastore? Here is the script that I had used

local DataStore = game:GetService("DataStoreService")
local ds1 = DataStore:GetDataStore("ExampleDataStore")

game.Players.PlayerAdded:connect(function(player)
	local leader = Instance.new("Folder",player)
	leader.Name = "OnionStore"
	local red = Instance.new("IntValue",leader)
	red.Name = "Red"
	local yellow = Instance.new("IntValue",leader)
	yellow.Name = "Yellow"
	local blue = Instance.new("IntValue",leader)
	blue.Name = "Blue"
	local purple = Instance.new("IntValue",leader)
	purple.Name = "Purple"
	local white = Instance.new("IntValue",leader)
	white.Name = "White"
	red.Value = ds1:GetAsync(player.UserId) or 1
	ds1:SetAsync(player.UserId,red.Value)
	red.Changed:connect(function()
	print('Saving Data')
		ds1:SetAsync(player.UserId,red.Value)
		print(player.Name.."'s Data of"..red.Value.." "..red.Name.."has been saved!")
	end)
		
	yellow.Value = ds1:GetAsync(player.UserId) or 1
	ds1:SetAsync(player.UserId,yellow.Value)
	yellow.Changed:connect(function()
	print('Saving Data')
		ds1:SetAsync(player.UserId,yellow.Value)
		print(player.Name.."'s Data of"..yellow.Value.." "..yellow.Name.."has been saved!")
	end)
		
	blue.Value = ds1:GetAsync(player.UserId) or 1
	ds1:SetAsync(player.UserId,blue.Value)
	blue.Changed:connect(function()
	print('Saving Data')
		ds1:SetAsync(player.UserId,blue.Value)
		print(player.Name.."'s Data of"..blue.Value.." "..blue.Name.."has been saved!")
	end)
		
	purple.Value = ds1:GetAsync(player.UserId) or 0
	ds1:SetAsync(player.UserId,purple.Value)
	purple.Changed:connect(function()
	print('Saving Data')
		ds1:SetAsync(player.UserId,purple.Value)
		print(player.Name.."'s Data of"..purple.Value.." "..purple.Name.."has been saved!")
	end)
		
	white.Value = ds1:GetAsync(player.UserId) or 0
	ds1:SetAsync(player.UserId,white.Value)
	white.Changed:connect(function()
		print('Saving Data')
		ds1:SetAsync(player.UserId,white.Value)
		print(player.Name.."'s Data of"..white.Value.." "..white.Name.."has been saved!")
	end)
	end)