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
/**
|
|
* fn_getBloodPressure.sqf
|
|
* @Descr: Calculate the current blood pressure of a unit.
|
|
* @Author: Glowbal
|
|
*
|
|
* @Arguments: [unit OBJECT (The unit to get the blood pressure from.)]
|
|
* @Return: ARRAY Blood Pressure. Format [low NUMBER, high NUMBER]
|
|
* @PublicAPI: true
|
|
*/
|
|
|
|
#include "script_component.hpp"
|
|
|
|
/*
|
|
Value is taken because with cardic output and resistance at default values, it will put blood pressure High at 120.
|
|
*/
|
|
#define MODIFIER_BP_HIGH 0.229
|
|
|
|
/*
|
|
Value is taken because with cardic output and resistance at default values, it will put blood pressure Low at 80.
|
|
*/
|
|
#define MODIFIER_BP_LOW 0.1524
|
|
|
|
private ["_unit", "_bloodPressureLow", "_bloodPressureHigh", "_cardiacOutput", "_resistance"];
|
|
_unit = _this select 0;
|
|
_cardiacOutput = [_unit] call FUNC(getCardiacOutput);
|
|
_resistance = [_unit, QGVAR(peripheralResistance)] call EFUNC(common,getDefinedVariable);
|
|
|
|
_bloodPressureHigh = (_cardiacOutput * MODIFIER_BP_HIGH) * _resistance;
|
|
_bloodPressureLow = (_cardiacOutput * MODIFIER_BP_LOW) * _resistance;
|
|
|
|
[_bloodPressureLow, _bloodPressureHigh]; |