// by commy2 and CAA-Picard
#define STRENGHTODEAFNESS 3
#define MAXDEAFNESS 1.1

GVAR(currentDeafness) = 0;
GVAR(newStrength) = 0;

// Spawn volume updating process
0 spawn {
  while {true} do {
    _player = ACE_player;

    // Check if new noises increase deafness
    if (GVAR(newStrength) * STRENGHTODEAFNESS > GVAR(currentDeafness)) then {
      GVAR(currentDeafness) = GVAR(newStrength) * STRENGHTODEAFNESS min MAXDEAFNESS;
    };
    GVAR(newStrength) = 0;

    // Recover rate is slower if deafness is severe
    _recoverRate = 0.01;
    if (GVAR(currentDeafness) > 0.7) then {
      _recoverRate = 0.005;
      if (GVAR(currentDeafness) > 0.9) then {
        _recoverRate = 0.002;
      };
    };

    // Deafness recovers with time
    GVAR(currentDeafness) = GVAR(currentDeafness) - _recoverRate max 0;

    // needed until Bohemia fixes playSound to actually use the second argument
    _volume = (1 - GVAR(currentDeafness) max 0)^2 max 0.1;

    // Earplugs reduce hearing 20%
    if ([_player] call FUNC(hasEarPlugsIn)) then {
      _volume = _volume min 0.8;
    };

    // Reduce volume if player is unconscious
    if (_player getVariable ["ACE_isUnconscious", false]) then {
      _volume = _volume min 0.4;
    };

    if (!(missionNameSpace getVariable [QGVAR(disableVolumeUpdate), false])) then {
      0.1 fadeSound _volume;
      0.1 fadeSpeech _volume;
      _player setVariable ["tf_globalVolume", _volume];
      _player setVariable ["acre_sys_core_globalVolume", _volume];
    };

    //hintSilent format ["GVAR(currentDeafness), _Volume = %1, %2", GVAR(currentDeafness), _volume];

    sleep 0.1;
  };
};