-- Restore the original functionality of the dragon familiar as long as
-- he's sitting in the hireling slot.
-- Can be dropped into Scripts/Global

local DragonNPCId = 396

function events.GetSkill(t)
    if (t.Player.Class == const.Class.Warlock
        and Game.NPC[DragonNPCId].Hired
        and const.Skills.Fire <= t.Skill
        and t.Skill < const.Skills.Light)
    then
        local s, m = SplitSkill(t.Result)
        t.Result = JoinSkill(s + 3, m)
    end
end

function events.RegenTick(Player)
    if (Player.Class == const.Class.Warlock
        and Game.NPC[DragonNPCId].Hired)
    then
        Player.SP = math.min(Player:GetFullSP(), Player.SP + 1)
    end
end