2016-07-07 09:46:55 +00:00
|
|
|
#include "script_component.hpp"
|
2018-08-02 14:02:10 +00:00
|
|
|
/*
|
|
|
|
* Author: BaerMitUmlaut
|
|
|
|
*
|
|
|
|
*
|
|
|
|
* Arguments:
|
|
|
|
* 0: The Unit <OBJECT>
|
|
|
|
*
|
|
|
|
* Return Value:
|
|
|
|
* None
|
|
|
|
*
|
|
|
|
* Public: No
|
|
|
|
*/
|
2016-07-07 09:46:55 +00:00
|
|
|
|
2018-08-02 14:02:10 +00:00
|
|
|
params ["_unit"];
|
2016-07-07 09:46:55 +00:00
|
|
|
|
|
|
|
// If the unit died the loop is finished
|
|
|
|
if (!alive _unit) exitWith {};
|
|
|
|
|
|
|
|
// If locality changed, broadcast the last medical state and finish the local loop
|
|
|
|
if (!local _unit) exitWith {
|
2018-05-11 14:28:25 +00:00
|
|
|
_unit setVariable [VAR_HEART_RATE, GET_HEART_RATE(_unit), true];
|
|
|
|
_unit setVariable [VAR_BLOOD_PRESS, _unit getVariable [VAR_BLOOD_PRESS, [80, 120]], true];
|
|
|
|
_unit setVariable [VAR_BLOOD_VOL, GET_BLOOD_VOLUME(_unit), true];
|
2016-07-07 09:46:55 +00:00
|
|
|
};
|
|
|
|
|
2018-05-08 08:17:47 +00:00
|
|
|
[_unit] call EFUNC(medical_vitals,handleUnitVitals);
|
2016-07-07 09:46:55 +00:00
|
|
|
|
2018-05-08 07:47:03 +00:00
|
|
|
private _painLevel = GET_PAIN_PERCEIVED(_unit);
|
2016-12-06 16:26:11 +00:00
|
|
|
if (_painLevel > 0) then {
|
2018-07-18 20:50:03 +00:00
|
|
|
[QEGVAR(medical,moan), [_unit, _painLevel]] call CBA_fnc_localEvent;
|
2016-07-07 09:46:55 +00:00
|
|
|
};
|