狂暴之力NPC

admin

前端UI布局代码

Kuangbao = {}

local cfg_kuangbao = cfg_kuangbao

if cfg_kuangbao then 
    print("读取配置文件cfg_kuangbao成功")
else
    print("读取配置文件cfg_kuangbao失败")
end

local GUI_Parent = ""
local Btn_lingfu = nil

Kuangbao.main = function()
    --创建NPC窗口
    local _parent = GUI:Win_Create( "kuangbao", 0, 0, 0, 0, true, false, false, true)
    if _parent then
        GUI_Parent = _parent
        local winSize = SL:GetScreenSize()
        local x = winSize.width / 2
        local y = winSize.height / 2
        local w = winSize.width
        local h = winSize.height

        --设置关闭背景层
        local bg_close = GUI:Image_Create( _parent, "bg_close", 0, 0, "dev/res/01/010010.png")
        if bg_close then 
            GUI:setContentSize(bg_close, {width = w, height = h})
            GUI:setTouchEnabled(bg_close, true)
            GUI:addOnClickEvent(bg_close, function()
                GUI:Win_Close(_parent)
            end)
        end

        --设置NPC容器
        local layout = GUI:Layout_Create( _parent, "diban", x, y, 820, 570)
        if layout then 
            GUI:setAnchorPoint(layout, 0.5, 0.5)
            GUI:setPosition(layout, x, y)
        end

        --设置NPC的对话框图片
        local bg_Mbkuang = GUI:Image_Create( layout, "bg_Mbkuang", 0, 0, "dev/res/01/010000.png")
        if bg_Mbkuang then 
            GUI:setContentSize(bg_Mbkuang, {width = 815, height = 575})
            GUI:setTouchEnabled(bg_Mbkuang, true)
        end

        --设置关闭按钮
        local btn_close = GUI:Button_Create(layout, "btn_close", 725, 475, "dev/res/01/010008.png")
        -- local btn_close = GUI:Button_Create(layout, "btn_close", 725, 475, "dev/res/01/010008.png")
        if btn_close then 
            GUI:Button_loadTexturePressed(btn_close, "dev/res/01/010009.png")
            GUI:addOnClickEvent(btn_close, function()
                GUI:Win_Close(_parent)
            end)
        end

        --设置标题
        local text_title = GUI:Text_Create(layout, "text_title", 370, 510, 20, "#D6C6AD", "狂暴之力")

        --设置狂暴描述
        local str_list = cfg_kuangbao[1].desce
        local str = SL:Split(str_list, "<br>")
        for i=1, #str do
            local str1 = string.gsub(str[i], "\n", "")
            local star = GUI:Image_Create( layout, "star" .. i, 420, 420 - 35*(i-1), "dev/res/custom/mapmove/mapmove5.png")
            local intro = GUI:RichText_Create(layout, "intro" .. i, 450, 420 - 35*(i-1), str1, 300, 16, nil, nil)
        end

        --激活按钮
        local btn_lingfu = GUI:Button_Create( layout, "btn_lingfu", 500, 70, "dev/res/01/010005.png")
        if btn_lingfu then 
            GUI:Button_loadTexturePressed(btn_lingfu, "dev/res/01/010006.png")
            local text_btn_lingfu = GUI:Text_Create(btn_lingfu, "text_btn_lingfu", 53, 20, 16, "#D6C6AD", "灵符激活")
            GUI:setAnchorPoint(text_btn_lingfu, 0.5, 0.5)
            GUI:addOnClickEvent(btn_lingfu, function()
                Kuangbao.Active()
            end)
        end

        --

    end

end


Kuangbao.Active = function()
    SL:SubmitForm("G/狂暴", "Active")
end

Kuangbao.main()

admin

后端开启，扣除货币


lib996:include("Script/serialize.lua")
local cfg_kuangbao = lib996:include("QuestDiary/cfgcsv/cfg_kuangbao.lua")

--对应配置文档中的属性与cfg_att_score对不上，因此手动更改要加成的属性
local  shuxing = {
    [1] = {
        [1] = 1,--生命
        [2] = 10000,
    },
    [2] = {
        [1] = 29,--暴击几率
        [2] = 2000,
    },
    [3] = {
        [1] = 3,--魔法值
        [2] = 1000,
    },
}

