幸运项链

meinvwudi

local ui = {}
function ui.init(parent)
	-- Create ImageBG
	local ImageBG = GUI:Image_Create(parent, "ImageBG", 0.00, 0.00, "res/custom/xingyunxianglian/jm_01.png")
	GUI:setTouchEnabled(ImageBG, false)
	GUI:setTag(ImageBG, -1)

	-- Create CloseLayout
	local CloseLayout = GUI:Layout_Create(ImageBG, "CloseLayout", 1000.00, 499.00, 75.00, 75.00, false)
	GUI:setTouchEnabled(CloseLayout, false)
	GUI:setTag(CloseLayout, -1)

	-- Create CloseButton
	local CloseButton = GUI:Button_Create(CloseLayout, "CloseButton", 14.00, 13.00, "res/custom/xingyunxianglian/close.png")
	GUI:Button_setTitleText(CloseButton, "")
	GUI:Button_setTitleColor(CloseButton, "#ffffff")
	GUI:Button_setTitleFontSize(CloseButton, 14)
	GUI:Button_titleEnableOutline(CloseButton, "#000000", 1)
	GUI:setTouchEnabled(CloseButton, true)
	GUI:setTag(CloseButton, -1)

	-- Create xingyunlooks
	local xingyunlooks = GUI:Text_Create(ImageBG, "xingyunlooks", 460.00, 359.00, 18, "#ffff00", [[]])
	GUI:setTouchEnabled(xingyunlooks, false)
	GUI:setTag(xingyunlooks, -1)
	GUI:Text_enableOutline(xingyunlooks, "#000000", 1)

	-- Create EquipShow
	local EquipShow = GUI:EquipShow_Create(ImageBG, "EquipShow", 414.00, 276.00, 3, false, {look = true, bgVisible = false, starLv = false})
	GUI:setTag(EquipShow, -1)
	GUI:setSwallowTouches(EquipShow, true)
	GUI:EquipShow_setAutoUpdate(EquipShow)

	-- Create TextLeiJi
	local TextLeiJi = GUI:Text_Create(ImageBG, "TextLeiJi", 621.00, 106.00, 18, "#f7e700", [[1111]])
	GUI:setAnchorPoint(TextLeiJi, 0.50, 0.50)
	GUI:setTouchEnabled(TextLeiJi, false)
	GUI:setTag(TextLeiJi, -1)
	GUI:Text_enableOutline(TextLeiJi, "#000000", 1)

	-- Create itmename
	local itmename = GUI:Text_Create(ImageBG, "itmename", 445.00, 242.00, 16, "#10ff00", [[未佩戴项链]])
	GUI:setAnchorPoint(itmename, 0.50, 0.50)
	GUI:setTouchEnabled(itmename, false)
	GUI:setTag(itmename, -1)
	GUI:Text_enableOutline(itmename, "#000000", 1)

	-- Create ButtonXingYun12
	local ButtonXingYun12 = GUI:Button_Create(ImageBG, "ButtonXingYun12", 361.00, 153.00, "res/custom/xingyunxianglian/an_02.png")
	GUI:Button_setScale9Slice(ButtonXingYun12, 55, 55, 18, 18)
	GUI:setContentSize(ButtonXingYun12, 165, 54)
	GUI:setIgnoreContentAdaptWithSize(ButtonXingYun12, false)
	GUI:Button_setTitleText(ButtonXingYun12, "")
	GUI:Button_setTitleColor(ButtonXingYun12, "#ffffff")
	GUI:Button_setTitleFontSize(ButtonXingYun12, 14)
	GUI:Button_titleEnableOutline(ButtonXingYun12, "#000000", 1)
	GUI:setTouchEnabled(ButtonXingYun12, true)
	GUI:setTag(ButtonXingYun12, -1)

	-- Create ButtonStart
	local ButtonStart = GUI:Button_Create(ImageBG, "ButtonStart", 786.00, 86.00, "res/custom/xingyunxianglian/an_01.png")
	GUI:Button_setTitleText(ButtonStart, "")
	GUI:Button_setTitleColor(ButtonStart, "#ffffff")
	GUI:Button_setTitleFontSize(ButtonStart, 14)
	GUI:Button_titleEnableOutline(ButtonStart, "#000000", 1)
	GUI:setTouchEnabled(ButtonStart, true)
	GUI:setTag(ButtonStart, -1)

	-- Create expnum
	local expnum = GUI:Text_Create(ImageBG, "expnum", 826.00, 202.00, 16, "#ffffff", [[文本]])
	GUI:setTouchEnabled(expnum, false)
	GUI:setTag(expnum, -1)
	GUI:Text_enableOutline(expnum, "#000000", 1)

	-- Create ranlooks
	local ranlooks = GUI:Text_Create(ImageBG, "ranlooks", 826.00, 172.00, 16, "#ffffff", [[文本]])
	GUI:setTouchEnabled(ranlooks, false)
	GUI:setTag(ranlooks, -1)
	GUI:Text_enableOutline(ranlooks, "#000000", 1)
