Air Traffic Control

XFireFighter

HeyHo NN-Community,

Es ist wieder soweit... Ich habe die Tage mal wieder Zeit und Lust gehabt und mich ein bisschen an einem Air Traffic Control - System versucht. Nach derzeitigem Stand ist folgendes möglich

Video

Derzeit verfügbare Daten

- Typ des Flugobjekts

- Flugrichtung

- Geschwindigkeit

- Distanz zum Radar

- Erkennung Flugzeug oder Heli

Geplant ist über die Listbox sich erweitere Flugdaten anzeigen zu lassen wie z.B

- Anzahl Passagiere an Bord
- Treibstoffmenge

- evtl. Beschädigungen am Flugobjekt

- Marker hervorheben, wenn man das Flugobjekt in der Liste auswählt

- Benachrichtigung in einer Verlaufsdokumentation wenn ein Flugobjekt den Bereich betritt & verlässt, sowie eine Mindestflughöhe unterschreitet

Eine weitere Sache die ich mir überlegt habe wäre die Markerfarben oder die Markergamma anhand der Höhe festzumachen, damit man besser erkennen kann, falls sich Objekte zu Nahe kommen. Was denkt ihr darüber? Oder habt ihr vielleicht noch ein paar coole Ideen?

LG

XFireFighter

HeyHo,

kleines Update. Ich habe meine Ideen soweit umgesetzt. Siehehier.
Mein Debakel gibts hier zum runterladen. Viel Spaß damit

GUI

Code

#include "CustomControlClasses.h"
class Radar_Scanner
{
    idd = 7500;

