帮会点将：帮战阵容的每周票选

local function vote(actor, candidate)
    local wk = os.date("%G%V")
    local voted = getplayvar(actor, "myVote" .. wk)
    if voted ~= nil and voted ~= "" then
        sendmsg(actor, 1, "本周已投过票")
        return
    end
    setplayvar(actor, "myVote" .. wk, candidate)
    local key = "vote" .. wk .. "_" .. candidate
    setsysvarex(key, (getsysvar(key) or 0) + 1)
    sendmsg(actor, 1, "已投给 " .. candidate)
end

local function pickTwenty(guild)
    local wk = os.date("%G%V")
    local list = {}
    for name in string.gmatch(
        getsysvar("members_" .. guild) or "", "[^|]+") do
        list[#list + 1] = {
            name, getsysvar("vote" .. wk .. "_" .. name) or 0}
    end
    table.sort(list, function(a, b) return a[2] > b[2] end)
    for i = 1, math.min(#list, 20) do
        setsysvarex("lineup_" .. guild,
            (getsysvar("lineup_" .. guild) or "")
            .. list[i][1] .. "|")
    end
end