【框架设计】转职系统：职业变更与技能重置

---转职：50000 金币加转职卡
local COST_GOLD = 50000

function JobChange.run(actor, newJob)
    local player = getplayerbyname(actor)
    if not player then return false end
    local oldJob = getplayvar(player, 2, "Job")
    if oldJob == newJob then
        sendmsg(player, 1, "已是该职业")
        return false
    end
    if not checkitemw(player, "转职卡", 1) then
        sendmsg(player, 1, "需要转职卡")
        return false
    end
    if not Engrave.takeGold(player, COST_GOLD) then
        sendmsg(player, 1, "金币不足，需 5 万")
        return false
    end
    takeitem(player, "转职卡", 1, 0, "转职消耗")
    -- 清旧职业技能，学新职业技能
    for _, s in ipairs(JOB_SKILLS[oldJob]) do
        delskill(player, getskillindex(s))
    end
    for _, s in ipairs(JOB_SKILLS[newJob]) do
        addskill(player, getskillindex(s))
    end
    setplayvar(player, "HUMAN", "Job", newJob, 1)
    QF_Broadcast(player:GetName() .. " 转职成为 " ..
        JOB_NAME[newJob] .. "！")
    return true
end

---职业专属装备的处理
function JobChange.equipCheck(player, oldJob)
    local conflicts = {}
    for slot = 1, 12 do
        local item = JobChange.equippedOf(player, slot)
        if item then
            local def = JobChange.defOf(item)
            if def.job and def.job ~= getplayvar(player, 2, "Job") then
                conflicts[#conflicts + 1] = slot
            end
        end
    end
    -- 专属装备转入背包，玩家自行处置
    for _, slot in ipairs(conflicts) do
        JobChange.unequipToBag(player, slot)
    end
    if #conflicts > 0 then
        sendmsg(player, 1, #conflicts ..
            " 件职业装备已转入背包，请重新搭配")
    end
end