local cost_id  = cfg_kuangbao[1]["cost"][1][1]
local cost_num = cfg_kuangbao[1]["cost"][1][2]
local cost_id2  = cfg_kuangbao[1]["cost"][2][1]
local cost_num2 = cfg_kuangbao[1]["cost"][2][2]

function openUI(actor)
    lib996:showformwithcontent(actor, "G/狂暴之力面板", "kuangbao")
end


function Active(actor)
    local param = lib996:getint(0, actor, "isActive")

    if tonumber(param) == 1 then 
        lib996:sendmsg(actor, 1, '{"Msg":"<font color=\'#ff0000\'>不能重复激活</font>", "Type":9}')
        return
    end
     --校验货币

    if not QsQcheckMoneyNum(actor, cost_id1, cost_num)  and not QsQcheckMoneyNum(actor, cost_id2, cost_num2) then
        lib996:sendmsg(actor, 1, '{"Msg":"<font color=\'#ff0000\'>灵符不足，无法激活</font>", "Type":9}')
        return
    end

    if shuxing then 
        for _, _item in ipairs (cfg_kuangbao[1]["cost"]) do
            local idx, num = _item[1], _item[2]
            if idx < 100 then 
                res = lib996:changemoney(actor, idx, "-", num, "狂暴扣货币", true )
                if res then 
                    lib996:sendmsg(actor, 1, '{Msg:"<font color=#ffff00>狂暴开启成功</font>", Type:9}')
                    lib996:setint(0, actor, "isActive", 1)
                    QsQupdateSomeAddr(actor, nil, shuxing)
                    lib996:showformwithcontent(actor,"G/狂暴之力面板", "kuangbao")
                    return
                end               
            end
        end
    end
    
end

admin

刷新属性脚本：Script\serialize.lua

--更新部分属性  cur_attr=需要扣除的属性，next_attr=需要加上的属性
function QsQupdateSomeAddr(actor, cur_attr, next_attr)
    local newattr = {}
    if cur_attr then
        for _,attr in ipairs(cur_attr) do
            local attridx, attrvalue = attr[1], attr[2]
            newattr[attridx] = newattr[attridx] or lib996:gethumnewvalue(actor, attridx)
            newattr[attridx] = newattr[attridx] - attrvalue
            if newattr[attridx] < 0 then newattr[attridx] = 0 end
        end
    end

    if next_attr then
        for _,attr in ipairs(next_attr) do
            local attridx, attrvalue = attr[1], attr[2]
            newattr[attridx] = newattr[attridx] or lib996:gethumnewvalue(actor, attridx)
            newattr[attridx] = newattr[attridx] + attrvalue
        end
    end

    --cfg_att_score.xls 属性
    for attridx,attrvalue in pairs(newattr) do
        lib996:changehumnewvalue(actor, attridx, attrvalue, 123456789)
    end
end

admin

QF人物死亡掉狂暴

GameEvent.add(EventCfg.onkillplay,KillerReword, "击杀奖励")

--击杀者奖励
function KillerReword(actor, player)
    local isActive = lib996:getint(0, player, "isActive")
    if isActive ~= 1 then return end
    local reward = {
        [1] = {
            [1] = 7,
            [2] = 2500,
        }
    }
    local idx,num = reward[1][1], reward[1][2]
    if idx <= 100 then
        lib996:changemoney(actor, idx, "+", num, "奖励货币", true)
        lib996:sendmsg(actor, 1, '{"Msg":"<font color=\'#ff0000\'>获得2500灵符</font>","Type":9}')
    end
    --被击杀后掉落狂暴
    local hour = os.date("*t").hour
    if hour < 8 or hour > 23 then return end --晚上11点至早上8点之间不掉落狂暴

    QsQupdateSomeAddr(player,shuxing, nil)

    lib996:setint(0, player, "isActive", 0)
    lib996:sendmsg(player, 1, '{"Msg":"<font color=\'#ff0000\'>狂暴之力消失</font>","Type":9}')
end