创建自定义排行榜与排序数据存储

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)   -- 将条目键转换为数字（userId 存储为字符串）
		local score = entry.value            -- 该值是玩家的得分（金币数量）
		local username = "未知"               -- 默认名称以防查找失败

		-- 尝试从 userId 获取玩家的用户名
		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"))

-- 设置客户端调用排行榜远程函数时的处理程序
leaderboardRemote.OnServerInvoke = function(player)
	-- 调用排行榜模块以获取前 3 名分数并将其返回给客户端
	return leaderboardManager.GetTopScores(3)
end

-- 获取用于访问远程函数的共享存储
local ReplicatedStorage = game:GetService("ReplicatedStorage")

-- 获取用于请求服务器排行榜数据的远程函数
local leaderboardRemote = ReplicatedStorage:WaitForChild("LeaderboardRemote")

-- UI 引用
local gui = script.Parent                                           -- 屏幕 GUI 下的 LocalScript
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 "位" or i == 2 and "位" or i == 3 and "位" or "位",
			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