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

AX2 ChatKommando !artillery

Супер Админ
  1. Оффлайн
  2. VIP
  3. 117 сообщений
  4. Сообщение
  5. Личные данные
Полезность: 0 | сообщение № 1 отправлено 13:15, 01.08.2011
!artillery
php code:
  1. AX.ChatCommand.artillery = {};
  2. function AX.ChatCommand.artillery:func(player, chatMsg)
  3. --==============================================================================
  4. =====
  5. -- your Config.
  6. --==============================================================================
  7. =====
  8. local Delay = 2; -- in Minutes
  9. --==============================================================================
  10. =====
  11. local mustWait = DelayControl(Delay, lastArtillery);
  12. if(player.actor:GetSpectatorMode()~=0) then
  13. XMessageChatToPlayer( player, "[ERROR] You must in Game to use!");
  14. elseif (player:IsOnVehicle()) then
  15. XMessageChatToPlayer( player, "[ERROR] Leave your Vehicle!");
  16. return;
  17. elseif (mustWait) then
  18. XMessageChatToPlayer( player, "[ERROR] You can only use !artillery every "..Delay.." Minutes (Remaining Time: "..mustWait.." Minutes)!");
  19. return;
  20. elseif (not player:IsDead()) then
  21. lastArtillery = _time;
  22. local Pos = player:GetWorldPos();
  23. local beaconpos = {x=Pos.x, y=Pos.y, z=Pos.z+2,};
  24. g_gameRules:CreateExplosion(player.id,SIGNAL,0,beaconpos,g_Vectors.up,1,
  25. 1,1,1,"explosions.flare.night_time_selfillum",1, 1, 1, 1);
  26. XMessageChatToAll("Artillery Battery Mobilized by %s ", player:GetName());
  27. local players = g_gameRules.game:GetPlayers();
  28. local tmessage = 14;
  29. local countdown;
  30. for countdown = 1, tmessage do Script.SetTimer(countdown * 1000,
  31. function()
  32. for i, target in ipairs(players) do
  33. if (target.actor:GetSpectatorMode() == 0) then
  34. local distance = XGetWorldDistance(target:GetWorldPos(), Pos);
  35. if (target~=player) and (distance<150) and (tmessage>10) then
  36. XMessageBigCenterToPlayer(target, "<font color=\"#ffffff\">ALERT! - PLAYER :</font><font color=\"#ff0000\">", player:GetName(), ",</font><font color=\"#ffffff\"> has the Artillery Battery Mobilized!</font>");
  37. elseif (distance<120) then
  38. XMessageBigCenterToPlayer(target,"<font color=\"#ff0000\">DANGER : : You are in the Explosion Radius [</font><font color=\"#FFFFFF\"> "..tmessage.." <font color=\"#ff0000\">]< /font>");
  39. end
  40. end
  41. end
  42. tmessage = tmessage - 1;
  43. if (tmessage==0) then
  44. local artilleryExplosions = {"explosions.grenade_air.explosion","explosions.jet_explosion.one_sh
  45. ot","explosions.tank_explosion.chinese_tank","explosions.helicop
  46. ter_expl  osion.a",};
  47. local artilleryShells = 60;
  48. local strike;
  49. for strike = 1, artilleryShells do Script.SetTimer(strike * 0.2 * 1000,
  50. function()
  51. local effect = artilleryExplosions[math.random(1, table.getn(artilleryExplosions))];
  52. local randx = math.random(-150/2, 150/2);
  53. local randy = math.random(-150/2, 150/2);
  54. g_gameRules:CreateExplosion(player.id,BOMB,350,{x = (Pos.x + randx), y = (Pos.y + randy), z = Pos.z}, g_Vectors.up, 50, 45, 2000, 0, effect, 0.8, 0.8, 0.8, 0.8);
  55. artilleryShells = artilleryShells - 1;
  56. if (artilleryShells==0) then
  57. XMessageBigCenterToPlayer(player, "<font color=\"#ff0000\">ARTILLERY</font><font color=\"#ffffff\"> : : Complete</font>");
  58. elseif (artilleryShells==59) then
  59. XMessageBigCenterToPlayer(player, "<font color=\"#ff0000\">ARTILLERY</font><font color=\"#ffffff\"> : : Started</font>");
  60. end
  61. end);
  62. end
  63. end
  64. end);
  65. end
  66. end
  67. 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 скрытых пользователей)
Полный список по: последнему действию или именам пользователей