【进阶实战】临时称号：到期回收与续期封装

local function grantTitle(actor, days)
    actor = getplayerbyname(actor)
    local now = os.time()
    local oldEnd = tonumber(getplayvar(actor, "HUMAN", "TitleEnd")) or 0
    local newEnd = (oldEnd > now and oldEnd or now) + days * 86400
    setplayvar(actor, "HUMAN", "TitleEnd", newEnd, 1)
    setplayvar(actor, "HUMAN", "TitleName", "沙巴克功勋", 1)
    setontimer(actor, 31, newEnd - now, 1, 1)
    sendmsg(actor, 1, "称号[沙巴克功勋]已生效，剩余 " .. (newEnd - now) .. " 秒。")
end

local function ontimer31(actor)
    actor = getplayerbyname(actor)
    local endAt = tonumber(getplayvar(actor, "HUMAN", "TitleEnd")) or 0
    if os.time() < endAt then
        setontimer(actor, 31, endAt - os.time(), 1, 1)
        return
    end
    setplayvar(actor, "HUMAN", "TitleName", "", 1)
    setplayvar(actor, "HUMAN", "TitleEnd", 0, 1)
    sendmsg(actor, 1, "称号[沙巴克功勋]已到期收回。")
end