攻沙积分排行榜记录

meinvwudi

local ShaChengZhanShenBang = {}
ShaChengZhanShenBang.ID = "沙城战神榜"
local npcID = 0
--local config = include("QuestDiary/cfgcsv/cfg_ShaChengZhanShenBang.lua") --配置
local cost = { {} }
local gives = {
    { "至尊宝箱", 1 },
    { "钻石宝箱", 1 },
    { "黄金宝箱", 1 },
    { "白银宝箱", 1 },
    { "白银宝箱", 1 },
    { "白银宝箱", 1 } }
--判断我是否在排行榜内 并且返回名次
local function checkMyRank(actor, ranks)
    if not ranks then
        return
    end
    if #ranks == 0 then
        return
    end
    local myName = getbaseinfo(actor, ConstCfg.gbase.name)
    for i, v in ipairs(ranks) do
        if v.name == myName then
            return i
        end
    end
end
--接收请求
function ShaChengZhanShenBang.Request(actor)
    local lingQuList = Player.getJsonTableByVar(nil, VarCfg["A_排行榜领取记录"])
    local userId = getbaseinfo(actor, ConstCfg.gbase.id)
    if table.contains(lingQuList, userId) then
        Player.sendmsgEx(actor, string.format("你已经领取过了!#249"))
        return
    end
    local isTime = isTimeInRange(22, 04, 23, 00)
    if not isTime then
        Player.sendmsgEx(actor, string.format("请在|22:05-23:00#249|领取奖励!"))
        return
    end
    local Tdata = Player.getJsonTableByVar(nil, VarCfg["A_行会积分记录"])
    local gongshaRank = {}
    for i, v in pairs(Tdata) do
        for key, value in pairs(v) do
            table.insert(gongshaRank,
                {
                    name = key,
                    point = value
                }
            )
        end
    end
    --排序
    table.sort(gongshaRank, function(a, b)
        return a.point > b.point
    end)
    --只取前六名
    if #gongshaRank > 6 then
        for i = #gongshaRank, 7, -1 do
            table.remove(gongshaRank, i)
        end
    end
    --获取我的名字
    local myRank = checkMyRank(actor, gongshaRank)
    if not myRank then
        Player.sendmsgEx(actor, string.format("你没有在排行榜!#249"))
        return
    end
    local give = gives[myRank]
    if not give then
        Player.sendmsgEx(actor, string.format("获取奖励失败!#249"))
        return
    end
    Player.sendmsgEx(actor, string.format("你成功领取了第%d名奖励,请到邮件查收!#249", myRank))
    Player.giveMailByTable(userId, 1, "沙城战神榜", string.format("沙城战神榜第%d名奖励", myRank), { give }, 1, true)
    table.insert(lingQuList, userId)
    Player.setJsonVarByTable(nil, VarCfg["A_排行榜领取记录"], lingQuList)
end

--同步消息
-- function ShaChengZhanShenBang.SyncResponse(actor, logindatas)
--     local data = {}
--     local _login_data = {ssrNetMsgCfg.ShaChengZhanShenBang_SyncResponse, 0, 0, 0, data}
--     if logindatas then
--         table.insert(logindatas, _login_data)
--     else
--         Message.sendmsg(actor, ssrNetMsgCfg.ShaChengZhanShenBang_SyncResponse, 0, 0, 0, data)
--     end
-- end
-- --登录触发
-- local function _onLoginEnd(actor, logindatas)
--     ShaChengZhanShenBang.SyncResponse(actor, logindatas)
-- end
-- --事件派发
-- GameEvent.add(EventCfg.onLoginEnd, _onLoginEnd, ShaChengZhanShenBang)
--注册网络消息
Message.RegisterNetMsg(ssrNetMsgCfg.ShaChengZhanShenBang, ShaChengZhanShenBang)
return ShaChengZhanShenBang

meinvwudi

