使用有序資料儲存以創建自訂排行榜

local function saveGold(player, value)
  local userId = player.UserId
 
  local success, err = pcall(function()
    goldStore:SetAsync(userId, value)
   
    leaderboardStore:SetAsync(tostring(userId), value)
  end)
  if not success then
    warn("無法儲存", player.Name, "的黃金:", err)
  end
end

-- 獲取服務
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local CollectionService = game:GetService("CollectionService")
local DataStoreService = game:GetService("DataStoreService")

-- 更新 UI 的遠程事件
local uiEvent = ReplicatedStorage:WaitForChild("UIEvent")

-- 儲存玩家黃金區塊的資料儲存
local goldStore = DataStoreService:GetDataStore("PlayerGold")

-- 儲存黃金到排行榜的有序資料儲存
local leaderboardStore = DataStoreService:GetOrderedDataStore("GlobalLeaderboard")

-- 創建隨機數生成器以定位黃金區塊
local random = Random.new()

-- 儲存玩家單一會話的黃金區塊的表
local playerGold = {}

-- 常量
local GOLD_VALUE = 10                  -- 每個黃金區塊的價值
local GOLD_REGENERATION_BOUNDS = {     -- 用於隨機重新定位黃金區塊的區域邊界
  minX = -72,
  maxX = 72,
  minZ = -72,
  maxZ = 72
}
local GOLD_REGEN_DELAY = 2             -- 區塊重生的延遲（以秒為單位）
local AUTOSAVE_INTERVAL = 30           -- 玩家區塊儲存的頻率（以秒為單位）

-- 處理玩家收集黃金區塊的函數
local function processGoldTouch(chunk, player)

  -- 玩家收集後隱藏區塊
  chunk.Parent = nil

  -- 將區塊添加到玩家的會話黃金得分
  local userId = player.UserId
  playerGold[userId] = (playerGold[userId] or 0) + GOLD_VALUE
  print(player.Name, "現在擁有", playerGold[userId], "黃金")

  -- 更新 UI 得分條以反映此會話中的新黃金得分
  uiEvent:FireClient(player, {
    gold = playerGold[userId],
    doTween = true,
    showAlert = false
  })

  -- 等待一段時間然後在新的隨機位置重新生成剛收集的黃金區塊
  task.delay(GOLD_REGEN_DELAY, function()

    -- 在新的隨機位置重新生成黃金區塊
    local nextPositionX = random:NextInteger(GOLD_REGENERATION_BOUNDS.minX, GOLD_REGENERATION_BOUNDS.maxX)
    local nextPositionZ = random:NextInteger(GOLD_REGENERATION_BOUNDS.minZ, GOLD_REGENERATION_BOUNDS.maxZ)
    chunk.CFrame = CFrame.new(nextPositionX, 50, nextPositionZ) -- 移動區塊到新位置
    chunk:SetAttribute("DropCollided", false)  -- 重設任何碰撞標誌
    chunk.Parent = workspace.GoldChunks
  end)
end

-- 循環遍歷所有標記為 "Gold" 的零件並連接到觸碰檢測
for _, chunk in ipairs(CollectionService:GetTagged("Gold")) do
  chunk.Touched:Connect(function(otherPart)
    local player = Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
      processGoldTouch(chunk, player)
    end
  end)
end

-- 將玩家的黃金保存到標準資料儲存和有序資料儲存的函數
local function saveGold(player, value)
  local userId = player.UserId
  local success, err = pcall(function()
    goldStore:SetAsync(userId, value)
    leaderboardStore:SetAsync(tostring(userId), value)
  end)
  if not success then
    warn("無法儲存", player.Name, "的黃金:", err)
  end
end

-- 處理玩家加入遊戲的函數
local function onPlayerAdded(player)
  local userId = player.UserId
  print(player.Name, "已加入遊戲")

  -- 嘗試從資料儲存加載玩家的黃金
  local success, storedGold = pcall(function()
    return goldStore:GetAsync(userId)
  end)

  -- 使用資料儲存值設置當前會話黃金得分
  local currentGold = if success and storedGold then storedGold else 0
  playerGold[userId] = currentGold

  -- 使用玩家的資料儲存值更新 UI
  uiEvent:FireClient(player, {
    gold = currentGold,
    doTween = false,
    showAlert =  not success
  })
  if success then
    print("加載", currentGold, "黃金給", player.Name)
  else

    -- 通知玩家其黃金無法加載
    uiEvent:FireClient(player, { showAlert = true })
    warn("無法加載", player.Name, "的黃金")
  end

  -- 開始自動保存協程每 30 秒保存玩家的黃金
  coroutine.wrap(function()
    while player.Parent do
      task.wait(AUTOSAVE_INTERVAL)
      if playerGold[userId] then
        saveGold(player, playerGold[userId])
        print("自動保存", playerGold[userId], "黃金給", player.Name)
      end
    end
  end)()
end

-- 處理玩家離開遊戲的函數
local function onPlayerRemoving(player)
  local userId = player.UserId
  print(player.Name, "已離開遊戲")

  -- 檢查玩家的黃金是否被追蹤
  if playerGold[userId] then

    -- 在玩家離開之前將其黃金保存到資料儲存中
    saveGold(player, playerGold[userId])
  end
