【进阶实战】兽栏栏位：宠物出战队列的切换封装

local CAP_BASE = 3
local function switchPet(actor, slotNo)
    local cap = CAP_BASE + (tonumber(getplayvar(actor, 1, "StableExt")) or 0)
    if slotNo < 1 or slotNo > cap then
        sendmsg(actor, 1, "栏位不足，先去扩容。")
        return
    end
    local current = getplayvar(actor, 1, "ActivePet")
    setplayvar(actor, 1, "ActivePet", slotNo, 1)
    setplayvar(actor, 1, "RestPet_" .. tostring(current), 1, 0)
    sendmsg(actor, 1, "已切换出战宠物为 " .. slotNo .. " 号栏。")
end

local function restTick(actor)
    local resting = tostring(getplayvar(actor, 1, "RestList") or "")
    for slot in string.gmatch(resting, "[^;]+") do
        local sp = tonumber(getplayvar(actor, 1, "PetSP_" .. slot)) or 0
        setplayvar(actor, 1, "PetSP_" .. slot, math.min(sp + 5, 100), 0)
    end
end