ShaChengZhanShenBangOBJ = {}
ShaChengZhanShenBangOBJ.__cname = "ShaChengZhanShenBangOBJ"
--ShaChengZhanShenBangOBJ.config = ssrRequireCsvCfg("cfg_ShaChengZhanShenBang")
ShaChengZhanShenBangOBJ.cost = { {} }
ShaChengZhanShenBangOBJ.give = {
    { "至尊宝箱", 1 },
    { "钻石宝箱", 1 },
    { "黄金宝箱", 1 },
    { "白银宝箱", 1 },
    { "白银宝箱", 1 },
    { "白银宝箱", 1 },
}
ShaChengZhanShenBangOBJ.eventName = "ShaChengZhanShenBangOBJ"
-------------------------------↓↓↓ UI操作 ↓↓↓---------------------------------------
function ShaChengZhanShenBangOBJ:main(objcfg)
    local parent = GUI:Win_Create(self.__cname, 0, 0, 0, 0, false, false, true, true, true, objcfg.NPCID)
    GUI:LoadExport(parent, objcfg.UI_PATH)
    self._parent = parent
    self.ui = GUI:ui_delegate(parent)
    ssrSetWidgetPosition(parent, self.ui.ImageBG, 2, -20)
    GUI:addOnClickEvent(self.ui.ImageBG, function()
        --ssrPrint("我是防点击穿透")
    end)
    --关闭按钮
    GUI:addOnClickEvent(self.ui.CloseButton, function()
        GUI:Win_Close(self._parent)
    end)
    -- 打开窗口缩放动画
    GUI:Timeline_Window1(self._parent)
    --网络消息示例
    GUI:addOnClickEvent(self.ui.Button_1, function()
        ssrMessage:sendmsg(ssrNetMsgCfg.ShaChengZhanShenBang_Request)
    end)
    self:UpdateUI()
end

function ShaChengZhanShenBangOBJ:UpdateUI()
    local gongshaData = Player:getServerVar("A1")
    local Tdata = SL:JsonDecode(gongshaData)
    if not Tdata then
        sendmsg9("暂无排名！#249")
    end
    local gongshaRank = {}
    for i, v in pairs(Tdata or {}) do
        for key, value in pairs(v) do
            table.insert(gongshaRank,
                    { name = key,
                      point = value
                    }
            )
        end
    end
    table.sort(gongshaRank, function(a, b)
        return a.point > b.point
    end)
        -- 限制排行榜显示数量，最多显示前6名
    -- 如果排行榜数据超过6条记录，则删除多余的记录
    if #gongshaRank > 6 then
        -- 从数组末尾开始，逆序删除第7名及以后的所有记录
        -- 循环从数组长度开始，到第7个位置结束，步长为-1
        for i = #gongshaRank, 7, -1 do
            table.remove(gongshaRank, i)  -- 移除指定索引位置的元素
        end
    end
    
    -- 遍历处理后的排行榜数据，为每个排名创建对应的UI显示元素
    for i, v in ipairs(gongshaRank) do
        -- 为每个排名项创建一个UI容器控件
        -- 参数说明：父容器、控件名称、x坐标、y坐标、宽度、高度
        local widget = GUI:Widget_Create(self.ui.ListView_1, "widget_" .. i, 0, 0, 670, 46)
        
        -- 加载排行榜单元格的UI模板
        GUI:LoadExport(widget, "A/ShaChengZhanShenBang_cell_UI")
        
        -- 获取UI控件的代理对象，用于后续操作UI元素
        local ui = GUI:ui_delegate(widget)
        
        -- 设置显示行会名称（Text_1控件显示排名项的名称）
        GUI:Text_setString(ui.Text_1, v.name)
        
        -- 设置显示积分数值（Text_1_1控件显示排名项的积分）
        GUI:Text_setString(ui.Text_1_1, v.point)
        
        -- 根据排名位置获取对应的奖励物品配置
        -- self.give[i] 对应该排名的奖励物品（如至尊宝箱、钻石宝箱等）
        local give = { self.give[i] }
        
        -- 在奖励面板中添加物品图标显示
        -- 参数：面板容器、物品数据、物品前缀名、显示配置（包含底图资源路径）
        ssrAddItemListX(ui.Panel_give, give, "item_", { imgRes = "res/custom/ShaChengZhanShenBang/item.png" })
    end
