Advertisement
Bwl-Network

Custom Arena : Illidan

Jul 4th, 2013
108
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.02 KB | None | 0 0
  1. local NPC_ID = 600003
  2.  
  3. function Masterofarena_OnSpawn(unit, event)
  4.     are = unit
  5. end
  6.  
  7. RegisterUnitEvent(600000, 18, "Masterofarena_OnSpawn")
  8.  
  9. function Illidan_OnSpawn(unit, event)
  10.     ill = unit
  11. end
  12.  
  13. RegisterUnitEvent(600003, 18, "Illidan_OnSpawn")
  14.  
  15. function Illidan_OnCombat(unit, event)
  16.     are:SendChatMessage(14, 0, "You waits for the traitors from Outland and is ready to fight!")
  17.     are:Emote(1, 50)
  18.     ill:SendChatMessage(14, 0, "You don't know what you can expect")
  19.     ill:RegisterEvent("Pulsing_Shockwave", 4000, 0)
  20.     ill:RegisterEvent("Vile_Beam", 7000, 0)
  21.     ill:RegisterEvent("Wicked_Beam", 15000, 0)
  22. end
  23.  
  24. function Pulsing_Shockwave(unit, event)
  25.     ill:CastSpellOnTarget(59837, unit:GetMainTank())
  26. end
  27.  
  28. function Vile_Beam(unit, event)
  29.     ill:CastSpellOnTarget(40860, unit:GetMainTank())
  30. end
  31.  
  32. function Wicked_Beam(unit, event)
  33.     ill:CastSpellOnTarget(40861, unit:GetMainTank())
  34. end
  35.  
  36. function Illidan_OnLeaveCombat(unit, event)
  37.     are:SetNPCFlags(15)
  38.     ill:RemoveEvents()
  39.     ill:Despawn(10, 0)
  40. end
  41.  
  42. function Illidan_OnKilledPlayer(unit, event, player)
  43.     ill:SendChatMessage(14, 0, "You have lost "..player:GetName().."!")
  44.     are:SetNPCFlags(15)
  45.     are:Emote(1, 50)
  46.     are:SendChatMessage(14, 0, "You have lost, "..player:GetName().."! Please try later again!")
  47.     player:CastSpell(34776)
  48.     player:Teleport(1, 2214.309326, -4775.207031, 73.038269, 4.438317)
  49. end
  50.  
  51. function Illidan_OnDied(unit, event, player)
  52.     are:SetNPCFlags(15)
  53.     are:SendChatMessage(14, 0, "Congratulations you defeat Illidan "..player:GetName().."!")
  54.     are:Emote(1, 50)
  55.     ill:SendChatMessage(14, 0, "I gave up "..player:GetName().."!")
  56.     ill:Despawn(10, 0)
  57.     player:AddItem(49623, 1)
  58.     player:Teleport(1, 2209.373291, -4780.540039, 65.416451, 2.655464)
  59.     player:CastSpell(34776)
  60. end
  61.  
  62. RegisterUnitEvent(600003, 1, "Illidan_OnCombat")
  63. RegisterUnitEvent(600003, 2, "Illidan_OnLeaveCombat")
  64. RegisterUnitEvent(600003, 3, "Illidan_OnKilledPlayer")
  65. RegisterUnitEvent(600003, 4, "Illidan_OnDied")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement