Medical adjustments2

[commy2]

more recent branch of #2304 that includes some fixes from the "cleanup" and some debug stuff

[commy2]

Just putting some notes here:

12:36:46 21858
12:36:46 ["head",0]
12:36:46 21858
12:36:46 ["",0.125134]
12:36:46 21858
12:36:46 ["",0.125134]
12:36:46 21858
12:36:46 ["head",0]
12:36:46 21858
12:36:46 ["body",0.30695]
12:36:46 21858
12:36:46 ["hand_l",0]
12:36:46 21858
12:36:46 ["hand_r",0.0148034]
12:36:47 21859
12:36:47 ["",0.125134]


12:36:47 21863
12:36:47 ["head",0]
12:36:47 21863
12:36:47 ["",0.125134]
12:36:47 21863
12:36:47 ["",0.250268]
12:36:47 21863
12:36:47 ["head",0]
12:36:47 21863
12:36:47 ["body",0.613901]
12:36:47 21863
12:36:47 ["hand_l",0]
12:36:47 21863
12:36:47 ["hand_r",0.0307413]
12:36:47 21863
12:36:47 ["",0.250268]

---

#include "script_component.hpp"

params ["_unit", "_selection", "_damage", "_shooter", "_projectile"];
TRACE_5("ACE_DEBUG: HandleDamage Called",_unit,_selection,_damage,_shooter,_projectile);

// bug, apparently can fire for remote units in special cases
if !(local _unit) exitWith {
    TRACE_2("ACE_DEBUG: HandleDamage on remote unit!",_unit,isServer);
    nil
};

private ["_damageReturn",  "_typeOfDamage", "_minLethalDamage", "_newDamage", "_typeIndex", "_preventDeath"];

// bug, assumed fixed, @todo excessive testing, if nothing happens remove
if (typeName _projectile == "OBJECT") then {
    _projectile = typeOf _projectile;
    _this set [4, _projectile];
};

TRACE_3("ACE_DEBUG: HandleDamage",_selection,_damage,_unit);

// If damage is in dummy hitpoints, "hands" and "legs", don't change anything
if (_selection == "hands") exitWith {_unit getHit "hands"};
if (_selection == "legs") exitWith {_unit getHit "legs"};

// If the damage is being weird, we just tell it to fuck off. Ignore: "hands", "legs", "?"
if (_selection != "" && {!(_selection in GVAR(SELECTIONS))}) exitWith {0}; //@todo "neck", "pelvis", "spine1", "spine2", "spine3"

/*
diag_log text str diag_frameno;
diag_log text str [_selection, _damage];
*/

//
if (_selection == "") then {
    GVAR(HDEID) = (GETMVAR(GVAR(HDEID),0)) + 1;
};
if (GETMVAR(GVAR(HDEID),0) == 1) then {
    GVAR(HDEADE) = [];
};
if (GETMVAR(GVAR(HDEID),0) == 2) then {
    GVAR(HDEADE) pushBack _selection;
};
if (GETMVAR(GVAR(HDEID),0) == 3) then {
    diag_log text str GVAR(HDEADE);
    GVAR(HDEID) = 0;
};
//

_damage