end

-- 連接玩家進入和離開事件
Players.PlayerAdded:Connect(onPlayerAdded)
Players.PlayerRemoving:Connect(onPlayerRemoving)

-- 獲取服務
local Players = game:GetService("Players")
local DataStoreService = game:GetService("DataStoreService")

-- 儲存排行榜得分的有序資料儲存
local leaderboardStore = DataStoreService:GetOrderedDataStore("GlobalLeaderboard")

-- 儲存排行榜得分的表
local leaderboardManager = {}

-- 返回最高得分的函數
function leaderboardManager.GetTopScores(limit)
	-- 嘗試從資料儲存獲取經排序的排行榜條目頁面
	local success, pages = pcall(function()
		-- false = 降序（最高得分優先）
		return leaderboardStore:GetSortedAsync(false, limit)
	end)

	-- 如果調用失敗或返回空值，記錄警告並返回空表
	if not success or not pages then
		warn("獲取排行榜數據失敗")
		return {}
	end

	-- 創建一個表來儲存頂部玩家數據
	local topPlayers = {}

	-- 循環遍歷排行榜結果當前頁面上的每個條目
	for _, entry in ipairs(pages:GetCurrentPage()) do
		local userId = tonumber(entry.key)   -- 將條目鍵轉換為數字（用戶 ID 存儲為字串）
		local score = entry.value            -- 值是玩家的得分（黃金量）
		local username = "未知"           -- 如果查詢失敗則使用的預設名稱

		-- 嘗試從用戶 ID 獲取玩家的用戶名
		local ok, name = pcall(function()
			return Players:GetNameFromUserIdAsync(userId)
		end)

		-- 如果查詢成功，儲存真實用戶名
		if ok then
			username = name
		end

		-- 將此玩家及其得分添加到列表中
		table.insert(topPlayers, {
			Username = username,
			Score = score
		})
	end

	-- 返回包含用戶名和得分的頂部玩家完整列表
	return topPlayers
end

-- 返回 LeaderboardManager 模組，以便其他腳本可以使用它
return leaderboardManager

-- 獲取服務
local ServerScriptService = game:GetService("ServerScriptService")  -- 訪問伺服器端模組
local ReplicatedStorage = game:GetService("ReplicatedStorage")      -- 共享客戶端-伺服器通信對象

-- 等待客戶端用於請求排行榜數據的 RemoteFunction
local leaderboardRemote = ReplicatedStorage:WaitForChild("LeaderboardRemote")

-- 加載包含 GetTopScores 函數的 LeaderboardManager 模組
local leaderboardManager = require(ServerScriptService:WaitForChild("LeaderboardManager"))

-- 為客戶端調用排行榜 RemoteFunction 設置處理程序
leaderboardRemote.OnServerInvoke = function(player)
	-- 調用排行榜模組以獲取前三名得分並將其返回給客戶端
	return leaderboardManager.GetTopScores(3)
end

-- 獲取共享存儲以訪問 RemoteFunction
local ReplicatedStorage = game:GetService("ReplicatedStorage")

-- 獲取用於從伺服器請求排行榜數據的 RemoteFunction
local leaderboardRemote = ReplicatedStorage:WaitForChild("LeaderboardRemote")

-- UI 引用
local gui = script.Parent                                           -- 本地腳本位於 ScreenGui 下
local leaderboardFrame = gui:WaitForChild("LeaderboardFrame")       -- 排行榜的主容器
local entriesFrame = leaderboardFrame:WaitForChild("EntriesFrame")  -- 排行榜條目出現的框架
local template = entriesFrame:WaitForChild("LeaderboardEntry")      -- 用於創建行的隱藏模板 TextLabel

-- 清除舊排行榜行的函數（但不清除模板）
local function clearEntries()
	for _, child in ipairs(entriesFrame:GetChildren()) do
		-- 只銷毀名為 "Row1"、"Row2" 等的標籤（保留模板不變）
		if child:IsA("TextLabel") and child.Name:match("^Row%d+$") then
			child:Destroy()
		end
	end
end

-- 顯示排行榜數據的函數
local function renderLeaderboard(data)
	-- 首先移除舊行
	clearEntries()

	for i, entry in ipairs(data) do
		local row = template:Clone()           -- 克隆隱藏模板
		row.Name = "Row" .. i                  -- 給它一個唯一名稱
		row.Visible = true                     -- 使其可見
		row.LayoutOrder = i                    -- 讓 UIListLayout 正確排序

		-- 排行榜格式："第1名：用戶名 - 123"
		row.Text = string.format("%d%s 名：%s - %d",
			i,
			i == 1 and "st" or i == 2 and "nd" or i == 3 and "rd" or "th",
			entry.Username,
			entry.Score
		)

		-- 將數據添加到 UI 中
		row.Parent = entriesFrame
	end
end

-- 主循環：每 3 秒更新排行榜
while true do
	-- 向伺服器請求排行榜數據
	local success, data = pcall(function()
		return leaderboardRemote:InvokeServer()
	end)

	if success and data then
		-- 在排行榜上顯示結果
		renderLeaderboard(data)
	else
		warn("獲取排行榜數據失敗")
	end

	-- 等待 3 秒鐘再更新
	task.wait(3)
end