Advertisement
Guest User

Deathbringer Saurfang

a guest
Apr 12th, 2011
632
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.85 KB | None | 0 0
  1. function sar_OnCombat(pUnit, Event)
  2. pUnit:SendChatMessage(14, 1, "BY THE MIGHT OF THE LICH KING!")
  3. pUnit:RegisterEvent("sar_blood1", 25000, 0)
  4. pUnit:RegisterEvent("sar_blood2", 26000, 0)
  5. pUnit:RegisterEvent("sar_boiling", 30000, 0)
  6. pUnit:RegisterEvent("sar_nova", 39000, 0)
  7. pUnit:RegisterEvent("bloodbeast_spawn", 45000, 0)
  8. pUnit:RegisterEvent("sar_mark", 65000, 0)
  9. pUnit:RegisterEvent("sar_phase2", 1000, 0)
  10. end
  11.  
  12. function sar_blood1(pUnit, Event)
  13. pUnit:CastSpellOnTarget(72410, pUnit:GetMainTank())
  14. end
  15.  
  16. function sar_blood2(pUnit, Event)
  17. pUnit:CastSpellOnTarget(72408, pUnit:GetMainTank())
  18. end
  19.  
  20. function sar_boiling(pUnit, Event)
  21. pUnit:CastSpellOnTarget(72385, pUnit:GetRandomPlayer(0))
  22. end
  23.  
  24. function sar_nova(pUnit, Event)
  25. pUnit:CastSpellOnTarget(72380, pUnit:GetRandomPlayer(0))
  26. end
  27.  
  28. function bloodbeast_spawn(pUnit, Event)
  29. pUnit:SendChatMessage(14, 1, "Feast my minions!")
  30. pUnit:CastSpell(72172)
  31. x = pUnit:GetX()
  32. y = pUnit:GetY()
  33. z = pUnit:GetZ()
  34. o = pUnit:GetO()
  35. pUnit:SpawnCreature(99926,x+10,y,z,o,2,0)
  36. pUnit:SetFaction(90)
  37. end
  38.  
  39. function sar_mark(pUnit, Event)
  40. pUnit:CastSpellOnTarget(72293, pUnit:GetRandomPlayer(0))
  41. end
  42.  
  43. function sar_phase2(pUnit, Event)
  44. if pUnit:GetHealthPct() < 30 then
  45. pUnit:RemoveEvents()
  46. pUnit:CastSpell(72737)
  47. pUnit:RegisterEvent("sar_blood1", 25000, 0)
  48. pUnit:RegisterEvent("sar_blood2", 26000, 0)
  49. pUnit:RegisterEvent("sar_boiling", 30000, 0)
  50. pUnit:RegisterEvent("sar_nova", 39000, 0)
  51. pUnit:RegisterEvent("bloodbeast_spawn", 45000, 0)
  52. pUnit:RegisterEvent("sar_mark", 65000, 0)
  53. end
  54. end
  55.  
  56. function sar_blood1(pUnit, Event)
  57. pUnit:CastSpellOnTarget(72410, pUnit:GetMainTank())
  58. end
  59.  
  60. function sar_blood2(pUnit, Event)
  61. pUnit:CastSpellOnTarget(72408, pUnit:GetMainTank())
  62. end
  63.  
  64. function sar_boiling(pUnit, Event)
  65. pUnit:CastSpellOnTarget(72385, pUnit:GetRandomPlayer(0))
  66. end
  67.  
  68. function sar_nova(pUnit, Event)
  69. pUnit:CastSpellOnTarget(72380, pUnit:GetRandomPlayer(0))
  70. end
  71.  
  72. function bloodbeast_spawn(pUnit, Event)
  73. pUnit:SendChatMessage(14, 1, "Feast my minions!")
  74. pUnit:CastSpell(72172)
  75. x = pUnit:GetX()
  76. y = pUnit:GetY()
  77. z = pUnit:GetZ()
  78. o = pUnit:GetO()
  79. pUnit:SpawnCreature(99926,x+10,y,z,o,2,0)
  80. pUnit:SetFaction(90)
  81. end
  82.  
  83. function sar_mark(pUnit, Event)
  84. pUnit:CastSpellOnTarget(72293, pUnit:GetRandomPlayer(0))
  85. pUnit:SendChatMessage(14, 1, "The ground runs red with your blood!")
  86. end
  87.  
  88. function sar_OnLeaveCombat(pUnit, Event)
  89. pUnit:RemoveAura(72737)
  90. pUnit:RemoveEvents()
  91. end
  92.  
  93. function sar_OnKilledTarget(pUnit, Event)
  94. pUnit:CastSpell(72260)
  95. pUnit:SendChatMessage(14, 1, "You are nothing!")
  96. end
  97.  
  98. function sar_OnDied(pUnit, Event)
  99. pUnit:RemoveEvents()
  100. pUnit:SendChatMessage(14, 1, "I...Am...Released")
  101. end
  102.  
  103.  
  104. RegisterUnitEvent(99916, 1, "sar_OnCombat")
  105. RegisterUnitEvent(99916, 2, "sar_OnLeaveCombat")
  106. RegisterUnitEvent(99916, 3, "sar_OnKilledTarget")
  107. RegisterUnitEvent(99916, 4, "sar_OnDied")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement