【后端接口】帮派工资：成员周薪的结算接口

-- 帮派工资：贡献分配
local player = class(actor)
local WEEKLY_TOTAL = 200000
local LEADER_ALLOWANCE = 30000
local function calcWages(player, memberList)
    local totalContrib = 0
    for _, m in ipairs(memberList) do
        totalContrib = totalContrib + (m.contrib or 0)
    end
    for _, m in ipairs(memberList) do
        local share = totalContrib > 0 and
            math.floor((WEEKLY_TOTAL - LEADER_ALLOWANCE) * m.contrib / totalContrib) or 0
        local mate = class(m.name)
        setplayvar(mate, "HUMAN", "WeekWage", share, true)
    end
end

-- 帮派工资：自动发放
local player = class(actor)
local function payWages(player, memberList)
    for _, m in ipairs(memberList) do
        local wage = tonumber(getplayvar(class(m.name), "HUMAN", "WeekWage") or 0)
        if wage > 0 then
            giveitem(class(m.name), "金币袋", math.floor(wage / 10000))
            setsysvarex("WageLog_" .. os.date("%Y%W"),
                (getsysvar("WageLog_" .. os.date("%Y%W")) or "") ..
                m.name .. "=" .. wage .. ";", true)
        end
    end
    sendmsg(player, 1, 0, "本周帮派工资已全部发放。")
end