local Players = game:GetService("Players")
local DataStoreService = game:GetService("DataStoreService")

local Coins = workspace:WaitForChild("Coins")
local moneyStore = DataStoreService:GetDataStore("MoneyDataStore1")

local debounce = {}

for _, coin in ipairs(Coins:GetChildren()) do
	coin.Touched:Connect(function(hit)
		local character = hit.Parent
		local humanoid = character:FindFirstChild("Humanoid")

		if humanoid then
			local player = Players:GetPlayerFromCharacter(character)

			if not player then
				return
			end

			if debounce[player.UserId] then
				return
			end

			debounce[player.UserId] = true

			local leaderstats = player:FindFirstChild("leaderstats")
			local moedas = leaderstats and leaderstats:FindFirstChild("Money")

			if moedas then
				moedas.Value += 1
			end

			task.wait(0.5)
			debounce[player.UserId] = false

			coin:Destroy()
		end
	end)
end

local function salvarDados(player)
	print("Player saiu do jogo")

	local leaderstats = player:FindFirstChild("leaderstats")
	local moedas = leaderstats and leaderstats:FindFirstChild("Money")

	if not moedas then
		return
	end

	local success, erro = pcall(function()
		moneyStore:SetAsync(tostring(player.UserId), moedas.Value)
	end)

	if success then
		print("Dados foram salvos")
	else
		warn("Erro ao salvar dados:", erro)
	end
end

local function carregarDados(player)
	local success, resultado = pcall(function()
		return moneyStore:GetAsync(tostring(player.UserId))
	end)

	if success then
		if resultado ~= nil then
			print("Dados carregados:", resultado)

			local leaderstats = player:FindFirstChild("leaderstats")
			local moedas = leaderstats and leaderstats:FindFirstChild("Money")

			if moedas then
				moedas.Value = resultado
			end
		end
	else
		warn("Erro ao carregar os dados:", resultado)
	end
end

Players.PlayerAdded:Connect(function(player)
	local leaderstats = Instance.new("Folder")
	leaderstats.Name = "leaderstats"
	leaderstats.Parent = player

	local money = Instance.new("IntValue")
	money.Name = "Money"
	money.Value = 0
	money.Parent = leaderstats

	carregarDados(player)
end)

Players.PlayerRemoving:Connect(function(player)
	salvarDados(player)
end)

game:BindToClose(function()
	for _, player in ipairs(Players:GetPlayers()) do
		salvarDados(player)
	end
end)