Добавлено (18.04.2014, 19:30)
---------------------------------------------
Ага. Уже и скрипт не могу прицепить, тогда в текстовом режиме:

/* 
Упреждающий выстрел из миномета Mk6 по движущейся цели
Активация: id = [орудие, цель] execVM "mortar_Mk6_upr.sqf"
*/ 
 
//имя миномета
_gun = _this select 0;
// позиция миномета
_gunPos =  getPosASL _gun;

// имя текущей обоймы орудия
_magazine = currentMagazine _gun;

//цель
_target =_this select 1;

// пока цель жива, выполнять
while {alive _target} do

{

//РАСЧЕТ ПРЕДПОЛАГАЕМОЙ ПОЗИЦИИ ЦЕЛИ
// начальная позиция цели
_targetPos = getPosASL _target;

// время полета снаряда (сек.)
_t = _gun getArtilleryETA [_targetPos, _magazine];
// время упреждения
_T = _t + 2;
// вектор скорости цели
_Vt = velocity _target;

//  предполагаемая позиция цели
_pp = [ 
       (_targetPos select 0) + (_Vt select 0) * _T, 
       (_targetPos select 1) + (_Vt select 1) * _T, 
       (_targetPos select 2) + (_Vt select 2) * _T 
      ];

// расстояние до предполагаемой позиции цели 
_l = _gun distance _pp;

// если расстояние до предполагаемой позиции цели попадает в диапазон досягаемости орудия,
if (_pp inRangeOfArtillery[[_gun],_magazine])
// то назначить миномету упреждающий выстрел по цели 
then  {_gun commandArtilleryFire [_pp, _magazine, 1]};

sleep 2;
};

Добавлено (25.04.2014, 13:22)
---------------------------------------------
Нашел модуль артиллерийской поддержки. Работает следующим образом.

На карте ставим игрока и орудие (миномет, САУ - не важно).
Заходим в модули.
В  окошке КАТЕГОРИЯ выбираем "Поддержка".
В окошке МОДУЛЬ выбираем "Запрашивающий поддержку".
Этот модуль синхронизируем с игроком.
Создаем второй модуль.
В  окошке КАТЕГОРИЯ выбираем "Поддержка".
В окошке МОДУЛЬ выбираем "Поддержка: артобстрел".
Этот модуль синхронизируем с орудием.
В режиме просмотра наводим курсор на место обстрела и через клавиши 0-8 выбираем
Артобстрел-Миномет-Тип снаряда-Количество выстрелов.
Все. Интересно, что стороны игрока и орудия могут не совпадать.
 
Есть второй вариант. Орудие на карте ставить не нужно.
Во втором модуле 
В  окошке КАТЕГОРИЯ выбираем "Поддержка".
В окошке МОДУЛЬ выбираем "Поддержка: артобстрел [виртуальная]".
Этот модуль синхронизируем с первым модулем.
В режиме просмотра наводим курсор на место обстрела и через клавиши 0-8 выбираем 
Артобстрел-Тип орудия-Тип снаряда-Количество выстрелов.
И, о чудо!, на месте второго модуля из параллельной реальности является выбранное орудие, отстреливает выбранное количество снарядов и исчезает. Причем, если дальность обстрела не соответствует возможностям орудия, то из параллельной реальности приходит сообщение: "Неверная дальность".

Добавлено (24.05.2014, 16:47)
---------------------------------------------
Заинтересовался пиндосским снарядом XM982Excalibur. По информации из Википедии снаряд обладает повышенной точностью и увеличенной дальностью полета. Снаряд ориентируется в пространстве с помощью GPS навигации и коррекция направления осуществляется на всей траектории полета. Особое внимание привлекает модификация снаряда Block III вернее его способность: "обнаруживать, распознавать и сопровождать цель(и) в сложной городской среде".
   Нам то в Armе дальность особо и не нужна (Cokop простреливает вдоль почти весь Алтис), а вот распознавание целей и точность попадания - это интересно, тем более, что в ArmA III разброс попаданий при артобстреле больше, чем в ArmA II.
   В общем, наваял скрипт, при котором, по ориентации снаряда в момент выстрела, определяется предполагаемое место падения, от него в радиусе 400м определяются враждебные объекты (традиционно сторона - "синие"), среди них выбирается объект с наибольшим рейтингом и, по достижении снарядом вершины траектории, производится коррекция направления снаряда на выбранную цель.
   Проще говоря, если выстрелить куда-то из пушки, то (опять!)если  там есть вражеская техника, то снаряд сам выберет и поразит цель. 
   Это позволяет поражать технику противника со 100% гарантией без лазерной подсветки и имеет хоть какой-то реальный прототип.
   
  Сам скрипт:
