9
3

BerserkRage.lua 1.2 KB

1234567891011121314151617181920212223242526272829303132333435363738
  1. --[[
  2. Script Name : Spells/Fighter/Warrior/Berserker/BerserkRage.lua
  3. Script Author : neatz09
  4. Script Date : 2020.02.28 08:02:52
  5. Script Purpose :
  6. :
  7. --]]
  8. -- On any combat or spell hit this spell may cast Berserk on target. Lasts for 10.0 seconds. Triggers about 2.0 times per minute.
  9. -- Increases Haste of target by 8.6
  10. -- Increases DPS of target by 8.6
  11. -- When damaged this spell has a 30% chance to cast Berserk on target. Lasts for 10.0 seconds.
  12. -- Increases Haste of target by 8.6
  13. -- Increases DPS of target by 8.6
  14. -- On a kill this spell will cast Berserk on target. Lasts for 10.0 seconds.
  15. -- Increases Haste of target by 8.6
  16. -- Increases DPS of target by 8.6
  17. function cast(Caster, Target, Haste)
  18. AddProc(Target, 1, 12.5) --Combat
  19. AddProc(Target, 15, 30) --Damaged
  20. AddProc(Target, 14, 100) --Kill
  21. end
  22. function proc(Caster, Target, Type, Haste)
  23. Spell = GetSpell(5172, GetSpellTier())
  24. if Type == 1 or Type == 15 or Type == 14 then
  25. SetSpellDataIndex(Spell, 0, Haste)
  26. CastCustomSpell(Spell, Caster, Target)
  27. end
  28. end
  29. function remove(Caster, Target)
  30. RemoveProc(Target)
  31. end