    class ControlsBackground
    {
        class Background
        {
            type = 0;
            idc = 7501;
            x = safeZoneX + safeZoneW * 0.02539063;
            y = safeZoneY + safeZoneH * 0.03125;
            w = safeZoneW * 0.94921875;
            h = safeZoneH * 0.9375;
            style = 0;
            text = "";
            colorBackground[] = {0.102,0.102,0.102,0.4};
            colorText[] = {0,0,0,1};
            font = "PuristaMedium";
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 1);

        };


    };
    class Controls
    {
        class Radar_Map : RscMapControl
        {
            type = CT_MAP_MAIN;
            idc = 7502;
            x = safeZoneX + safeZoneW * 0.04980469;
            y = safeZoneY + safeZoneH * 0.07986112;
            w = safeZoneW * 0.68066407;
            h = safeZoneH * 0.84027778;
            style = ST_MULTI + ST_TITLE_BAR;
            colorBackground[] = {0.102,0.102,0.102,1};
            colorText[] = {0.6902,0.9373,0.298,1};
            font = "PuristaMedium";
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 1);

        };
        class ListBoxHeader
        {
            type = 0;
            idc = 7503;
            x = safeZoneX + safeZoneW * 0.7578125;
            y = safeZoneY + safeZoneH * 0.07986112;
            w = safeZoneW * 0.19238282;
            h = safeZoneH * 0.0625;
            style = 0+2;
            text = "Aktive Flugobjekte";
            colorBackground[] = {0.102,0.102,0.102,0};
            colorText[] = {0.702,0.302,0.102,1};
            font = "PuristaBold";
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 2);
            access = 2;
            moving = false;
            tooltip = "Derzeit aktive Flugobjekte in Reichweite";

        };
        class ListBox_ATC
        {
            type = 5;
            idc = 7504;
            x = safeZoneX + safeZoneW * 0.7578125;
            y = safeZoneY + safeZoneH * 0.15277778;
            w = safeZoneW * 0.19238282;
            h = safeZoneH * 0.37152778;
            style = 16;
            colorBackground[] = {0.102,0.102,0.102,0.4};
            colorDisabled[] = {0,0,0,0};
            colorSelect[] = {0.6,0.302,0,1};
            colorText[] = {0.6,0.302,0,1};
            colorSelectBackground[] = {0.6,0.302,0,0.1};
            font = "PuristaMedium";
            maxHistoryDelay = 0;
            rowHeight = 0;
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 1);
            soundSelect[] = {"\A3\ui_f\data\sound\RscListbox\soundSelect",0.09,1.0};
            onLBDblClick = [false] call RAD_fnc_ATCinfofill;
            onLBSelChanged = [true] call RAD_fnc_ATCinfofill;
            onLoad = [] spawn RAD_fnc_listBox_Radar;
            onDestroy =   [false] call RAD_fnc_RadarMarker;

            class ListScrollBar
            {
                color[] = {1,1,1,1};
                thumb = "\A3\ui_f\data\gui\cfg\scrollbar\thumb_ca.paa";
                arrowFull = "\A3\ui_f\data\gui\cfg\scrollbar\arrowFull_ca.paa";
                arrowEmpty = "\A3\ui_f\data\gui\cfg\scrollbar\arrowEmpty_ca.paa";
                border = "\A3\ui_f\data\gui\cfg\scrollbar\border_ca.paa";

            };
        };


        class Button
        {
            type = 1;
            idc = 7508;
            x = safeZoneX + safeZoneW * 0.78222657;
            y = safeZoneY + safeZoneH * 0.86631945;
            w = safeZoneW * 0.13769532;
            h = safeZoneH * 0.05381945;
            style = 0+2;
            text = "Schließen";
            borderSize = 0;
            colorBackground[] = {0.702,0.4,0.102,1};
            colorBackgroundActive[] = {0.702,0.4,0.102,1};
            colorBackgroundDisabled[] = {0.702,0.4,0.102,1};
            colorBorder[] = {0.702,0.4,0.102,1};
            colorDisabled[] = {0.702,0.4,0.102,1};
            colorFocused[] = {0.702,0.4,0.102,1};
            colorShadow[] = {0.702,0.4,0.102,1};
            colorText[] = {0,0,0,1};
            font = "PuristaBold";
            offsetPressedX = 0.0;
            offsetPressedY = 0.0;
            offsetX = 0.0;
            offsetY = 0.0;
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 2.5);
            soundClick[] = {"\A3\ui_f\data\sound\RscButton\soundClick",0.09,1.0};
            soundEnter[] = {"\A3\ui_f\data\sound\RscButton\soundEnter",0.09,1.0};
            soundEscape[] = {"\A3\ui_f\data\sound\RscButton\soundEscape",0.09,1.0};
            soundPush[] = {"\A3\ui_f\data\sound\RscButton\soundPush",0.09,1.0};
            action = "closeDialog 2";

        };
        class Background_Info
        {
            type = 0;
            idc = 7512;
            x = safeZoneX + safeZoneW * 0.49375;
            y = safeZoneY + safeZoneH * 0.07444445;
            w = safeZoneW * 0.2375;
            h = safeZoneH * 0.55;
            style = 0;
            text = "";
            colorBackground[] = {0.102,0.102,0.102,0.4};
            colorText[] = {1,1,1,1};
            font = "PuristaMedium";
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 1);

        };

        class ATC_Info_Header
        {
            type = 0;
            idc = 7510;
            x = safeZoneX + safeZoneW * 0.51875;
            y = safeZoneY + safeZoneH * 0.10222223;
            w = safeZoneW * 0.1875;
            h = safeZoneH * 0.06111112;
            style = 0+2;
            text = "ATC - Info";
            colorBackground[] = {0.549,0.4078,0.7608,0};
            colorText[] = {0.702,0.4,0.102,1};
            font = "PuristaBold";
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 2.5);

        };
        class ATC_Info_Button_Close
        {
            type = 1;
            idc = 7511;
            x = safeZoneX + safeZoneW * 0.54375;
            y = safeZoneY + safeZoneH * 0.54222223;
            w = safeZoneW * 0.1375;
            h = safeZoneH * 0.06111112;
            style = 0+2;
            text = "Schließen";
            borderSize = 0;
            colorBackground[] = {0.702,0.4,0.102,1};
            colorBackgroundActive[] = {0.702,0.4,0.102,1};
            colorBackgroundDisabled[] = {0.2,0.2,0.2,1};
            colorBorder[] = {0,0,0,0};
            colorDisabled[] = {0.702,0.4,0.102,1};
            colorFocused[] = {0.702,0.4,0.102,1};
            colorShadow[] = {0,0,0,1};
            colorText[] = {0,0,0,1};
            font = "PuristaBold";
            offsetPressedX = 0.0;
            offsetPressedY = 0.0;
            offsetX = 0.0;
            offsetY = 0.0;
            sizeEx = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 2);
            soundClick[] = {"\A3\ui_f\data\sound\RscButton\soundClick",0.09,1.0};
            soundEnter[] = {"\A3\ui_f\data\sound\RscButton\soundEnter",0.09,1.0};
            soundEscape[] = {"\A3\ui_f\data\sound\RscButton\soundEscape",0.09,1.0};
            soundPush[] = {"\A3\ui_f\data\sound\RscButton\soundPush",0.09,1.0};
            onButtonClick = [] spawn RAD_fnc_ATCinfotoggle;
        

        };
        class ATC_Info_Card
        {
            type = 13;
            idc = 7509;
            x = safeZoneX + safeZoneW * 0.506875;
            y = safeZoneY + safeZoneH * 0.17333334;
            w = safeZoneW * 0.2125;
            h = safeZoneH * 0.33;
            style = 0;
            text = "TEST";
            size = (((((safezoneW / safezoneH) min 1.2) / 1.2) / 25) * 1);
            colorBackground[] = {0.102,0.102,0.102,0.25};

    };

 };
};