end

--显示左侧排行
-- 显示左侧排行榜的函数
-- @param ui UI界面对象，包含需要操作的UI控件
-- @param gongshaRank 攻沙排行榜数据数组，包含各行会的排名信息
function ShaChengZhanShenBangOBJ:LeftRankShow(ui, gongshaRank)
    -- 参数有效性检查：确保排行榜数据和UI对象都存在
    if not gongshaRank or not ui then
        return  -- 如果参数无效，直接返回，避免后续操作出错
    end
    
    -- 声明局部变量用于存储当前玩家的排名和积分
    local myRank, myPoint
    
    -- 获取当前登录玩家的用户名，用于在排行榜中查找自己的位置
    local userName = SL:GetMetaValue("USER_NAME")
    
    -- 清空左侧排行榜列表的所有现有项目，为重新加载数据做准备
    GUI:ListView_removeAllItems(ui.ListView_1)
    
    -- 遍历排行榜数据，为每个排名项创建UI显示元素
    for i, v in ipairs(gongshaRank) do
        -- 检查当前遍历的排名项是否为当前玩家
        if v.name == userName then
            myRank = i      -- 记录当前玩家的排名位置
            myPoint = v.point  -- 记录当前玩家的积分数值
        end
        
        -- 为每个排名项创建一个UI容器控件
        -- 参数说明：父容器、控件名称、x坐标、y坐标、宽度(200)、高度(22)
        local widget = GUI:Widget_Create(ui.ListView_1, "widget_" .. i, 0, 0, 200, 22)
        
        -- 加载攻沙排名单元格的UI模板
        GUI:LoadExport(widget, "A/GongShaRank_cell_UI")
        
        -- 获取UI控件的代理对象，用于操作单元格内的具体UI元素
        local left_ui = GUI:ui_delegate(widget)
        
        -- 设置排名序号显示（Text_1控件显示第几名）
        GUI:Text_setString(left_ui.Text_1, i)
        
        -- 注释掉的代码：原本用于设置行会名称的静态文本显示
        --GUI:Text_setString(left_ui.Text_2, v.name)
        
        -- 创建滚动文本控件来显示行会名称，支持长名称的滚动显示
        -- 参数：父容器、控件名、x坐标(46)、y坐标(2)、宽度(100)、高度(16)、颜色、显示文本
        local scrollText = GUI:ScrollText_Create(left_ui.Image_1, "scrollText", 46, 2, 100, 16, "#C7BB99", v.name)
        
        -- 为滚动文本添加黑色描边效果，增强文字的可读性
        GUI:ScrollText_enableOutline(scrollText, "#000000", 1)
        
        -- 设置积分数值显示（Text_3控件显示该行会的积分）
        GUI:Text_setString(left_ui.Text_3, v.point)
    end
    
    -- 设置当前玩家的排名显示
    -- 如果玩家在排行榜中则显示实际排名，否则显示0
    GUI:Text_setString(ui.Text_MyRank, myRank or 0)
    
    -- 设置当前玩家的积分显示
    -- 如果玩家在排行榜中则显示实际积分，否则显示"未上榜"
    GUI:Text_setString(ui.Text_MyPoint, myPoint or "未上榜")

end
function ShaChengZhanShenBangOBJ:UpdateLeftRank()
    if SL:GetMetaValue("KFSTATE") then
        return
    end
    local obj = GUI:Win_FindParent(110)
    local left_bg = GUI:getChildByName(obj, "left_bg")
    if GUI:Win_IsNotNull(left_bg) then
        local ui = GUI:ui_delegate(left_bg)
        local gongshaData = Player:getServerVar("A1")
        local Tdata = SL:JsonDecode(gongshaData)
        local gongshaRank = {}
        for i, v in pairs(Tdata or {}) do
            for key, value in pairs(v) do
                table.insert(gongshaRank,
                        { name = key,
                          point = value
                        }
                )
            end
        end
        table.sort(gongshaRank, function(a, b)
            return a.point > b.point
        end)
        self:LeftRankShow(ui, gongshaRank)
    end
