mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
42 lines
1.4 KiB
Plaintext
42 lines
1.4 KiB
Plaintext
/**
|
|
* fn_getBloodLoss.sqf
|
|
* @Descr: Calculate the total blood loss of a unit.
|
|
* @Author: Glowbal
|
|
*
|
|
* @Arguments: [unit OBJECT]
|
|
* @Return: NUMBER Total blood loss of unit
|
|
* @PublicAPI: true
|
|
*/
|
|
|
|
#include "script_component.hpp"
|
|
|
|
#define BLOODLOSS_SMALL_WOUNDS 0.025
|
|
#define BLOODLOSS_MEDIUM_WOUNDS 0.05
|
|
#define BLOODLOSS_LARGE_WOUNDS 0.1
|
|
|
|
/**
|
|
* The default cardiac output when all stats are set to normal is 5.25.
|
|
*/
|
|
#define DEFAULT_CARDIAC_OUTPUT 5.25
|
|
|
|
private ["_totalBloodLoss","_tourniquets","_openWounds", "_value", "_cardiacOutput"];
|
|
|
|
|
|
// TODO Only use this calculation if medium or higher, otherwise use vanilla calculations (for basic medical).
|
|
_totalBloodLoss = 0;
|
|
_tourniquets = _this getvariable [QGVAR(tourniquets), [0,0,0,0,0,0]];
|
|
_openWounds = _this getvariable [QGVAR(openWounds), []];
|
|
//_cardiacOutput = [_this] call FUNC(getCardiacOutput);
|
|
|
|
{
|
|
if ((_tourniquets select (_x select 2)) < 1) then {
|
|
|
|
_totalBloodLoss = _totalBloodLoss + ([BLOODLOSS_SMALL_WOUNDS, BLOODLOSS_MEDIUM_WOUNDS, BLOODLOSS_LARGE_WOUNDS] select (_x select 1));
|
|
// (((BLOODLOSS_SMALL_WOUNDS * (_x select 0))) + ((BLOODLOSS_MEDIUM_WOUNDS * (_x select 1))) + ((BLOODLOSS_LARGE_WOUNDS * (_x select 2))) * (_cardiacOutput / DEFAULT_CARDIAC_OUTPUT));
|
|
};
|
|
}foreach _openWounds;
|
|
|
|
// cap the blood loss to be no greater as the current cardiac output
|
|
//(_totalBloodLoss min _cardiacOutput);
|
|
|
|
_totalBloodLoss; |