Alles anzeigen

fn_ListBox_Radar.sqf

Code

disableSerialization;
if (isNull (findDisplay 7500)) exitWith {
    systemChat "Error";
};
ctrlShow [7509, false];
ctrlShow [7510, false];
ctrlShow [7511, false];
ctrlShow [7512, false];
_display = findDisplay 7500;
_ListBox = _display displayCtrl 7504;
_detRange = 4000;
_activeAir = nearestObjects [Radar1, ["Helicopter","Plane"], _detRange, false];
lbClear 7504;

while {true} do {
  {
    if ((getPosATL _x) select 2 < 25) then {
        _activeAir deleteAt _forEachIndex;
    } else {
        _myDisplayName = [configFile >> "CfgVehicles" >> typeOf _x] call BIS_fnc_displayName;
        _index = _ListBox lbadd Format[" %1 || %2 ", str (_x) , _myDisplayName];

    };

  } forEach _activeAir;

  uiSleep (2);
  [true] call RAD_fnc_RadarMarker;


  if isNull (findDisplay 7500) exitWith {
      [false] call RAD_fnc_RadarMarker;
  };
  _activeAir = nearestObjects [Radar1, ["Helicopter","Plane"], _detRange, false];
  lbClear 7504;
};

Alles anzeigen

fn_RadarMarker.sqf

Code

params [
    ["_ind", true]
];

_detRange = 4000;
_activeAir = nearestObjects [Radar1, ["Helicopter","Plane"], 10000, false];
_display = findDisplay 7500;
_map = _display displayCtrl 7502;


{
    deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];

} forEach _activeAir;


if (_ind) then {

    {
      if (_x isKindOf "Helicopter" || _x isKindOf "Plane") then {

        if ((Radar1 distance _x > _detRange) || ((getPosATL _x) select 2 < 25)) then {
            _activeAir deleteAt _forEachIndex;
            deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];
        };

          _markerH = createMarkerLocal [Format["Radarmarker_%1", _forEachIndex] , _x ];
          _markerH setMarkerTypeLocal "b_air";
          _height = Round((getPosATL _x) select 2);
          switch (true) do {

              case (_height < 75): {
                  _markerH setMarkerColorLocal "ColorRed";
              };

              case (_height > 75 && _height < 150): {
                  _markerH setMarkerColorLocal "ColorOrange";
              };

              case (_height > 150 && _height < 300 ): {
                  _markerH setMarkerColorLocal "ColorBlue";
              };

              case (_height > 300 && _height < 500 ): {
                  _markerH setMarkerColorLocal "ColorGreen";
              };

              case (_height > 500): {
                  _markerH setMarkerColorLocal "ColorWhite";
              };
          };

          if (_x isKindOf "Plane") then {
            _markerH setMarkerTypeLocal "b_plane";
          };

          _markerH setMarkerDirLocal ((direction _x) -90);
          _markerH setMarkerBrushLocal "solid";
          _markerH setMarkerTextLocal format [" %1 || HDG: %2 || H: %3 || V: %4 || D: %5", str (_x) , Round (direction _x), Round((getPosATL _x) select 2), Round (speed _x), Round ( Radar1 distance _x)];

          if ((Radar1 distance _x > _detRange) || ((getPosATL _x) select 2 < 25)) then {
              _activeAir deleteAt _forEachIndex;
              deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];
          };
      };

    } forEach _activeAir;
};

