ACE3/addons/medical_treatment/functions/fnc_findMostEffectiveWounds.sqf
jonpas 742626ff1a
General - Relative script_component.hpp includes (#9378)
Co-authored-by: PabstMirror <pabstmirror@gmail.com>
2023-09-12 20:58:10 +02:00

93 lines
3.4 KiB
Plaintext

#include "..\script_component.hpp"
/*
* Author: kymckay, LinkIsGrim
* Finds the most effective wounds to bandage on the given bodypart of the patient for the given bandage type and remaining overall bandage effectiveness.
*
* Arguments:
* 0: Patient <OBJECT>
* 1: Treatment classname <STRING>
* 2: Body part <STRING>
* 3: Amount of bandage remaining <NUMBER> (default: 1)
* 4: Wounds found from prior runs of the function <HASHMAP> (default: Empty Hashmap)
*
* Return Value:
* [Wound, [Effectiveness, Index, Impact]] <HASHMAP> of <ARRAY>:<NUMBER, NUMBER, NUMBER>
*
* Example:
* [cursorObject, "FieldDressing", "rightleg"] call ace_medical_treatment_fnc_findMostEffectiveWounds
*
* Public: No
*/
params ["_patient", "_bandage", "_bodyPart", ["_bandageRemaining", 1], ["_foundWounds", createHashMap]];
TRACE_1("findMostEffectiveWounds",count _foundWounds);
// Get the default effectiveness for the used bandage
private _config = configFile >> QUOTE(ADDON) >> "Bandaging";
private _effectiveness = getNumber (_config >> "effectiveness");
if (isClass (_config >> _bandage)) then {
_config = (_config >> _bandage);
if (isNumber (_config >> "effectiveness")) then {
_effectiveness = getNumber (_config >> "effectiveness");
};
};
// Iterate over open wounds to find the most effective target
private _openWounds = GET_OPEN_WOUNDS(_patient) getOrDefault [_bodyPart, []];
if (_openWounds isEqualTo []) exitWith {_foundWounds};
private _wound = EMPTY_WOUND;
private _woundIndex = -1;
private _effectivenessFound = -1;
private _impactFound = -1;
{
// Ignore iterated wounds
if (_x in _foundWounds) then {continue};
_x params ["_classID", "_amountOf", "_bleeding", "_damage"];
private _woundEffectiveness = _effectiveness;
// Select the classname from the wound classname storage
private _className = EGVAR(medical_damage,woundClassNamesComplex) select _classID;
// Get the effectiveness of the bandage on this wound type
if (isClass (_config >> _className)) then {
private _woundTreatmentConfig = _config >> _className;
if (isNumber (_woundTreatmentConfig >> "effectiveness")) then {
_woundEffectiveness = getNumber (_woundTreatmentConfig >> "effectiveness");
};
} else {
// Basic medical bandage just has a base level config (same effectiveness for all wound types)
if (_bandage != "BasicBandage") then {
WARNING_2("No config for wound type [%1] config base [%2]",_className,_config);
};
};
// Multiply by bandageRemaining in case this is a rollover
_woundEffectiveness = _woundEffectiveness * _bandageRemaining;
// Track most effective found so far
if ((_woundEffectiveness * _amountOf * _bleeding) > (_effectivenessFound * (_wound select 1) * (_wound select 2))) then {
_effectivenessFound = _woundEffectiveness;
_impactFound = _amountOf min _effectivenessFound;
_woundIndex = _forEachIndex;
_wound = _x;
};
} forEach _openWounds;
if (_woundIndex isEqualTo -1) exitWith {_foundWounds};
_bandageRemaining = _bandageRemaining - (_impactFound/_effectivenessFound);
_foundWounds set [_wound, [_effectivenessFound, _woundIndex, _impactFound]];
// recursion, run function again to find next most effective wound
if (GVAR(bandageRollover) && {_bandageRemaining > 0}) then {
[_patient, _bandage, _bodyPart, _bandageRemaining, _foundWounds] call FUNC(findMostEffectiveWounds);
};
_foundWounds // return