bla

/*
    author: Maxence Lyon
    altis DEV: https://altisdev.com/user/maxence-lyon
    Teamspeak 3: ts.the-programmer.com
    Web site: www.the-programmer.com
    Steam: « Une Vache Sur CS – Maxence », please leave a message on my profile who says the exact reason before adding me.

    Terms of use:
        - This file is forbidden unless you have permission from the author. If you have this file without permission to use it please do not use it and do not share it.
        - If you have permission to use this file, you can use it on your server however it is strictly forbidden to share it.
        - Out of respect for the author please do not delete this information.

    License number:
    Server's name:
    Owner's name:
*/


_allow = false;
if (player getVariable "CopimDienst") then {_allow = true};
if (player getVariable "MedimDienst") then {_allow = true};
if (player getVariable "AdacimDienst") then {_allow = true};
//if ((getNumber (missionConfigFile >> "Max_Settings_Dispatch" >> "enable_east") isEqualTo 1) && (playerSide isEqualTo east)) then {_allow = true};

if !(_allow) exitWith {hint (["STR_ACCES_DENIED","Max_Settings_Dispatch","Dispatch_Localization"] call theprogrammer_core_fnc_localize);};

if ((missionNamespace getVariable ["maxence_call_curTask",-1]) isEqualTo -1) then {
    maxence_call_curTask = taskNull;
};

createDialog "maxence_call_management";
disableSerialization;

_display = findDisplay 6930;
_requestList = _display displayCtrl 6943;
_listPreset = _display displayCtrl 6947;
_assignList = _display displayCtrl 6956;

lbClear _requestList;
lbClear _assignList;

_texturePath = getText (missionConfigFile >> "Max_Settings_Dispatch" >> "textures_base_path");
_texturePathFormated = _texturePath + "\";
_texture = [_texturePathFormated,[["span class="re5"> fr","span class="re5"> fond_dispatch.paa"],["span class="re5"> en","span class="re5"> fond_dispatch_en.paa"],["span class="re5"> de","span class="re5"> fond_dispatch_de.paa"],["span class="re5"> es","span class="re5"> fond_dispatch_es.paa"]],"span class="re5"> Max_Settings_Dispatch"] call theprogrammer_core_fnc_localizeTexture;
(_display displayCtrl 6931) ctrlSetText _texture;

_arrayMessages = getarray (missionConfigFile >> "span class="re5"> Max_Settings_Dispatch" >> "span class="re5"> messages_preset");
{
    _listPreset lbadd ([(_x select 0),"span class="re5"> Max_Settings_Dispatch","span class="re5"> Dispatch_Localization"] call theprogrammer_core_fnc_localize);
    _listPreset lbSetData [(lbSize _listPreset)-1,(_x select 1)];
} forEach ([[(["span class="re5"> STR_CUSTOM_MESSAGE","span class="re5"> Max_Settings_Dispatch","span class="re5"> Dispatch_Localization"] call theprogrammer_core_fnc_localize),""]] + _arrayMessages);

_listPreset lbSetCurSel 0;

_index = 0;

{
    if (!(isNull _x) && (alive _x) && ((side _x) isEqualTo playerSide)) then {
        _assignList lbadd (name _x);
        _assignList lbSetData [(lbSize _assignList)-1,str(_x)];
        if (player isEqualTo _x) then {_index = ((lbSize _assignList)-1);};
    };
} forEach playableUnits;

_assignList lbSetCurSel _index;

ctrlShow [6953,false];
ctrlEnable [6954,false];
ctrlEnable [6955,false];
ctrlEnable [6942,false];
ctrlShow [6940,false];
ctrlEnable [6946,false];
ctrlEnable [6945,false];
ctrlEnable [6947,false];
ctrlShow [6956,false];

_oldVar = [];
_newVar = {[]};
while {!(isNull (findDisplay 6930))} do {
  /*  _newVar = switch (playerSide) do {
        case west : maxence_waiting_cop_calls;
        case independent : maxence_waiting_med_calls;
        case east : {maxence_waiting_east_calls};
        default {[]};
    };
*/

    if (player getVariable "span class="re5"> CopimDienst") then {
        _newVar = maxence_waiting_cop_calls
    };
    if (player getVariable "span class="re5"> MedimDienst") then  {
        _newVar = maxence_waiting_med_calls;
    };

    _newRequests = _newVar - _oldVar;
    _removedRequest = _oldVar - _newVar;

    if ((count _newVar) isEqualto 0) then {
        lbClear _requestList;
        _requestList lbadd (["span class="re5"> STR_NO_CALLS","span class="re5"> Max_Settings_Dispatch","span class="re5"> Dispatch_Localization"] call theprogrammer_core_fnc_localize);
        _requestList lbSetData [0,"span class="re5"> NULL"];

        {
            (_display displayCtrl _x) ctrlSetText "";
        } forEach [6948,6949,6950,6951,6952];

        ctrlEnable [6954,false];
        ctrlEnable [6955,false];
        ctrlEnable [6942,false];
        ctrlShow [6940,false];
    } else {
        {
            _type = switch (_x select 6) do {
                case 0 : {(["span class="re5"> STR_TYPE_MESSAGE","span class="re5"> Max_Settings_Dispatch","span class="re5"> Dispatch_Localization"] call theprogrammer_core_fnc_localize)};
                case 1 : {(["span class="re5"> STR_TYPE_APPEL","span class="re5"> Max_Settings_Dispatch","span class="re5"> Dispatch_Localization"] call theprogrammer_core_fnc_localize)};
                default {"span class="re5"> NULL"};
            };

            _text = format ["%1 - %2",(_x select 0),_type];
            _requestList lbadd _text;

            if ((_x select 4) isEqualto "") then {
                _requestList lbSetPicture [(lbSize _requestList)-1,format ["%1\not_assigned.paa",_texturePath]];
            } else {
                _requestList lbSetPicture [(lbSize _requestList)-1,format ["%1\assigned.paa",_texturePath]];
            };
        } forEach _newRequests;

        {
            _index = -1;
            for "_i" from 0 to (lbSize 6943)-1 do {
                if ((_oldVar select _i) isEqualTo _x) exitWith {_index = _i;};
            };

            if !(_index isEqualTo -1) then {
                _requestList lbDelete _index;

                if ((lbCurSel 6943) isEqualTo _index) then {
                    {
                        (_display displayCtrl _x) ctrlSetText "";
                    } forEach [6948,6949,6950,6951,6952];

                    ctrlEnable [6954,false];
                    ctrlEnable [6955,false];
                    ctrlEnable [6942,false];
                    ctrlShow [6940,false];
                    _requestList lbSetCurSel -1;
                };
            };
        } forEach _removedRequest;
    };

    _oldVar = _newVar;
    sleep 3;
};