if !(_ind) then {

    {
        deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];
    } forEach _activeAir;
};

Alles anzeigen

fn_ATCinfofill.sqf

Code

params [
    ["_ind", true]
];

if (_ind) then {
  _index = lbCurSel 7504;
  _display = findDisplay 7500;
  _map = _display displayCtrl 7502;
  _marker = Format["Radarmarker_%1", _index];
  _map ctrlMapAnimAdd [1, 0.05, getMarkerPos _marker];
  ctrlMapAnimCommit _map;
};

if !(_ind) then {
  _index = lbCurSel 7504;
  ctrlShow [7509, true];
  ctrlShow [7510, true];
  ctrlShow [7511, true];
  ctrlShow [7512, true];
  _detRange = 4000;
  _activeAir = nearestObjects [Radar1, ["Helicopter","Plane"], _detRange, false];
  _target = _activeAir select _index;

  // Infos
    _passengers = fullCrew [_target,"",false];
    _count      = Count _passengers;
    _fuel       = Round((fuel _target) * 100);
    _hp         = Round(100 -(getDammage _target) * 100);
    _dir        = Round (direction _target);
    _grid       = mapGridPosition _target;
    _v          = Round (speed _target);
    _dist       = Round (Radar1 distance _target);
    _dname = [configFile >> "CfgVehicles" >> typeOf _target] call BIS_fnc_displayName;
    ctrlSetText [7509, (format[" Callsign: %1 \n Flugobjekt: %2 \n Treibstoff: %3 % \n Passagiere: %4 \n HP: %5 % \n Flugrichtung: %6 Grad \n Gridposition: %7 \n Geschwindigkeit: %8 Km/H \n Distanz: %9 Meter \n \n Marker Rot = Höhe < 75 Meter \n Marker Orange = Höhe 75 Meter bis 150 Meter \n Marker Blau = Höhe 150 Meter bis 300 Meter \n Marker Grün = Höhe 300 Meter bis 500 Meter \n Marker Weiß = Höhe > 500 Meter",_target,_dname,_fuel,_count,_hp,_dir,_grid,_v,_dist])];
  };

Alles anzeigen

fn_ATCinfotoggle.sqf

Code

ctrlShow [7509, false];
ctrlShow [7510, false];
ctrlShow [7511, false];
ctrlShow [7512, false];

XFireFighter

Hallo,

mich hat noch der Vorschlag erreicht, eine oder mehrere Flugverbotszonen einzurichten. Hierzu habe ich im Eden Editor 3 Marker platziert, welche ich dann in einem Array hinterlegt habe. Um den "Zonenverstoß sichtbar zu machen, habe ich die Markerfarbe auf Lila gesetzt". Die Größe der Zone kann man der Variable _noFlyDist angegeben werden. Das war eine sehr coole Idee und deshalb hier die überarbeiteten Dateien. kurzes Demo Video Hier

fn_RadarMarker.sqf

Code

params [
    ["_ind", true]
];

_detRange = 4000;
_activeAir = nearestObjects [Radar1, ["Helicopter","Plane"], 4000, false];
_display = findDisplay 7500;
_map = _display displayCtrl 7502;
_noFlys = ["nofly1","nofly2","nofly3"];
_noFlyDist = 200 ;


{
    deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];

} forEach _activeAir;