end
return ui

meinvwudi

local config = {
	[1] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 30000,
			},
		},
		successRate = 100,
		element1 = 0,
		element2 = 0,
	},
	[2] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 60000,
			},
		},
		successRate = 100,
		element1 = 0,
		element2 = 0,
	},
	[3] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 90000,
			},
		},
		successRate = 100,
		element1 = 0,
		element2 = 0,
	},
	[4] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 120000,
			},
		},
		successRate = 100,
		element1 = 0,
		element2 = 0,
	},
	[5] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 180000,
			},
		},
		successRate = 50,
		element1 = 0,
		element2 = 0,
	},
	[6] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 300000,
			},
		},
		successRate = 50,
		element1 = 100,
		element2 = 0,
	},
	[7] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 450000,
			},
		},
		successRate = 25,
		element1 = 200,
		element2 = 1,
	},
	[8] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 660000,
			},
		},
		successRate = 34,
		element1 = 300,
		element2 = 2,
	},
	[9] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 1260000,
			},
		},
		successRate = 25,
		element1 = 400,
		element2 = 3,
	},
	[10] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 2790000,
			},
		},
		successRate = 20,
		element1 = 500,
		element2 = 4,
	},
	[11] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 6420000,
			},
		},
		successRate = 10,
		element1 = 600,
		element2 = 5,
	},
	[12] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 17430000,
			},
		},
		successRate = 9,
		element1 = 1000,
		element2 = 6,
	},
	[13] = {
		moneynum = {
			[1] = {
				[1] = "金币",
				[2] = 99999999,
			},
		},
		successRate = 0,
		element1 = 1000,
		element2 = 6,
	},
}
return config

meinvwudi


XingYunXiangLianOBJ = {}        --定义一个表
XingYunXiangLianOBJ.__cname = "XingYunXiangLianOBJ"

XingYunXiangLianOBJ.config = ssrRequireCsvCfg("cfg_XingYunXiangLian") --变量config = cfg_XingYunXiangLian
XingYunXiangLianOBJ.costDaMi2 = { { "灵符", 2888 } }
-------------------------------↓↓↓ UI操作 ↓↓↓---------------------------------------

function XingYunXiangLianOBJ: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,0)
    GUI:addOnClickEvent(self.ui.ImageBG, function()
        --ssrPrint("我是防点击穿透")
    end)
    GUI:setTouchEnabled(self.ui.CloseLayout,true)
    --关闭背景
    GUI:addOnClickEvent(self.ui.CloseLayout, function()
        GUI:Win_Close(self._parent)
    end)

    --关闭按钮
    GUI:addOnClickEvent(self.ui.CloseButton, function()
        GUI:Win_Close(self._parent)
    end)

    GUI:addOnClickEvent(self.ui.ButtonStart, function()
        ssrMessage:sendmsg(ssrNetMsgCfg.XingYunXiangLian_Request)
    end)

    GUI:addOnClickEvent(self.ui.ButtonXingYun12, function()
        local data = {}
        data.str = "确认花费[2888灵符]直接升至幸运12？"
        data.btnType = 2
        data.callback = function(atype, param)
            if atype == 1 then
                ssrMessage:sendmsg(ssrNetMsgCfg.XingYunXiangLian_Request2)
            end
        end
        SL:OpenCommonTipsPop(data)
    end)
    
    -- 打开窗口缩放动画
    GUI:Timeline_Window1(self._parent)

    self:UpdateUI()
    ssrMessage:sendmsg(ssrNetMsgCfg.XingYunXiangLian_RequestSync)
end

