Advertisement
Bwl-Network

Custom Arena

Jul 1st, 2013
165
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.74 KB | None | 0 0
  1. local NPC_ID = 600000
  2.  
  3. function Arena_Gossiper(unit, event, player)
  4.     unit:SendChatMessage(12, 0, "Welcome to a custom arenafight "..player:GetPlayerClass()..".")
  5.     unit:GossipCreateMenu(3000, player, 0)
  6.     unit:GossipMenuAddItem(0, "Yes, I will enter arena", 1, 0)
  7.     unit:GossipSendMenu(player)
  8. end
  9.  
  10. function Arena_Gossipen(unit, event, player, id, intid, code)
  11.     if(intid == 1) then
  12.         unit:SetNPCFlags(2)
  13.         player:Teleport(1, 2193.516113, -4751.277344, 55.137966, 3.835992)
  14.         local rand = math.random(1,4)
  15.         if (rand == 1) then
  16.             unit:SendChatMessage(14, 0, "It will now appear the former forth Scher Kel'Thuzad by Eastern Kingdoms against you, "..player:GetName()..".")
  17.             unit:SpawnCreature(600001, 2173.899414, -4784.573242, 55.137966, 1.343175, 20, 0)
  18.            elseif (rand == 2) then
  19.                unit:SendChatMessage(14, 0, "Now the forth shearing of Archimonde from Kalimdor is than against you, "..player:GetName()..".")
  20.                unit:SpawnCreature(600002, 2173.899414, -4784.573242, 55.137966, 1.343175, 20, 0)
  21.            elseif (rand == 3) then
  22.                unit:SendChatMessage(14, 0, "The cheaters of the Outland is already waiting for you, "..player:GetName()..".")
  23.                unit:SpawnCreature(600003, 2173.899414, -4784.573242, 55.137966, 1.343175, 20, 0, 32837, 32838)
  24.            elseif (rand == 4) then
  25.                unit:SendChatMessage(14, 0, "The leader of the hostage is ready for you, "..player:GetName()..".")
  26.                unit:SpawnCreature(600004, 2173.899414, -4784.573242, 55.137966, 1.343175, 20, 0, 49623)
  27.            end
  28.        end
  29.    end
  30.  
  31. RegisterUnitGossipEvent(600000, 1, "Arena_Gossiper")
  32. RegisterUnitGossipEvent(600000, 2, "Arena_Gossipen")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement