mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
ffaa195fe5
* Fixed headers to work with silentspike python script * Fixed rest of the files * Fixed ace-team
58 lines
2.0 KiB
Plaintext
58 lines
2.0 KiB
Plaintext
/*
|
|
* Author: Glowbal
|
|
* Calculates the blood volume change and decreases the IVs given to the unit.
|
|
*
|
|
* Arguments:
|
|
* 0: The Unit <OBJECT>
|
|
* 1: Global Sync Values (bloodbags) <BOOL>
|
|
*
|
|
* Return Value:
|
|
* Blood volume change (in % total) <NUMBER>
|
|
*
|
|
* Example:
|
|
* [bob, true] call ACE_medical_fnc_getBloodVolumeChange
|
|
*
|
|
* Public: No
|
|
*/
|
|
|
|
#include "script_component.hpp"
|
|
|
|
/*
|
|
IV Change per second calculation:
|
|
250ml should take 60 seconds to fill. 250/60 = 4.166.
|
|
Basic medical is 10x (will take 6 seconds for 250ml)
|
|
*/
|
|
#define IV_CHANGE_PER_SECOND ([41.66, 4.166] select (GVAR(level) >= 2))
|
|
|
|
params ["_unit", "_syncValues"];
|
|
|
|
private _bloodVolume = _unit getVariable [QGVAR(bloodVolume), 100];
|
|
private _bloodVolumeChange = -([_unit] call FUNC(getBloodLoss));
|
|
|
|
if (!isNil {_unit getVariable QGVAR(ivBags)}) then {
|
|
if (_bloodVolume < 100) then {
|
|
private _bloodBags = _unit getVariable [QGVAR(ivBags), []];
|
|
_bloodBags = _bloodBags apply {
|
|
_x params ["_bagVolumeRemaining"];
|
|
private _bagChange = IV_CHANGE_PER_SECOND min _bagVolumeRemaining; // absolute value of the change in miliLiters
|
|
_bagVolumeRemaining = _bagVolumeRemaining - _bagChange;
|
|
_bloodVolumeChange = _bloodVolumeChange + (_bagChange / 70); // ((bag change in ml) / (body total:7000ml)) out of 100 percent
|
|
if (_bagVolumeRemaining < 0.01) then {
|
|
[]
|
|
} else {
|
|
[_bagVolumeRemaining];
|
|
};
|
|
};
|
|
_bloodBags = _bloodBags - [[]]; // remove empty bags
|
|
if (_bloodBags isEqualTo []) then {
|
|
_unit setVariable [QGVAR(ivBags), nil, true]; // no bags left - clear variable (always globaly sync this)
|
|
} else {
|
|
_unit setVariable [QGVAR(ivBags), _bloodBags, _syncValues];
|
|
};
|
|
} else {
|
|
_unit setVariable [QGVAR(ivBags), nil, true]; // blood volume = 100% - clear variable (always globaly sync this)
|
|
};
|
|
};
|
|
|
|
_bloodVolumeChange;
|