function XingYunXiangLianOBJ:UpdateUI()
    -- 获取玩家装备位置3（项链位置）的装备名称
    xianglianname = Player:getEquipNameByPos(3)

    -- 获取当前幸运等级作为配置索引
    local index = self.XingYun

    -- 根据幸运等级获取对应的配置信息（索引+1是因为配置表从1开始）
    local Cfg = self.config[index+1]

    -- 更新界面显示：幸运等级文本
    GUI:Text_setString(self.ui.xingyunlooks,"幸运+"..self.XingYun)

    -- 更新界面显示：项链名称
    GUI:Text_setString(self.ui.itmename,xianglianname)

    -- 更新界面显示：累计次数（使用格式化确保显示为整数）
    GUI:Text_setString(self.ui.TextLeiJi,string.format("%d",self.conut))

    -- 初始化成功率显示字符串
    local successStr = ""

    -- 判断是否触发特殊成功率条件
    -- tjzrFlag == 1: 天眷之人状态激活
    -- todayFirst == 0: 今日首次操作
    if self.tjzrFlag == 1 and self.todayFirst == 0 then
        -- 特殊条件下显示100%成功率
        successStr = "100%(天眷之人生效)"
    else
        -- 正常情况下显示配置中的成功率
        successStr = Cfg.successRate.."%"
    end

    -- 更新界面显示：成功率文本
    GUI:Text_setString(self.ui.ranlooks,successStr)

    -- 更新界面显示：消耗金币数量
    GUI:Text_setString(self.ui.expnum,Cfg.moneynum[1][2].."金币")

    -- 清除所有按钮的红点提示
    delRedPoint(self.ui.ButtonStart)      -- 清除开始按钮红点
    delRedPoint(self.ui.ButtonXingYun12)  -- 清除幸运12按钮红点

    -- 如果幸运等级未达到最大值（12级），则检查并添加红点提示
    if index < 12 then
        -- 检查开始按钮是否需要红点（基于金币消耗）
        Player:checkAddRedPoint(self.ui.ButtonStart, Cfg.moneynum)
        
        -- 检查幸运12按钮是否需要红点（基于大米消耗）
        Player:checkAddRedPoint(self.ui.ButtonXingYun12, self.costDaMi2)
    end
end

function XingYunXiangLianOBJ:SyncResponse(arg1, arg2, arg3, data)
    self.XingYun = arg1
    self.conut = arg2
    self.tjzrFlag = arg3
    self.todayFirst = data[1]
    if GUI:GetWindow(nil, self.__cname) then
        self:UpdateUI()
    end
end

-------------------------------↓↓↓ 网络消息 ↓↓↓---------------------------------------

return XingYunXiangLianOBJ

meinvwudi

XingYunXiangLian = {}
local costDaMi2 = { { "灵符", 2888 } }

local config = include("QuestDiary/cfgcsv/cfg_XingYunXiangLian.lua") --幸运项链
function XingYunXiangLian.Request(actor)
    local itemobj = linkbodyitem(actor, 3)
    local xingYun = getplaydef(actor, VarCfg.U_xing_yun)
    local xingYunCount = getplaydef(actor, VarCfg.U_xing_yun_count)
    xingYun = xingYun + 1
    local cfg = config[xingYun]

    if itemobj == "0" then
        Player.sendmsgEx(actor, "提示#251|:#255|你未佩戴|项链#249|项链强化失败...")
        return
    end

    if xingYun == 13 then
        Player.sendmsgEx(actor, "提示#251|:#255|你|幸运#249|已强化到|12#249|无法继续强化...")
        GameEvent.push(EventCfg.onXingYunXiangLian,actor,12)
        return
    end
    local name, num = Player.checkItemNumByTable(actor, cfg.moneynum)
    if name then
        Player.sendmsgEx(actor, string.format("提示#251|:#255|你的|%s#249|,不足|%d枚#249|无法强化幸运...", name, num))
        return
    end

    Player.takeItemByTable(actor, cfg.moneynum, "幸运项链")

    setplaydef(actor, VarCfg.U_xing_yun_count, xingYunCount + 1)


    --判断天眷之人是否百分百成功
    local success = 0
    local tjzrFlag = getflagstatus(actor, VarCfg["F_天命_天眷之人标识"])
    local todayFirst = getplaydef(actor, VarCfg["J_天命天眷之人第一次"])

    -- 检查"天眷之人"特殊条件：拥有天眷之人标记且今日首次使用
    if tjzrFlag == 1 and todayFirst == 0 then
        -- 触发天眷之人特权：成功率设为100%（必定成功）
        success = 100
        -- 向玩家发送天眷之人触发提示消息
        Player.sendmsgEx(actor, "[天眷之人]触发,您的幸运项链成功率百分之百!")
        -- 标记玩家已使用过天眷之人特权（防止重复使用）
        setplaydef(actor, VarCfg["J_天命天眷之人第一次"], 1)
    else
        -- 普通情况：使用配置文件中的基础成功率
        success = cfg.successRate
    end

    -- 根据成功率进行随机判定强化结果
    if randomex(success) then
        -- 强化成功：保持当前幸运等级不变（xingYun已经+1）
        setplaydef(actor, VarCfg.U_xing_yun, xingYun)
        -- 发送成功消息：带颜色标记的富文本提示
        Player.sendmsgEx(actor, "提示#251|:#255|恭喜你,强化|成功#249|幸运增加|1#249|点...")
    else
        -- 强化失败：幸运等级下降2点（xingYun-2，相当于从原值-1）
        setplaydef(actor, VarCfg.U_xing_yun, xingYun - 2)
        -- 发送失败消息：带颜色标记的富文本提示
        Player.sendmsgEx(actor, "提示#251|:#255|对不起,强化|失败#249|幸运下降|1#249|点...")
    end

    if getplaydef(actor, VarCfg.U_xing_yun_count) >= 288 then
        setplaydef(actor, VarCfg.U_xing_yun, 12)
        Player.sendmsgEx(actor, "提示#251|:#255|恭喜你,强化次数|达到288次#249|幸运直接达到|12#249|点...")
    end
    GameEvent.push(EventCfg.onXingYunXiangLian,actor,getplaydef(actor, VarCfg.U_xing_yun))
    XingYunXiangLian.setNecklaceAttributes(actor) --设置项链属性
    XingYunXiangLian.SyncResponse(actor)          --同步一次消息
