#include "Debug.h"
#include "Functions.h"
#define CIRCLEPOS(x,y,d,r) [x-r*sin(d),y-r*cos(d)]
#define ALT 2000
#define CRUISEALT 2000
#define SETALT(pos) [(pos select 0), (pos select 1), ALT]
#define DIST 4000

private ["_spawnPos", "_bombPos", "_deletePos"];
DEBUG_MSG(["B52: START"])

if ((count _this) > 0) then { _spawnPos = _this select 0; };
if ((count _this) > 1) then { _bombPos = _this select 1; };
if ((count _this) > 2) then { _deletePos = _this select 2; };

bomberType = BOMBER;
bomberGroup = createGroup west;
_spawn = SETALT(_spawnPos);
_all = [_spawn, random(360), bomberType, bomberGroup] call bis_fnc_spawnvehicle;
bomber = _all select 0;
_crew = _all select 1;
_pilot = _crew select 0;

bomber flyInHeight CRUISEALT;

sleep 5;

_WP = bomberGroup addWaypoint [_bombPos, 500];
_WP setWaypointSpeed "NORMAL";
_WP setWaypointType "MOVE";
bomberGroup setCurrentWaypoint _WP;
createMarker ["B52", (getPos bomber)];
"B52" setMarkerShape "ICON";
"B52" setMarkerType "Dot";
"B52" setMarkerText "BOMBER";

[] spawn {
 while {true} do {
  _pos = getPos bomber;
  _markerPos = [ (_pos select 0), (_pos select 1) ];
  "B52" setMarkerPos _markerPos;
  sleep 2;
 };
};


waitUntil { (bomber distance _bombPos < DIST) };
DEBUG_MSG(["B52: start bomb run"])

_i = 0;
while {_i < 50} do {
  _pos = getPos bomber;
  sleep 1;
  BOMB createVehicle _pos;
  _i = _i + 1;
};

DEBUG_MSG(["B52: bomb run complete"])

sleep 5;
_WP = bomberGroup addWaypoint [_deletePos, 0];
_WP setWaypointType "MOVE";
bomberGroup setCurrentWaypoint _WP;

waitUntil { (bomber distance _bombPos < DIST) };
deleteVehicle bomber;
{ deleteVehicle _x; } forEach (units bomberGroup);
deleteGroup bomberGroup;

#define BOMBER "VTE_b52"
#define BOMB "VTE_MK82"

while {!isNull bomber} do {
...