帮会周工资：底薪加贡献分成的每周发放

; salary.txt 周薪配置
底薪=3000        在册天数=3
资金池比例=60%   发放=周一0点
单周封顶=20000   需周贡献>0

local function payWeek(guild)
    local pool = math.floor(
        (getsysvar("fund_" .. guild) or 0) * 0.6)
    local list, sum = {}, 0
    for name in string.gmatch(
        getsysvar("members_" .. guild) or "", "[^|]+") do
        local c = getsysvar("contri_" .. name) or 0
        if c > 0 then
            list[#list + 1] = {name, c}
            sum = sum + c
        end
    end
    for _, m in ipairs(list) do
        local pay = 3000 + math.floor(pool * m[2] / sum)
        giveitem(getplayerbyname(m[1]), 9021,
            math.min(pay, 20000))
    end
end