ACE Compats - Context menu Action to Open Ace Medical Menu on Unit (#805)

* add context for ace medical menu

* ace medical menu context menu action - priority: 51

* healUnits context menu action - priority: 52

* string pascalcase

* _entity and lazyEval

* _entity, rm line and ACEFUNC

* fnl

* Update fnc_canOpenMedicalMenu.sqf

* Update CfgContext.hpp

* Apply suggestions from code review

---------

Co-authored-by: BrettMayson <brett@mayson.io>

Author: OverlordZorn

addons/compat_ace/CfgContext.hpp

@@ -0,0 +1,9 @@
+class EGVAR(context_menu,actions) {
+    class AceMedicalMenu {
+        displayName = CSTRING(OpenMedicalMenu);
+        icon = QPATHTOEF(context_actions,ui\medical_cross_ca.paa);
+        condition = QUOTE(_hoveredEntity call FUNC(canOpenMedicalMenu));
+        statement = QUOTE(_hoveredEntity call FUNC(openMedicalMenu));
+        priority = 51;
+    };  
+};

addons/compat_ace/XEH_PREP.hpp

@@ -1,3 +1,5 @@
 PREP(canFastrope);
+PREP(canOpenMedicalMenu);
 PREP(canRemoteControl);
+PREP(openMedicalMenu);
 PREP(remoteControl);

addons/compat_ace/config.cpp

@@ -26,3 +26,4 @@ PRELOAD_ADDONS;
 #include "CfgVehicles.hpp"
 #include "CfgWaypointTypes.hpp"
 #include "ACE_ZeusActions.hpp"
+#include "CfgContext.hpp"

addons/compat_ace/functions/fnc_canOpenMedicalMenu.sqf

@@ -0,0 +1,24 @@
+#include "script_component.hpp"
+/*
+ * Author: OverlordZorn
+ * Checks if the ace medical menu can be opened for an unit.
+ *
+ * Arguments:
+ * 0: Entity <ANY>
+ *
+ * Return Value:
+ * Can Open ACE Medical Menu <BOOL>
+ *
+ * Example:
+ * [_entity] call zen_compat_ace_fnc_canOpenMedicalMenu
+ *
+ * Public: No
+ */
+
+params ["_entity"];
+
+_entity isEqualType objNull
+&& {!isNull _entity}
+&& {_entity isKindOf "CAManBase"}
+&& {["ace_medical_gui"] call ACEFUNC(common,isModLoaded)}
+&& {[objNull, _entity] call ACEFUNC(medical_gui,canOpenMenu)}

addons/compat_ace/functions/fnc_openMedicalMenu.sqf

@@ -0,0 +1,20 @@
+#include "script_component.hpp"
+/*
+ * Author: OverlordZorn
+ * Opens ace medical menu for an unit.
+ *
+ * Arguments:
+ * 0: Entity <ANY>
+ *
+ * Return Value:
+ * None
+ *
+ * Example:
+ * [_entity] call zen_compat_ace_fnc_openMedicalMenu
+ *
+ * Public: No
+ */
+
+params ["_entity"];
+
+[_entity] call ACEFUNC(medical_gui,openMenu);

addons/compat_ace/stringtable.xml

@@ -15,6 +15,9 @@
             <French>Cacher les modules ACE</French>
             <Chinesesimp>隐藏ACE模块</Chinesesimp>
         </Key>
+        <Key ID="STR_ZEN_Compat_ACE_OpenMedicalMenu">
+            <English>Open Medical Menu</English>
+        </Key>
         <Key ID="STR_ZEN_Compat_ACE_HideModules_Description">
             <English>Hides duplicate modules added by ACE Zeus. Requires display reload.</English>
             <Korean>ACE 제우스에 의해 추가된 모듈을 숨깁니다. 디스플레이 재시작이 필요합니다.</Korean>

addons/context_actions/CfgContext.hpp

@@ -187,7 +187,7 @@ class EGVAR(context_menu,actions) {
     class HealUnits {
         displayName = "$STR_State_Heal";
         icon = QPATHTOF(ui\medical_cross_ca.paa);
-        priority = 50;
+        priority = 52;
         class All {
             displayName = ECSTRING(common,All);
             condition = QUOTE([ARR_2(_objects,_args)] call FUNC(canHealUnits));