// Активация: _id = this addEventHandler ["fired", {_as = _this execVM "excalibur.sqf"}] 

 
// имя снаряда
_shell = _this select 6;

//начальная позиция снаряда
_pos = getPos _shell;
// скорость снаряда
_speed = (speed _shell)/3.6;
// вектор снаряда
_vector = vectorDir _shell;
// угол возвышения
_a = acos (_vector select 2);

// ОПРЕДЕЛЕНИЕ ЦЕЛИ
// дальность полета снаряда
_L = (_speed^2 / 9.81)* sin (2*_a);
/* начальный угол ориентации снаряда 
в горизонтальной плоскости 
от севера по часовой стрелке */
_DIRo = direction _shell;
// долгота предполагаемого места падения снаряда
_X = (_pos select 0) + (_L*sin _DIRo);
// широта предполагаемого места падения снаряда
_Y = (_pos select 1) + (_L*cos _DIRo);
// высота предполагаемого места падения снаряда
_Z = _pos select 2;
// координаты предполагаемого места падения снаряда
_center = [_X,_Y,_Z];
// список объектов в выбранном радиусе от предполагаемого места падения снаряда
_objects = nearestObjects [_center, ["tank","car", "ship"], 400];

// резервируем массив целей
_targets = [];
//если сторона объекта ЗАПАД, то добавить имя объекта в массив целей
{if (side _x == west) then {_targets set [count _targets, _x]}} forEach _objects;

// ВЫБОР ЦЕЛИ ПО РЕЙТИНГУ
_i = 1;
_j = count _targets;
while {_j > _i} do 
{
  /* если рейтинг одного из элементов массива 
  больше чем рейтинг первого элемента*/  
  if ( rating (_targets select _j) > rating (_targets select 0))
  // то:
  then 
  {
    // присваиваем переменной имя выбранного элемента массива 
    _candidate = _targets select _j;
    // в массиве целей обнуляем выбранный элемент
    _targets set [_j, objNull];
    /* к массиву целей прибавляем имя выбранного элемента
    (делаем его первым элементом массива целей)
    одновременно удаляя из него обнуленный элемент*/
    _targets = [_candidate] + _targets - [objNull]; 
  };
_j = _j - 1;
};
// выбранная цель
_target = _targets select 0;

 
// НАВЕДЕНИЕ НА ЦЕЛЬ
// пока снаряд жив, выполнять:
while {alive _shell} do 
{
  // текущий вектор снаряда
  _vectorShell = vectorDir _shell;
  
  // если снаряд начал снижаться, 
  if (_vectorShell select 2 < 0) 
  // то 
  then {
         // текущая позиция снаряда   
_posShell = getPosASL _shell;
// текущая позиция цели 
_posTarget = getPosASL _target; 
 
         // ОПРЕДЕЛЕНИЕ УГЛОВ НАПРАВЛЕНИЯ СНАРЯДА НА ЦЕЛЬ
         // фактическое расстояние до цели
         _disF = SQRT(_posShell distanceSqr _posTarget);
  
         // расстояние до цели в плоскости YZ
         _disYZ = [0, _posShell select 1, _posShell select 2] distance [0, _posTarget select 1, _posTarget select 2];
         // угол между прямой от снаряда до цели и плоскостью YZ  
         _dirX = acos (_disYZ / _disF);
  
         // расстояние до цели в плоскости XZ
         _disXZ = [_posShell select 0, 0, _posShell select 2] distance [_posTarget select 0, 0, _posTarget select 2];
         // угол между прямой от снаряда до цели и плоскостью XZ  
         _dirY = acos (_disXZ / _disF);  
  
         // расстояние до цели в плоскости XY
         _disXY = [_posShell select 0, _posShell select 1, 0] distance [_posTarget select 0, _posTarget select 1, 0];
         // угол между прямой от снаряда до цели и плоскостью XY  
         _dirZ = acos (_disXY / _disF);  
 
_anglX = 0;
         _anglY = 0;
         _anglZ = 0 - _dirZ;
// если составляющие вектора скорости имеют знак "-", то заменить знак на "+"
if (_vectorShell select 0 < 0) then {_anglX = 0 - _dirX} else {_anglX = _dirX};
if (_vectorShell select 1 < 0) then {_anglY = 0 - _dirY} else {_anglY = _dirY};
 
// направляем вектор скорости снаряда на цель 
_shell setVelocity [_speed*(sin _anglX), _speed*(sin _anglY), _speed*(sin _anglZ)];
       };
  
  sleep 0.1;
};