EQ2EMu/server/Spells/Priest/Cleric/MarkofPawns.lua

--[[
    Script Name    : Spells/Priest/Cleric/MarkofPawns.lua
    Script Author  : neatz09
    Script Date    : 2020.11.10 10:11:52
    Script Purpose : 
                   : 
--]]

-- Decreases Mitigation of target vs arcane damage by 168
-- When damaged with a melee weapon this spell has a 20% chance to cast Mark of Nobility on target's attacker.  Lasts for 8.0 seconds.  
--     Heals target for 6 instantly and every 2 seconds

function cast(Caster, Target, Mit, Healz, Chance)
    AddSpellBonus(Target, 203, Mit)
	AddProc(Target, 16, Chance)
end

function proc(Caster, Target, Type, Mit, Healz, Chance)
	Spell = GetSpell(5449, GetSpellTier())
		if Type == 16 then
			SetSpellDataIndex(Spell, 0, Healz)
				CastCustomSpell(Spell, Caster, Target)
					end
end

function remove(Caster, Target)
	RemoveSpellBonus(Target)
	RemoveProc(Target)
end