2015-04-20 11:54:22 +00:00
|
|
|
/*
|
|
|
|
* Author: ACE2 Team
|
|
|
|
*
|
|
|
|
* Updates GVAR(currentHumidity) based on
|
|
|
|
*
|
|
|
|
* Argument:
|
|
|
|
* Nothing
|
|
|
|
*
|
|
|
|
* Return value:
|
|
|
|
* Nothing
|
|
|
|
*/
|
|
|
|
#include "script_component.hpp"
|
|
|
|
|
|
|
|
private ["_month", "_avgTemperature", "_pS1", "_pS2"];
|
|
|
|
_month = date select 1;
|
|
|
|
|
2015-05-05 08:37:51 +00:00
|
|
|
GVAR(currentHumidity) = (GVAR(Humidity) select (_month - 1)) / 100;
|
2015-04-20 11:54:22 +00:00
|
|
|
|
|
|
|
if (rain > 0 && overcast > 0.7) then {
|
|
|
|
GVAR(currentHumidity) = 1;
|
|
|
|
} else {
|
|
|
|
_avgTemperature = ((GVAR(TempDay) select (_month - 1)) + (GVAR(TempNight) select (_month - 1))) / 2;
|
|
|
|
_pS1 = 6.112 * exp((17.62 * _avgTemperature) / (243.12 + _avgTemperature));
|
|
|
|
_PS2 = 6.112 * exp((17.62 * GVAR(currentTemperature)) / (243.12 + GVAR(currentTemperature)));
|
|
|
|
GVAR(currentHumidity) = GVAR(currentHumidity) * _PS1 / _PS2;
|
2015-04-21 18:41:50 +00:00
|
|
|
GVAR(currentHumidity) = GVAR(currentHumidity) + GVAR(humidityShift);
|
2015-04-22 19:16:01 +00:00
|
|
|
|
|
|
|
TRACE_1("humidityShift",GVAR(humidityShift));
|
2015-04-20 11:54:22 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
GVAR(currentHumidity) = 0 max GVAR(currentHumidity) min 1;
|