【引擎触发】行会任务：行会周任务的协作与进度共享引擎实现

---killmon: 击杀触发，汇入行会周任务进度
function killmon(actor, monName)
    local gid = getplayvar(actor, 2, "GuildId")
    if gid == nil or gid == "" then return end
    local key = "GW_" .. gid .. "_" .. os.date("%Y%W")
    local done = tonumber(getplayvar(actor, 2, key)) or 0
    if done >= 10000 then return end
    setplayvar(actor, 2, key, math.min(done + 1, 10000), 0)
    if done + 1 == 10000 then
        QF_Broadcast("行会周任务【全帮击杀】达成！")
    end
end

---达成后全员邮件发放：入会时间定折扣
function GuildWeekly.claim(actor)
    local key = "GWC_" .. os.date("%Y%W")
    if (getplayvar(actor, 2, key) or "") ~= "" then
        sendmsg(actor, 1, "本周已领取")
        return false
    end
    local joinWeek = getplayvar(actor, 2, "JoinWeek")
    local rate = (joinWeek == os.date("%Y%W")) and 0.7 or 1
    setplayvar(actor, "HUMAN", key, os.time(), 1)
    sendmail(actor:GetUserId(), 8004, "行会周任务奖励",
        "感谢为本周行会目标出力", "行会补给箱|" ..
        math.floor(3 * rate))
    sendmsg(actor, 1, "领取成功：行会补给箱 x" .. math.floor(3 * rate))
    return true
end