9
3

Lich.lua 1.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940
  1. --[[
  2. Script Name : Spells/Mage/Summoner/Necromancer/Lich.lua
  3. Script Author : neatz09
  4. Script Date : 2020.09.26 05:09:34
  5. Script Purpose :
  6. :
  7. --]]
  8. -- Shapechanges caster into a lich
  9. -- Increases power of caster by 3.6% instantly and every 6 seconds
  10. -- This effect cannot be critically applied.
  11. -- On a hostile spell cast this spell will cast Lich's Siphoning on target of spell.
  12. -- Inflicts 72 disease damage on target
  13. -- Heals caster for 48
  14. function cast(Caster, Target, Pwr, DmgType, Dmg, HealAmt, Illu)
  15. SetIllusion(Target, Illu)
  16. AddProc(Target, 5, 100)
  17. SpellHeal("Power", Pwr)
  18. Say(Caster, "Need % of power and no crits for the spellheal")
  19. end
  20. function tick(Caster, Target, Pwr, DmgType, Dmg, HealAmt, Illu)
  21. SpellHeal("Power", Pwr)
  22. end
  23. function proc(Caster, Target, Type, Pwr, DmgType, Dmg, HealAmt, Illu)
  24. Spell = GetSpell(5442, GetSpellTier())
  25. if Type == 5 then
  26. SetSpellDataIndex(Spell, 0, DmgType)
  27. SetSpellDataIndex(Spell, 1, Dmg)
  28. SetSpellDataIndex(Spell, 2, HealAmt)
  29. CastCustomSpell(Spell, Target, Target)
  30. end
  31. end
  32. function remove(Caster, Target)
  33. ResetIllusion(Target)
  34. RemoveProc(Target)
  35. end