mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
5fbaf426a8
* Fix medical menu not reopening regardless of setting * Ensure no heartrate or bloodpressure on death * Fix status variables not being reset on respawn * Fix JIP resetting status variables for all units * Fix heart rate adjustment overflow and
86 lines
2.8 KiB
Plaintext
86 lines
2.8 KiB
Plaintext
#include "script_component.hpp"
|
|
/*
|
|
* Author: KoffeinFlummi, commy2
|
|
* Initializes unit variables.
|
|
*
|
|
* Arguments:
|
|
* 0: The Unit <OBJECT>
|
|
*
|
|
* Return Value:
|
|
* None
|
|
*
|
|
* Example:
|
|
* [bob] call ACE_medical_fnc_init
|
|
*
|
|
* Public: No
|
|
*/
|
|
|
|
params ["_unit"];
|
|
|
|
if (!local _unit) exitWith {};
|
|
|
|
if (damage _unit > 0) then {
|
|
_unit setDamage 0;
|
|
};
|
|
|
|
// - Blood and heart ----------------------------------------------------------
|
|
_unit setVariable [VAR_BLOOD_VOL, DEFAULT_BLOOD_VOLUME, true];
|
|
_unit setVariable [VAR_HEART_RATE, DEFAULT_HEART_RATE, true];
|
|
_unit setVariable [VAR_HEART_RATE_ADJ, [], true];
|
|
_unit setVariable [VAR_BLOOD_PRESS, [80, 120], true];
|
|
_unit setVariable [VAR_PERIPH_RES, DEFAULT_PERIPH_RES, true];
|
|
_unit setVariable [VAR_PERIPH_RES_ADJ, [], true];
|
|
_unit setVariable [VAR_CRDC_ARRST, false, true];
|
|
_unit setVariable [VAR_HEMORRHAGE, 0, true];
|
|
_unit setVariable [VAR_IS_BLEEDING, false, true];
|
|
|
|
// - Pain ---------------------------------------------------------------------
|
|
_unit setVariable [VAR_PAIN, 0, true];
|
|
_unit setVariable [VAR_IN_PAIN, false, true];
|
|
_unit setVariable [VAR_PAIN_SUPP, 0, true];
|
|
_unit setVariable [VAR_PAIN_SUPP_ADJ, [], true];
|
|
|
|
// - Wounds -------------------------------------------------------------------
|
|
_unit setVariable [QEGVAR(medical,openWounds), [], true];
|
|
_unit setVariable [QEGVAR(medical,bandagedWounds), [], true];
|
|
_unit setVariable [QEGVAR(medical,stitchedWounds), [], true];
|
|
_unit setVariable [QEGVAR(medical,isLimping), false, true];
|
|
|
|
// - Misc ---------------------------------------------------------------------
|
|
_unit setVariable [VAR_UNCON, false, true];
|
|
|
|
// - Treatments ---------------------------------------------------------------
|
|
_unit setVariable [VAR_TOURNIQUET, DEFAULT_TOURNIQUET_VALUES, true];
|
|
_unit setVariable [QEGVAR(medical,occludedMedications), nil, true]; //Delayed Medications (from tourniquets)
|
|
_unit setVariable [QEGVAR(medical,ivBags), nil, true];
|
|
|
|
// triage card and logs
|
|
_unit setVariable [QEGVAR(medical,triageLevel), 0, true];
|
|
_unit setVariable [QEGVAR(medical,triageCard), [], true];
|
|
|
|
// damage storage
|
|
_unit setVariable [QEGVAR(medical,bodyPartDamage), [0,0,0,0,0,0], true];
|
|
#ifdef DEBUG_TESTRESULTS
|
|
_unit setVariable [QEGVAR(medical,bodyPartStatus), [0,0,0,0,0,0], true];
|
|
#endif
|
|
|
|
// medication
|
|
private _allUsedMedication = _unit getVariable [QEGVAR(medical,allUsedMedication), []];
|
|
{
|
|
_unit setVariable [_x select 0, nil];
|
|
} forEach _allUsedMedication;
|
|
_unit setVariable [QEGVAR(medical,allUsedMedication), [], true];
|
|
|
|
// TODO move to treatment
|
|
private _logs = _unit getVariable [QEGVAR(medical,allLogs), []];
|
|
{
|
|
_unit setVariable [_x, nil];
|
|
} forEach _logs;
|
|
_unit setVariable [QEGVAR(medical,allLogs), [], true];
|
|
|
|
[{
|
|
params ["_unit"];
|
|
TRACE_2("Unit Init",_unit,local _unit);
|
|
[QGVAR(initialized), [_unit]] call CBA_fnc_localEvent;
|
|
}, [_unit], 0.5] call CBA_fnc_waitAndExecute;
|