Added cardiac arrest

This commit is contained in:
Glowbal 2015-02-08 00:08:36 +01:00
parent b8be7775bd
commit 35de875382
3 changed files with 56 additions and 3 deletions

View File

@ -12,5 +12,12 @@ PREP(handleFractures);
PREP(handleInternalInjuries);
PREP(init);
PREP(selectionNameToNumber);
PREP(handleDamage_wounds);
PREP(handleUnitVitals);
PREP(getBloodLoss);
PREP(getBloodPressure);
PREP(getBloodVolumeChange);
PREP(getCardiacOutput);
PREP(setCardiacArrest);
ADDON = true;

View File

@ -93,12 +93,12 @@ if ((missionNamespace getvariable[QGVAR(setting_AdvancedLevel), 0]) > 0) exitwit
// Check vitals for medical status
// TODO check for in revive state instead of variable
// TODO Implement cardiac arrest.
/* _bloodPressureL = _bloodPressure select 0;
_bloodPressureL = _bloodPressure select 0;
_bloodPressureH = _bloodPressure select 1;
if (!(_unit getvariable [QGVAR(inCardiacArrest),false])) then {
if (_heartRate < 10 || _bloodPressureH < 30 || _bloodVolume < 20) then {
[_unit] call FUNC(setUnconsciousState); // safety check to ensure unconsciousness for units if they are not dead already.
//[_unit] call FUNC(setUnconsciousState); // safety check to ensure unconsciousness for units if they are not dead already.
};
if (_bloodPressureH > 260) then {
@ -123,5 +123,5 @@ if ((missionNamespace getvariable[QGVAR(setting_AdvancedLevel), 0]) > 0) exitwit
if (_heartRate < 20) then {
[_unit] call FUNC(setCardiacArrest);
};
};*/
};
};

View File

@ -0,0 +1,46 @@
/**
* fn_setCardiacArrest.sqf
* @Descr: Triggers a unit into the Cardiac Arrest state from CMS. Will put the unit in an unconscious state and run a countdown timer until unit dies. <br />Timer is a random value between 120 and 720 seconds.
* @Author: Glowbal
*
* @Arguments: [unit OBJECT (The unit that will be put in cardiac arrest state)]
* @Return: void
* @PublicAPI: true
*/
#include "script_component.hpp"
private ["_unit", "_modifier","_timer","_counter", "_heartRate"];
_unit = _this select 0;
if (_unit getvariable [QGVAR(inCardiacArrest),false]) exitwith {};
_unit setvariable [QGVAR(inCardiacArrest), true,true];
_unit setvariable [QGVAR(heartRate), 0];
["Medical_onEnteredCardiacArrest", [_unit]] call ace_common_fnc_localEvent;
//[_unit] call FUNC(setUnconsciousState);
_counter = 120 + round(random(600));
_timer = 0;
[{
private ["_args","_unit","_timer","_counter","_heartRate"];
_args = _this select 0;
_unit = _args select 0;
_timer = _args select 1;
_counter = _args select 2;
_heartRate = _unit getvariable [QGVAR(heartRate), 0];
if (_heartRate > 0 || !alive _unit) exitwith {
_unit setvariable [QGVAR(inCardiacArrest), nil,true];
[(_this select 1)] call cba_fnc_removePerFrameHandler;
};
if (_counter - _timer < 1) exitwith {
//[_unit] call FUNC(setDead);
[(_this select 1)] call cba_fnc_removePerFrameHandler;
_unit setvariable [QGVAR(inCardiacArrest), nil,true];
};
_args set[1, _timer + 1];
}, 1, [_unit, _timer, _counter] ] call CBA_fnc_addPerFrameHandler;