【进阶实战】宠物寄养：离线寄养与按时取回接口

local player = class(actor)
local FEE_PER_DAY = 2000
local function checkInPet(player, petId, days)
    if days < 3 or days > 90 then
        sendmsg(player, 1, 0, "寄养时长限 3 到 90 天。")
        return
    end
    local feeGold = FEE_PER_DAY * days
    local bags = math.ceil(feeGold / 10000)
    if not checkitemw(player, "金条", bags) then
        sendmsg(player, 1, 0, "保管费不足：共需 " .. feeGold .. " 金币。")
        return
    end
    takeitem(player, "金条", bags)
    setplayvar(player, "HUMAN", "Kennel_" .. petId, os.date("%Y%m%d") .. "|" .. days, true)
    setplayvar(player, "HUMAN", "PetLock_" .. petId, 1, true)
    sendmsg(player, 1, 0, petId .. " 已入住寄养棚 " .. days .. " 天，资质锁定。")
end

local player = class(actor)
local function checkOutPet(player, petId)
    local record = getplayvar(player, "HUMAN", "Kennel_" .. petId) or ""
    local inDate, days = string.match(record, "(%d+)|(%d+)")
    if inDate == nil then
        sendmsg(player, 1, 0, "该宠物不在寄养棚。")
        return
    end
    local elapsed = math.floor((os.time() - stampOf(inDate)) / 86400)
    local diff = tonumber(days) - elapsed
    if diff < 0 then
        sendmsg(player, 1, 0, "超期 " .. (0 - diff) .. " 天，补缴保管费后取回。")
        return
    end
    local refund = math.floor(diff * 2000 / 10000)
    if refund > 0 then
        giveitem(player, "金条", refund)
    end
    setplayvar(player, "HUMAN", "Kennel_" .. petId, "", true)
    setplayvar(player, "HUMAN", "PetLock_" .. petId, "", true)
    sendmsg(player, 1, 0, "取回成功，圣兽白虎资质完好，退还金条 " .. refund .. " 根。")
end