ACE3/addons/medical_blood/functions/fnc_onBleeding.sqf
2018-04-27 16:03:55 +01:00

40 lines
1.1 KiB
Plaintext

/*
* Author: Glowbal
* handle bleeding state (state machine)
*
* Arguments:
* 0: unit <TYPE>
*
* Return Value:
* is Bleeding <BOOL>
*
* Example:
* [UNIT] call ace_medical_blood_fnc_onBleeding
*
* Public: No
*/
#include "script_component.hpp"
params ["_unit"];
if (((vehicle _unit) != _unit) && {!((vehicle _unit) isKindOf "StaticWeapon")}) exitWith {}; // Don't bleed on ground if mounted
private _lastTime = _unit getVariable [QGVAR(lastTime), -10];
private _bloodLoss = (if (GVAR(useAceMedical)) then {GET_BLOOD_LOSS(_unit) * 2.5} else {getDammage _unit * 2}) min 6;
TRACE_1("",_bloodLoss);
if ((CBA_missionTime - _lastTime) + _bloodLoss >= 8 + random 2) then {
_unit setVariable [QGVAR(lastTime), CBA_missionTime];
private _position = getPosASL _unit;
_position = _position vectorAdd [
random 0.4 - 0.2,
random 0.4 - 0.2,
0
];
_position set [2, 0];
private _bloodDrop = ["blooddrop_1", "blooddrop_2", "blooddrop_3", "blooddrop_4"] select floor (_bloodLoss min 3);
[_bloodDrop, _position, getDir _unit] call FUNC(createBlood);
};