end

SL:RegisterLUAEvent(LUA_EVENT_MAP_SIEGEAREA_CHANGE, ShaChengZhanShenBangOBJ.eventName, function(bool)
    --如果在跨服里面，不显示数据。
    if SL:GetMetaValue("KFSTATE") then
        return
    end
    local obj = GUI:Win_FindParent(110)
    if bool then
        GUI:removeChildByName(obj, "left_bg")
        GUI:LoadExport(obj, "A/GongShaRankUI")
        local ui = GUI:ui_delegate(obj)
        --先执行一次
        ShaChengZhanShenBangOBJ:UpdateLeftRank()
        GUI:schedule(ui.left_bg, function()
            ShaChengZhanShenBangOBJ:UpdateLeftRank()
        end, 3)
    else
        GUI:removeChildByName(obj, "left_bg")
    end
end)

--SL:RegisterLUAEvent(LUA_EVENT_SERVER_VALUE_CHANGE, ShaChengZhanShenBangOBJ.eventName, function(t)
--    local obj = GUI:Win_FindParent(110)
--    local left_bg = GUI:getChildByName(obj, "left_bg")
--    if GUI:Win_IsNotNull(left_bg) then
--        if t.key == "A1" then
--            local Tdata = SL:JsonDecode(t.value)
--            local gongshaRank = {}
--            for i, v in pairs(Tdata) do
--                for key, value in pairs(v) do
--                    table.insert(gongshaRank,
--                            { name = key,
--                              point = value
--                            }
--                    )
--                end
--            end
--            table.sort(gongshaRank, function(a, b)
--                return a.point > b.point
--            end)
--            if #gongshaRank > 6 then
--                for i = #gongshaRank, 7, -1 do
--                    table.remove(gongshaRank, i)
--                end
--            end
--            for i, v in ipairs(gongshaRank) do
--                SL:dump(i)
--                local widget = GUI:Widget_Create(self.ui.ListView_1, "widget_" .. i, 0, 0, 670, 46)
--                GUI:LoadExport(widget, "A/ShaChengZhanShenBang_cell_UI")
--                local ui = GUI:ui_delegate(widget)
--                GUI:Text_setString(ui.Text_1, v.name)
--                GUI:Text_setString(ui.Text_1_1, v.point)
--                local give = { self.give[i] }
--                ssrAddItemListX(ui.Panel_give, give, "item_", { imgRes = "res/custom/ShaChengZhanShenBang/item.png" })
--            end
--
--        end
--    end
--end)
-------------------------------↓↓↓ 网络消息 ↓↓↓---------------------------------------
function ShaChengZhanShenBangOBJ:SyncResponse(arg1, arg2, arg3, data)
    if GUI:GetWindow(nil, self.__cname) then
        self:UpdateUI()
    end
end
return ShaChengZhanShenBangOBJ

meinvwudi

local ui = {}
local _V = function(v) return SL:GetMetaValue(v) end
local FUNCQUEUE = {}
local TAGOBJ = {}

