1. ВКонтакте
  2. Facebook

AegisX Commands !mortar

Супер Админ
  1. Оффлайн
  2. VIP
  3. 117 сообщений
  4. Сообщение
  5. Личные данные
Полезность: 0 | сообщение № 1 отправлено 14:23, 01.08.2011
!mortar
php code:
  1. AEGIS.chatCommands.mortar = {adminOnly=true};
  2. function AEGIS.chatCommands.mortar:func(player, chatMsg)
  3. --==============================================================================
  4. =====
  5. -- your Config.
  6. --==============================================================================
  7. =====
  8. local Delay = 2; -- in Minutes
  9. --==============================================================================
  10. =====
  11. if(player.actor:GetSpectatorMode()~=0) then
  12. XMessageChatToPlayer( player, "[ERROR] You must in Game to use!");
  13. return;
  14. end
  15. if (player:IsOnVehicle()) then
  16. XMessageChatToPlayer( player, "[ERROR] Leave your Vehicle!");
  17. return;
  18. end
  19. if (player:IsDead()) then
  20. return;
  21. end
  22. local MortarDelay = math.floor(Delay * 60);
  23. if (lastMortar and ((_time - lastMortar) <= MortarDelay)) then
  24. XMessageChatToPlayer( player, "[ERROR] The Server can only use !mortar every "..Delay.." minutes!");
  25. return;
  26. end
  27. lastMortar = _time;
  28. local xp = player:GetWorldPos().x;
  29. local yp = player:GetWorldPos().y;
  30. local zp = player:GetWorldPos().z;
  31. local beaconpos = {x=xp, y=yp, z=zp+2};
  32. g_gameRules:CreateExplosion(player.id,SIGNAL,0,beaconpos,g_Vectors.up,1,
  33. 1,1,1,"explosions.flare.night_time_selfillum",1, 1, 1, 1);
  34. XMessageChatToAll("Mortar started by %s ", player:GetName());
  35. local players = g_gameRules.game:GetPlayers();
  36. local tmessage = 6;
  37. local countdown;
  38. for countdown = 1, tmessage do Script.SetTimer(countdown * 1000,
  39. function()
  40. for i, target in ipairs(players) do
  41. if (target.actor:GetSpectatorMode() == 0) then
  42. local targetX = target:GetWorldPos().x;
  43. local targetY = target:GetWorldPos().y;
  44. local targetZ = target:GetWorldPos().z;
  45. local x = (xp - targetX) * (xp - targetX);
  46. local y = (yp - targetY) * (yp - targetY);
  47. local z = (zp - targetZ) * (zp - targetZ);
  48. local distance = math.sqrt(x+y+z);
  49. if (target~=player) and (distance<80) and (tmessage>4) then
  50. XMessageBigCenterToPlayer(target, "ALERT! - PLAYER :", player:GetName(), ", has started a Mortar!");
  51. elseif (distance<40) then
  52. XMessageBigCenterToPlayer(target,"DANGER : : You are in the Explosion Radius [ "..tmessage.." ]");
  53. end
  54. end
  55. end
  56. tmessage = tmessage - 1;
  57. if (tmessage==0) then
  58. local confEffects = {"explosions.grenade_air.explosion","explosions.jet_explosion.one_sh
  59. ot","explosions.tank_explosion.chinese_tank","explosions.helicop
  60. ter_expl osion.a",};
  61. local confExplosions = 4;
  62. local strike;
  63. for strike = 1, confExplosions do Script.SetTimer(strike * 0.3 * 1000,
  64. function()
  65. local effect = confEffects[math.random(1, #confEffects)];
  66. local randx = math.random(-6, 6);
  67. local randy = math.random(-6, 6);
  68. g_gameRules:CreateExplosion(player.id, BOMB, 350, {x = (xp + randx), y = (yp + randy), z = zp}, g_Vectors.up, 20, 45, 2000, 2, effect, 1.2, 1.2, 1.2, 1.2);
  69. confExplosions = confExplosions - 1;
  70. if (confExplosions==0) then
  71. XMessageBigCenterToPlayer(player, "MORTAR : : Complete");
  72. elseif (confExplosions==3) then
  73. XMessageBigCenterToPlayer(player, "MORTAR : : Started");
  74. end
  75. end);
  76. end
  77. end
  78. end);
  79. end
  80. end


------------------------------------------
DDR3 8G (4*2G), 1600МГц Это мало?
 
Поделиться темой:
Перейти

Доступ закрыт.

  1. Вам запрещено отвечать в темах данного форума.

Последние темы

  1. Настройка серверного мода Crysis
    Автор: dimas824 18:04, 12.01.2013
  2. Crysis 2 обсуждение
    Автор: PGJA44 23:01, 07.01.2013
  3. Crysis 2 Настройка Servera (Вопросы)
    Автор: seregas 13:18, 29.12.2012
  4. Crysis Wars обсуждение
    Автор: coody55 12:22, 21.11.2012
  5. AEGISX Как убрать бесконечные (40) патро...
    Автор: coody55 12:10, 21.11.2012
  6. Pioneer
    Автор: coody55 18:05, 08.11.2012

Изменения статуса

  1. профиль Воин будущего 20:35, 10.12.2012
  2. профиль ИЩЮ КЛЮЧЬ НА CRYSIS 2 ЕСЛИ ЕСТЬ ТО ДАЙ 23:39, 04.05.2012
  3. профиль как делать серийный номер ключ 23:56, 24.02.2012
  4. профиль ыца! 11:04, 30.01.2012
  5. профиль DDR3 8G (4*2G), 1600МГц Это мало? 22:56, 29.01.2012
  6. профиль i5-2500k gigabyte z68x GTX 580 msi 8 гб оперативной памят... 23:14, 21.12.2011

За последние 10 минут эту тему посетило 1 человек (0 пользователей, 1 гостей, 0 скрытых пользователей)
Полный список по: последнему действию или именам пользователей