#include "script_component.hpp"
/*
 * Author: Ruthberg
 * Opens the Kestrel 4500 dialog
 *
 * Arguments:
 * None
 *
 * Return Value:
 * None
 *
 * Example:
 * call ace_kestrel4500_fnc_createKestrelDialog
 *
 * Public: No
 */

if (GVAR(Kestrel4500)) exitWith { false };
if (underwater ACE_player) exitWith { false };
if (!("ACE_Kestrel4500" in (uniformItems ACE_player)) && !("ACE_Kestrel4500" in (vestItems ACE_player))) exitWith { false };

GVAR(Overlay) = false;
(QGVAR(Layer) call BIS_fnc_rscLayer) cutText ["", "PLAIN"];

GVAR(Kestrel4500) = true;
createDialog 'Kestrel4500_Display';

[{
    if (!dialog || !GVAR(Kestrel4500)) exitWith {
        GVAR(Kestrel4500) = false;
        [_this select 1] call CBA_fnc_removePerFrameHandler;
    };

    [] call FUNC(updateDisplay);
}, 1, _this select 0] call CBA_fnc_addPerFrameHandler;

true