function ui.init(parent, __data__, __update__)
	if __update__ then return ui.update(__data__) end
	-- Create ImageBG
	local ImageBG = GUI:Image_Create(parent, "ImageBG", 8.00, 38.00, "res/custom/ShaChengZhanShenBang/bg.png")
	GUI:setAnchorPoint(ImageBG, 0.00, 0.00)
	GUI:setTouchEnabled(ImageBG, false)
	GUI:setTag(ImageBG, -1)

	-- Create CloseButton
	local CloseButton = GUI:Button_Create(ImageBG, "CloseButton", 986.00, 460.00, "res/public/1900000510.png")
	GUI:Button_loadTexturePressed(CloseButton, "res/public/1900000511.png")
	GUI:Button_setTitleText(CloseButton, [[]])
	GUI:Button_setTitleColor(CloseButton, "#ffffff")
	GUI:Button_setTitleFontSize(CloseButton, 14)
	GUI:Button_titleEnableOutline(CloseButton, "#000000", 1)
	GUI:setAnchorPoint(CloseButton, 0.00, 0.00)
	GUI:setTouchEnabled(CloseButton, true)
	GUI:setTag(CloseButton, -1)

	-- Create Button_1
	local Button_1 = GUI:Button_Create(ImageBG, "Button_1", 761.00, 53.00, "res/custom/ShaChengZhanShenBang/btn.png")
	GUI:Button_setTitleText(Button_1, [[]])
	GUI:Button_setTitleColor(Button_1, "#ffffff")
	GUI:Button_setTitleFontSize(Button_1, 16)
	GUI:Button_titleEnableOutline(Button_1, "#000000", 1)
	GUI:setAnchorPoint(Button_1, 0.00, 0.00)
	GUI:setTouchEnabled(Button_1, true)
	GUI:setTag(Button_1, 0)

	-- Create ListView_1
	local ListView_1 = GUI:ListView_Create(ImageBG, "ListView_1", 285.00, 148.00, 678, 281, 1)
	GUI:setAnchorPoint(ListView_1, 0.00, 0.00)
	GUI:setTouchEnabled(ListView_1, true)
	GUI:setTag(ListView_1, 0)

	ui.update(__data__)
	return ImageBG
end

function ui.update(data)
	for _, func in pairs(FUNCQUEUE) do
		if func then func(data) end
	end
end

return ui

meinvwudi

local ui = {}
local _V = function(v) return SL:GetMetaValue(v) end
local FUNCQUEUE = {}
local TAGOBJ = {}

function ui.init(parent, __data__, __update__)
	if __update__ then return ui.update(__data__) end
	-- Create Panel_1
	local Panel_1 = GUI:Layout_Create(parent, "Panel_1", 0.00, 0.00, 670, 46, false)
	GUI:setAnchorPoint(Panel_1, 0.00, 0.00)
	GUI:setTouchEnabled(Panel_1, true)
	GUI:setTag(Panel_1, 0)

	-- Create Text_1
	local Text_1 = GUI:Text_Create(Panel_1, "Text_1", 53.00, 12.00, 18, "#ecda3e", [[文本]])
	GUI:setAnchorPoint(Text_1, 0.00, 0.00)
	GUI:setTouchEnabled(Text_1, false)
	GUI:setTag(Text_1, 0)
	GUI:Text_enableOutline(Text_1, "#000000", 1)

	-- Create Text_1_1
	local Text_1_1 = GUI:Text_Create(Panel_1, "Text_1_1", 305.00, 12.00, 18, "#ecda3e", [[文本]])
	GUI:setAnchorPoint(Text_1_1, 0.00, 0.00)
	GUI:setTouchEnabled(Text_1_1, false)
	GUI:setTag(Text_1_1, 0)
	GUI:Text_enableOutline(Text_1_1, "#000000", 1)

	-- Create Panel_give
	local Panel_give = GUI:Layout_Create(Panel_1, "Panel_give", 551.00, 5.00, 41, 38, false)
	GUI:setAnchorPoint(Panel_give, 0.00, 0.00)
	GUI:setTouchEnabled(Panel_give, true)
	GUI:setTag(Panel_give, 0)

	ui.update(__data__)
	return Panel_1
end

function ui.update(data)
	for _, func in pairs(FUNCQUEUE) do
		if func then func(data) end
	end
end

return ui

meinvwudi

local ui = {}
local _V = function(v) return SL:GetMetaValue(v) end
local FUNCQUEUE = {}
local TAGOBJ = {}