if (_ind) then {

    {
      if (_x isKindOf "Helicopter" || _x isKindOf "Plane") then {

        if ((Radar1 distance _x > _detRange) || ((getPosATL _x) select 2 < 25)) then {
            _activeAir deleteAt _forEachIndex;
            deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];
        };

          _markerH = createMarkerLocal [Format["Radarmarker_%1", _forEachIndex] , _x ];
          _markerH setMarkerTypeLocal "b_air";
          _height = Round((getPosATL _x) select 2);
          switch (true) do {

              case (_height < 75): {
                  _markerH setMarkerColorLocal "ColorRed";
              };

              case (_height > 75 && _height < 150): {
                  _markerH setMarkerColorLocal "ColorOrange";
              };

              case (_height > 150 && _height < 300 ): {
                  _markerH setMarkerColorLocal "ColorBlue";
              };

              case (_height > 300 && _height < 500 ): {
                  _markerH setMarkerColorLocal "ColorGreen";
              };

              case (_height > 500): {
                  _markerH setMarkerColorLocal "ColorWhite";
              };
          };

          if (_x isKindOf "Plane") then {
            _markerH setMarkerTypeLocal "b_plane";
          };

          _indexAir = _forEachIndex;
        {
          if (getMarkerPos _x distance ( getPosATL (_activeAir select _indexAir )) < _noFlyDist) then {
              _markerH setMarkerColorLocal "ColorPink";
          };
        } forEach _noFlys;

        _markerH setMarkerDirLocal ((direction _x) -90);
        _markerH setMarkerBrushLocal "solid";
        _markerH setMarkerTextLocal format [" %1 || HDG: %2 || H: %3 || V: %4 || D: %5", str (_x) , Round (direction _x), Round((getPosATL _x) select 2), Round (speed _x), Round ( Radar1 distance _x)];
    };

          if ((Radar1 distance _x > _detRange) || ((getPosATL _x) select 2 < 25)) then {
              _activeAir deleteAt _forEachIndex;
              deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];
          };
      };

    } forEach _activeAir;



if !(_ind) then {

    {
        deleteMarkerLocal Format["Radarmarker_%1", _forEachIndex];
    } forEach _activeAir;
};

Alles anzeigen

fn_ATCinfofill.sqf

Code

params [
    ["_ind", true]
];

if (_ind) then {
  _index = lbCurSel 7504;
  _display = findDisplay 7500;
  _map = _display displayCtrl 7502;
  _marker = Format["Radarmarker_%1", _index];
  _map ctrlMapAnimAdd [1, 0.05, getMarkerPos _marker];
  ctrlMapAnimCommit _map;
};

if !(_ind) then {
  _index = lbCurSel 7504;
  ctrlShow [7509, true];
  ctrlShow [7510, true];
  ctrlShow [7511, true];
  ctrlShow [7512, true];
  _detRange = 4000;
  _activeAir = nearestObjects [Radar1, ["Helicopter","Plane"], _detRange, false];
  _target = _activeAir select _index;

  // Infos
    _passengers = fullCrew [_target,"",false];
    _count      = Count _passengers;
    _fuel       = Round((fuel _target) * 100);
    _hp         = Round(100 -(getDammage _target) * 100);
    _dir        = Round (direction _target);
    _grid       = mapGridPosition _target;
    _v          = Round (speed _target);
    _dist       = Round (Radar1 distance _target);
    _dname = [configFile >> "CfgVehicles" >> typeOf _target] call BIS_fnc_displayName;
      ctrlSetText [7509, (format[" Callsign: %1 \n Flugobjekt: %2 \n Treibstoff: %3 % \n Passagiere: %4 \n HP: %5 % \n Flugrichtung: %6 Grad \n Gridposition: %7 \n Geschwindigkeit: %8 Km/H \n Distanz: %9 Meter \n Marker Rot = Höhe < 75 Meter \n Marker Orange = Höhe 75 Meter bis 150 Meter \n Marker Blau = Höhe 150 Meter bis 300 Meter \n Marker Grün = Höhe 300 Meter bis 500 Meter \n Marker Weiß = Höhe > 500 Meter \n Marker Rosa = Verstoß Flugverbotszone",_target,_dname,_fuel,_count,_hp,_dir,_grid,_v,_dist])];
  };

Alles anzeigen

Benutzer online in diesem Thema