end

function XingYunXiangLian.Request2(actor)
    local itemobj = linkbodyitem(actor, 3)
    if itemobj == "0" then
        Player.sendmsgEx(actor, "强化幸运时请将项链佩戴在任务身上!#249")
        return
    end

    local xingYun = getplaydef(actor, VarCfg.U_xing_yun)
    if xingYun >= 12 then
        Player.sendmsgEx(actor, "提示#251|:#255|你|幸运#249|已强化到|12#249|无法继续强化...")
        return
    end

    local name, num = Player.checkItemNumByTable(actor, costDaMi2)
    if name then
        Player.sendmsgEx(actor, string.format("提示#251|:#255|,你的|%s#249|,不足|%d枚#249|无法强化幸运...", name, num))
        return
    end

    Player.takeItemByTable(actor, costDaMi2, "幸运项链+12")
    setplaydef(actor, VarCfg.U_xing_yun, 12)
    GameEvent.push(EventCfg.onXingYunXiangLian,actor,getplaydef(actor, VarCfg.U_xing_yun))
    messagebox(actor, "你的项链已经直接幸运强化+12!")
    XingYunXiangLian.setNecklaceAttributes(actor) --设置项链属性
    --同步一次消息
    XingYunXiangLian.SyncResponse(actor)
end

--响应消息同步
function XingYunXiangLian.RequestSync(actor)
    XingYunXiangLian.SyncResponse(actor)
end

