ACE3/addons/medical_treatment/functions/fnc_addToTriageCard.sqf
PabstMirror bec55114fa Add load,unload and radial actions (#5270)
- Add radial actions
- Revert back to using 'ACE_isUnconscious'
2017-06-15 14:35:33 -05:00

47 lines
1.0 KiB
Plaintext

/*
* Author: Glowbal
* Add an entry to the triage card
*
* Arguments:
* 0: The patient <OBJECT>
* 1: The new item class name <STRING>
*
* Return Value:
* None
*
* Example:
* [bob, "bandage"] call ACE_medical_treatment_fnc_addToTriageCard
*
* Public: Yes
*/
#include "script_component.hpp"
params ["_unit", "_newItem"];
if (!local _unit) exitWith {
[QGVAR(addToTriageCard), _this, _unit] call CBA_fnc_targetEvent;
};
private _log = _unit getVariable [QEGVAR(medical,triageCard), []];
private _inList = false;
private _amount = 1;
{
if (_x select 0 == _newItem) exitWith {
private _info = _log select _forEachIndex;
_info set [1, (_info select 1) + 1];
_info set [2, CBA_missionTime];
_log set [_forEachIndex, _info];
_amount = _info select 1;
_inList = true;
};
} forEach _log;
if (!_inList) then {
_log pushBack [_newItem, 1, CBA_missionTime];
};
_unit setVariable [QEGVAR(medical,triageCard), _log, true];
["ace_triageCardItemAdded", [_unit, _newItem, _amount]] call CBA_fnc_localEvent;