Advertisement
Tearrain

Eventarcemu

May 5th, 2014
42
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 3.64 KB | None | 0 0
  1. local EventActivateMsg = "#start"
  2. local EventDeactivateMsg = "#stop"
  3. local JoinMsg = "#join"
  4. local LeaveMsg = "#leave"
  5.  
  6. local EventActivated = false
  7. local ReviveActivated = false
  8.  
  9. local EventPlace = {}
  10.  
  11. function EventChatSystem(event, Player, message, type, language)
  12.     if (message == EventActivateMsg) then
  13.             if (Player:CanUseCommand("gm2jistprbvucqleo") == true) then
  14.             if (EventActivated == true) then
  15.                 Player:SendBroadcastMessage("Zurzeit ist bereits ein Event gestartet worden. Bitte Stopt dieses um ein neues Event zu starten!")
  16.             else   
  17.                 EventActivated = true
  18.                 table.insert(EventPlace, Player:GetMapId())
  19.                         table.insert(EventPlace, Player:GetX())
  20.                         table.insert(EventPlace, Player:GetY())
  21.                         table.insert(EventPlace, Player:GetZ())
  22.                 table.insert(EventPlace, Player:GetZoneId())
  23.                 local plrs = GetPlayersInWorld()
  24.                 for k, v in pairs(plrs) do
  25.                     v:SendBroadcastMessage("|cff3399FF[Sickness Event System]: |cffDFDF18"..Player:GetName().." |cffEB0000hat ein Event gestartet, gebt "..JoinMsg.." um beizutreten!")
  26.                                    v:SendAreaTriggerMessage("|cff3399FF[Sickness Event System]: |cffDFDF18"..Player:GetName().." |cffEB0000hat ein Event gestartet, gebt "..JoinMsg.." um beizutreten!")
  27.                 end
  28.             end
  29.             end
  30.         end
  31.     if (message == EventDeactivateMsg) then
  32.             if (Player:CanUseCommand("gm2jistprbvucqleo") == true) then
  33.             if (EventActivated == false) then
  34.                 Player:SendBroadcastMessage("Es ist keine Event Aktiviert um es zu schliessen.")
  35.             else   
  36.                 EventActivated = false
  37.                 EventPlace = {}
  38.                 local plrs = GetPlayersInWorld()
  39.                 for k, v in pairs(plrs) do
  40.                     v:SendBroadcastMessage("|cff3399FF[Sickness Event System]: |cffDFDF18" ..Player:GetName().." |cffEB0000hat das Event beendet!")
  41.                                    v:SendAreaTriggerMessage("|cff3399FF[Sickness Event System]: |cffDFDF18" ..Player:GetName().." |cffEB0000hat das Event beendet!")
  42.                 end
  43.             end
  44.             end
  45.         end
  46.     if (message == JoinMsg) then
  47.             if (EventActivated == false) then
  48.                     Player:SendBroadcastMessage("Zurzeit findet keine Event statt.")
  49.             elseif (EventActivated == true) then
  50.                       Player:SendAreaTriggerMessage("|cffEB0000Viel Spa\195\159 beim Event |cffDFDF18" ..Player:GetName().." |cffEB0000:D")
  51.  
  52.             Player:Teleport(EventPlace[1], EventPlace[2], EventPlace[3], EventPlace[4])
  53.         end
  54.         end
  55.     if (message == LeaveMsg) then
  56.         if (EventActivated == false) then
  57.             Player:SendBroadcastMessage("Sie koennen diesen Befehl nur dann ausfuehren wenn eine Event aktiv ist.")
  58.         else
  59.             if (Player:GetZoneId() == EventPlace[5]) then
  60.                 if(GetTeam(Player) == 1) then
  61.                     Player:Teleport(McH, XcH, YcH, ZcH)
  62.                 elseif (GetTeam(Player) == 0) then
  63.                     Player:Teleport(McA, XcA, YcA, ZcA)
  64.                 end
  65.             else
  66.                 Player:SendBroadcastMessage("Sie muessen sich in der Event-Zone befinden um diesen Befehl auszufuehren.")  
  67.             end
  68.         end
  69.     end
  70.     if (message == Remind) then
  71.         if (EventActivated == false) then
  72.             Player:SendBroadcastMessage("Sie koennen diesen Befehl nur ausfuehren wenn ein Event aktiv ist.")  
  73.         else
  74.             local plrs = GetPlayersInWorld()
  75.             for k, v in pairs(plrs) do
  76.                 v:SendBroadcastMessage("Es ist bereits ein Event gestartet gebe bitte "..JoinMsg.." ein um daran teil zunehmen.")
  77.             end
  78.         end
  79.     end
  80. end
  81.  
  82. function GetTeam(Player)
  83.     local r = Player:GetPlayerRace()
  84.     if (r == 2 or r == 5 or r == 6 or r == 8 or r == 10) then
  85.         return 1
  86.     elseif (r == 1 or r == 3 or r == 4 or r == 7 or r == 11) then
  87.         return 0
  88.     end
  89. end
  90.  
  91.    
  92. RegisterServerHook(16, "EventChatSystem")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement