mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
fff66bc27c
Co-authored-by: Salluci <69561145+Salluci@users.noreply.github.com> Co-authored-by: johnb432 <58661205+johnb432@users.noreply.github.com> Co-authored-by: PabstMirror <pabstmirror@gmail.com>
34 lines
1001 B
Plaintext
34 lines
1001 B
Plaintext
#include "..\script_component.hpp"
|
|
/*
|
|
* Author: Glowbal
|
|
* Calculate the total blood loss of a unit.
|
|
*
|
|
* Arguments:
|
|
* 0: The Unit <OBJECT>
|
|
*
|
|
* Return Value:
|
|
* Total blood loss of unit (litres/second) <NUMBER>
|
|
*
|
|
* Example:
|
|
* [player] call ace_medical_status_fnc_getBloodLoss
|
|
*
|
|
* Public: No
|
|
*/
|
|
|
|
params ["_unit"];
|
|
|
|
private _woundBleeding = GET_WOUND_BLEEDING(_unit);
|
|
if (_woundBleeding == 0) exitWith {0};
|
|
|
|
private _cardiacOutput = [_unit] call FUNC(getCardiacOutput);
|
|
private _resistance = _unit getVariable [VAR_PERIPH_RES, DEFAULT_PERIPH_RES]; // can use value directly since this is sum of default and adjustments
|
|
|
|
// even if heart stops blood will still flow slowly (gravity)
|
|
private _bloodLoss = (_woundBleeding * (_cardiacOutput max CARDIAC_OUTPUT_MIN) * (DEFAULT_PERIPH_RES / _resistance) * EGVAR(medical,bleedingCoefficient));
|
|
|
|
private _eventArgs = [_unit, _bloodLoss]; // Pass by reference
|
|
|
|
[QGVAR(getBloodLoss), _eventArgs] call CBA_fnc_localEvent;
|
|
|
|
_eventArgs select 1 // return
|