【进阶实战】宠物炼骨：材料消耗与属性成长封装

local BONE_MAX = 10
local function boneCost(lv)
    return 2 ^ lv
end
local function refineBone(actor)
    actor = getplayerbyname(actor)
    local lv = tonumber(getplayvar(actor, "HUMAN", "PetBoneLv")) or 0
    if lv >= BONE_MAX then
        sendmsg(actor, 1, "炼骨已达 10 级上限。")
        return false
    end
    local cost = boneCost(lv + 1)
    if not takeitem(actor, "黑铁矿石", cost, 0, "宠物炼骨") then
        sendmsg(actor, 1, "黑铁矿石不足，本级需要 " .. cost .. " 块。")
        return false
    end
    if not takeitem(actor, "炼骨符", 1, 0, "宠物炼骨") then
        giveitem(actor, "黑铁矿石", cost, 0, "炼骨返还")
        sendmsg(actor, 1, "缺少炼骨符，材料已返还。")
        return false
    end
    setplayvar(actor, "HUMAN", "PetBoneLv", lv + 1, 1)
    recalcPetAttr(actor)
    sendmsg(actor, 1, "炼骨成功，当前 " .. (lv + 1) .. " 级，攻击 +5 生命 +30。")
    return true
end

local function recalcPetAttr(actor)
    local lv = tonumber(getplayvar(actor, "HUMAN", "PetBoneLv")) or 0
    local atk = 50 + lv * 5
    local hp = 800 + lv * 30
    setplayvar(actor, "HUMAN", "PetAtk", atk, 1)
    setplayvar(actor, "HUMAN", "PetHp", hp, 1)
end