ACE3/addons/medical_treatment/functions/fnc_actionDiagnose.sqf

#include "script_component.hpp"
/*
* Author: Glowbal
* Action for diagnosing in basic medical
*
* Arguments:
* 0: The medic <OBJECT>
* 1: The patient <OBJECT>
*
* Return Value:
* None
*
* Public: No
*/

params ["_caller", "_target"];

private _genericMessages = [ELSTRING(medical_treatment,diagnoseMessage), _target call EFUNC(common,getName)];

if (alive _target) then {
    _genericMessages pushBack ELSTRING(medical_treatment,diagnoseAlive);
} else {
    _genericMessages pushBack ELSTRING(medical_treatment,diagnoseDead);
};

private _hemorrhage = GET_HEMORRHAGE(_target);
if (_hemorrhage > 0) then {
    if (_hemorrhage > 1) then {
        _genericMessages pushBack ELSTRING(medical_treatment,lostBloodALot);
    } else {
        _genericMessages pushBack ELSTRING(medical_treatment,lostBlood);
    };
} else {
    _genericMessages pushBack ELSTRING(medical_treatment,noBloodloss);
};

if (alive _target) then {
    if IS_IN_PAIN(_target) then {
        _genericMessages pushBack ELSTRING(medical_treatment,inPain);
    } else {
        _genericMessages pushBack ELSTRING(medical_treatment,noPain);
    };
};

[QEGVAR(common,displayTextStructured), [_genericMessages, 3.0, _caller], _caller] call CBA_fnc_targetEvent;