function ui.init(parent, __data__, __update__)
	if __update__ then return ui.update(__data__) end
	-- Create left_bg
	local left_bg = GUI:Image_Create(parent, "left_bg", 0.00, 0.00, "res/custom/ShaChengZhanShenBang/left_top_bg.png")
	GUI:setAnchorPoint(left_bg, 0.00, 0.00)
	GUI:setTouchEnabled(left_bg, false)
	GUI:setTag(left_bg, 0)

	-- Create Text_MyRank
	local Text_MyRank = GUI:Text_Create(left_bg, "Text_MyRank", 60.00, 1.00, 14, "#eedd23", [[]])
	GUI:setAnchorPoint(Text_MyRank, 0.00, 0.00)
	GUI:setTouchEnabled(Text_MyRank, false)
	GUI:setTag(Text_MyRank, 0)
	GUI:Text_enableOutline(Text_MyRank, "#000000", 1)

	-- Create Text_MyPoint
	local Text_MyPoint = GUI:Text_Create(left_bg, "Text_MyPoint", 147.00, 1.00, 14, "#eedd23", [[]])
	GUI:setAnchorPoint(Text_MyPoint, 0.00, 0.00)
	GUI:setTouchEnabled(Text_MyPoint, false)
	GUI:setTag(Text_MyPoint, 0)
	GUI:Text_enableOutline(Text_MyPoint, "#000000", 1)

	-- Create ListView_1
	local ListView_1 = GUI:ListView_Create(left_bg, "ListView_1", 0.00, 20.00, 200, 143, 1)
	GUI:ListView_setBounceEnabled(ListView_1, true)
	GUI:setAnchorPoint(ListView_1, 0.00, 0.00)
	GUI:setTouchEnabled(ListView_1, true)
	GUI:setTag(ListView_1, 0)

	ui.update(__data__)
	return left_bg
end

function ui.update(data)
	for _, func in pairs(FUNCQUEUE) do
		if func then func(data) end
	end
end

return ui

meinvwudi

local ui = {}
local _V = function(v) return SL:GetMetaValue(v) end
local FUNCQUEUE = {}
local TAGOBJ = {}

function ui.init(parent, __data__, __update__)
	if __update__ then return ui.update(__data__) end
	-- Create Panel_1
	local Panel_1 = GUI:Layout_Create(parent, "Panel_1", 0.00, 0.00, 200, 22, false)
	GUI:setAnchorPoint(Panel_1, 0.00, 0.00)
	GUI:setTouchEnabled(Panel_1, true)
	GUI:setTag(Panel_1, 0)

	-- Create Image_1
	local Image_1 = GUI:Image_Create(Panel_1, "Image_1", 0.00, 0.00, "res/custom/ShaChengZhanShenBang/line_bg.png")
	GUI:setAnchorPoint(Image_1, 0.00, 0.00)
	GUI:setTouchEnabled(Image_1, false)
	GUI:setTag(Image_1, 0)

	-- Create Text_1
	local Text_1 = GUI:Text_Create(Image_1, "Text_1", 12.00, 2.00, 14, "#d8d7cb", [[文本]])
	GUI:setAnchorPoint(Text_1, 0.00, 0.00)
	GUI:setTouchEnabled(Text_1, false)
	GUI:setTag(Text_1, 0)
	GUI:Text_enableOutline(Text_1, "#000000", 1)

	-- Create Text_2
	local Text_2 = GUI:Text_Create(Image_1, "Text_2", 46.00, 2.00, 14, "#c7bb99", [[文本]])
	GUI:setAnchorPoint(Text_2, 0.00, 0.00)
	GUI:setTouchEnabled(Text_2, false)
	GUI:setTag(Text_2, 0)
	GUI:setVisible(Text_2, false)
	GUI:Text_enableOutline(Text_2, "#000000", 1)

	-- Create Text_3
	local Text_3 = GUI:Text_Create(Image_1, "Text_3", 150.00, 2.00, 14, "#ebad4c", [[文本]])
	GUI:setAnchorPoint(Text_3, 0.00, 0.00)
	GUI:setTouchEnabled(Text_3, false)
	GUI:setTag(Text_3, 0)
	GUI:Text_enableOutline(Text_3, "#000000", 1)

	ui.update(__data__)
	return Panel_1
end

function ui.update(data)
	for _, func in pairs(FUNCQUEUE) do
		if func then func(data) end
	end
end

return ui