--设置项链属性
function XingYunXiangLian.setNecklaceAttributes(actor, itemobj)
    -- 获取玩家当前的幸运等级
    local xingYun = getplaydef(actor, VarCfg.U_xing_yun)
    
    -- 如果没有传递物品对象，则获取玩家身上的项链（装备位置3）
    if not itemobj then
        itemobj = linkbodyitem(actor, 3)
    end
    
    -- 根据幸运等级获取对应的配置数据，如果没有配置则使用空表
    local cfg = config[xingYun] or {}
    
    -- 配置数据安全检查：如果配置不存在，重置幸运等级并设置默认属性值
    if not cfg then
        xingYun = 0
        cfg.element1 = 0  -- 设置默认属性1为0
        cfg.element2 = 0  -- 设置默认属性2为0
    end
    
    -- 为物品设置新的附加属性：
    -- 参数说明：actor=玩家, -2=操作类型,-2操作物品对象  "="=设置模式
    -- 属性格式："3#75#值|3#22#值|3#30#值" (装备类型#属性ID#属性值)
    -- 75=属性1, 22=属性2, 30=属性3，都使用配置中的element值 攻击伤害 暴击 体力
    setaddnewabil(actor, -2, "=",
        string.format("3#75#%d|3#22#%d|3#30#%d", cfg.element1 or 0, cfg.element2 or 0, cfg.element2 or 0), itemobj)
    
    -- 设置物品的附加数值：位置1，类型5，值为当前幸运等级
    setitemaddvalue(actor, itemobj, 1, 5, xingYun)
    
    -- 刷新物品显示，更新客户端物品信息
    refreshitem(actor, itemobj)
    
    -- 重新计算玩家的所有属性加成
    recalcabilitys(actor)
end

------------引擎出发↓↓↓--------------------------
local function _onTakeOnNecklace(actor, itemobj)
    XingYunXiangLian.setNecklaceAttributes(actor, itemobj)
end
local function _onTakeOffNecklace(actor, itemobj)
    --清空属性
        -- 获取玩家当前装备的项链（装备位置3）
    local itemobj1 = linkbodyitem(actor, 3)
    
    -- 调试输出语句（已注释）：用于打印两个物品对象的信息
    -- release_print(itemobj1, itemobj)
    
    -- 重置传入物品对象的幸运值：将位置1类型5的数值设为0
    setitemaddvalue(actor, itemobj, 1, 5, 0)
    
    -- 重置玩家身上项链的幸运值：将位置1类型5的数值设为0
    setitemaddvalue(actor, itemobj1, 1, 5, 0)
    
    -- 清除传入物品的所有附加属性：
    -- 参数说明：actor=玩家, -2=操作类型, "="=设置模式
    -- 属性格式："3#75#0|3#22#0|3#30#0" (装备类型#属性ID#属性值)
    -- 将所有相关属性（75、22、30）都设置为0，实现属性重置
    setaddnewabil(actor, -2, "=", string.format("3#75#%d|3#22#%d|3#30#%d", 0, 0, 0), itemobj)
    
    -- 刷新物品显示，更新客户端物品信息
    refreshitem(actor, itemobj)
    
    -- 重新计算玩家的所有属性加成
    recalcabilitys(actor)
end

--穿项链前出发
GameEvent.add(EventCfg.onTakeOnNecklace, _onTakeOnNecklace, XingYunXiangLian)

--脱下前项链出发
GameEvent.add(EventCfg.onTakeOffNecklace, _onTakeOffNecklace, XingYunXiangLian)


-------------网络消息↓↓↓--------------------------
Message.RegisterNetMsg(ssrNetMsgCfg.XingYunXiangLian, XingYunXiangLian)
--同步网络消息
function XingYunXiangLian.SyncResponse(actor, logindatas)
    local xingYun = getplaydef(actor, VarCfg.U_xing_yun)
    local xingYunCount = getplaydef(actor, VarCfg.U_xing_yun_count)
    local tjzrFlag = getflagstatus(actor, VarCfg["F_天命_天眷之人标识"]) --是否百分百成功
    local todayFirst = getplaydef(actor, VarCfg["J_天命天眷之人第一次"])
    local _login_data = { ssrNetMsgCfg.XingYunXiangLian_SyncResponse, xingYun, xingYunCount, tjzrFlag, { todayFirst } }
    if logindatas then
        table.insert(logindatas, _login_data)
    else
        Message.sendmsg(actor, ssrNetMsgCfg.XingYunXiangLian_SyncResponse, xingYun, xingYunCount, tjzrFlag, { todayFirst })
    end
end

--登录触发
local function _onLoginEnd(actor, logindatas)
    XingYunXiangLian.SyncResponse(actor, logindatas)
end
--事件派发
GameEvent.add(EventCfg.onLoginEnd, _onLoginEnd, XingYunXiangLian)



return XingYunXiangLian

meinvwudi

--幸运项链触发
-- 幸运项链事件处理函数：当玩家幸运项链等级变化时触发
local function _onXingYunXiangLian(actor, xingYunCount)
    -- 调试输出语句（已注释）：用于打印幸运项链触发信息和等级
    -- release_print("幸运项链触发",xingYunCount)
    
    -- 条件检查：幸运项链等级必须达到4级或以上才能触发奖励
    if xingYunCount < 4 then return end
    
    -- 配置奖励参数：第6天的第5个奖励项目
    local Day, Num = 6, "5"
    
    -- 获取玩家的牛马逆袭装扮列表缓存数据
    local Cahce_Tbl = NiuMaNiXi.GetZhuangBanList(actor)
    
    -- 检查指定奖励是否已经领取过
    if not Cahce_Tbl[Day][Num] then
        -- 设置奖励状态为"可领取"，解锁该奖励项目
        Cahce_Tbl[Day][Num] = "可领取"
        
        -- 将更新后的数据保存到玩家的服务器变量中
        -- 变量名格式："T_牛马逆袭6天"
        Player.setJsonVarByTable(actor, VarCfg["T_牛马逆袭".. Day .."天"], Cahce_Tbl[Day])
        
        -- 同步响应：通知客户端更新界面显示
        NiuMaNiXi.SyncResponse(actor)
    end
end

-- 注册游戏事件监听器：监听幸运项链等级变化事件
-- 当幸运项链等级发生变化时，自动调用 _onXingYunXiangLian 函数
GameEvent.add(EventCfg.onXingYunXiangLian, _onXingYunXiangLian, NiuMaNiXi)