mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
31 lines
1.1 KiB
Plaintext
31 lines
1.1 KiB
Plaintext
/*
|
|
* Author: Zakant
|
|
* Calculate the blood lost and blood volume for a unit. Used from CPR to simulate a heart rate while in cardiac arrest.
|
|
*
|
|
* Arguments:
|
|
* 0: Unit <OBJECT>
|
|
*
|
|
* Return Value:
|
|
* None
|
|
*
|
|
* Public: No
|
|
*/
|
|
#include "script_component.hpp"
|
|
|
|
params["_unit"];
|
|
|
|
// We will just simulate blood flow for now!
|
|
private _lastTimeUpdated = _unit getVariable [QEGVAR(medical,lastTimeUpdated), CBA_missionTime];
|
|
private _deltaT = CBA_missionTime - _lastTimeUpdated;
|
|
|
|
private _lastTimeValuesSynced = _unit getVariable [QEGVAR(medical,lastMomentValuesSynced), 0];
|
|
private _syncValues = (CBA_missionTime - _lastTimeValuesSynced) >= (10 + floor(random(10)));
|
|
|
|
_unit setVariable [QEGVAR(medical,lastTimeUpdated), CBA_missionTime];
|
|
if (_deltaT != 0) then {
|
|
private _change = ([_unit, _deltaT, _syncValues] call EFUNC(medical_status,getBloodVolumeChange));
|
|
private _bloodVolume = (_unit getVariable [QEGVAR(medical,bloodVolume), DEFAULT_BLOOD_VOLUME]) + _change;
|
|
_bloodVolume = 0 max _bloodVolume min DEFAULT_BLOOD_VOLUME;
|
|
_unit setVariable [QEGVAR(medical,bloodVolume), _bloodVolume, _syncValues];
|
|
};
|