帮会少主：三项历练的继位考核

local function heirProgress(actor)
    local a = (getplayvar(actor, "heirRaid") or 0) >= 1
    local b = (getplayvar(actor, "contribute") or 0) >= 5000
    local c = (getplayvar(actor, "heirWar") or 0) >= 2
    if a and b and c then
        setplayvar(actor, "heirDone", 1)
        sendmsg(actor, 1, "历练完成，可正式继位")
    else
        sendmsg(actor, 1,
            "历练未齐：剿山寨、捐 5000、出战 2 场")
    end
end

local function heirSucceed(actor, guild)
    if (getplayvar(actor, "heirDone") or 0) ~= 1 then
        sendmsg(actor, 1, "历练未完成，暂不授职")
        return
    end
    setsysvarex("heir_" .. guild,
        getplayvar(actor, "NAME"))
    sendcentermsg(0, getplayvar(actor, "NAME")
        .. " 正式继任少主")
end