Interaction - Add remote squad management

addons/interaction/CfgVehicles.hpp

@@ -253,6 +253,12 @@ class CfgVehicles {
                 modifierFunction = QUOTE([ARR_3(assignedTeam _target,'PATHTOF(UI\team\team_management_ca.paa)',_this select 3)] call FUNC(modifyTeamManagementAction));
                 showDisabled = 1;
 
+                class ACE_Squad {
+                    displayName = CSTRING(Squad);
+                    condition = QUOTE(GVAR(remoteTeamManagement));
+                    exceptions[] = {"isNotSwimming", "isNotInside", "isNotSitting", "isNotOnLadder", "isNotRefueling"};
+                    insertChildren = QUOTE(call FUNC(addSquadChildren));
+                };
                 class ACE_JoinTeamRed {
                     displayName = CSTRING(JoinTeamRed);
                     condition = QUOTE(true);
@@ -316,12 +322,6 @@ class CfgVehicles {
                     statement = QUOTE(_player call FUNC(renameGroupUI));
                     showDisabled =1;
                 };
-                class ACE_groupDropDistantUnits {
-                    displayName = CSTRING(groupDropDistantUnits);
-                    condition = QUOTE(call FUNC(canGroupDropDistantUnits));
-                    exceptions[] = {"isNotSwimming", "isNotInside", "isNotSitting", "isNotOnLadder", "isNotRefueling"};
-                    statement = QUOTE(call FUNC(groupDropDistantUnits));
-                };
             };
 
             class ACE_Equipment {

addons/interaction/XEH_PREP.hpp

@@ -13,6 +13,7 @@ PREP(showMouseHint);
 PREP(hideMouseHint);
 
 // interaction with units
+PREP(addSquadChildren);
 PREP(canInteractWithCivilian);
 PREP(canInteractWithVehicleCrew);
 PREP(getDown);
@@ -36,8 +37,6 @@ PREP(pullOutBody);
 PREP(canRenameGroup);
 PREP(renameGroupUI);
 PREP(renameGroup);
-PREP(canGroupDropDistantUnits);
-PREP(groupDropDistantUnits);
 
 // Weapon Attachments
 PREP(getWeaponAttachmentsActions);

addons/interaction/functions/fnc_addSquadChildren.sqf

@@ -0,0 +1,51 @@
+#include "..\script_component.hpp"
+/*
+ * Author: PabstMirror
+ * Gets the squad child actions
+ *
+ * Arguments:
+ * 1: Player <OBJECT>
+ *
+ * Return Value:
+ * Children actions <ARRAY>
+ *
+ * Example:
+ * [player, player] call ace_interaction_fnc_addSquadChildren
+ *
+ * Public: No
+ */
+
+params ["", "_player"];
+
+private _fnc_color = {
+    (switch (toUpper _this) do {
+        case "RED": {missionNamespace getVariable [QEGVAR(nametags,nametagColorRed), [221, 0, 0]]};
+        case "GREEN": {missionNamespace getVariable [QEGVAR(nametags,nametagColorGreen), [0, 221, 0]]};
+        case "BLUE": {missionNamespace getVariable [QEGVAR(nametags,nametagColorBlue), [0, 0, 221]]};
+        case "YELLOW": {missionNamespace getVariable [QEGVAR(nametags,nametagColorYellow), [221, 221, 0]]};
+        default {missionNamespace getVariable [QEGVAR(nametags,nametagColorMain), [255, 255, 255]]};
+    }) call BIS_fnc_colorRGBtoHTML
+};
+
+private _units = (units group _player) - [_player];
+
+private _subActions = [];
+_subActions pushBack (["drop", localize "str_a3_endgame_notifications_title_drop", "\a3\ui_f\data\igui\cfg\actions\ico_off_ca.paa", 
+    {[_target] joinSilent grpNull}, {true}] call EFUNC(interact_menu,createAction));
+
+{
+    private _icon = [QPATHTOF(UI\team\team_white_ca.paa), _x call _fnc_color];
+    private _name = if (_x != "MAIN") then { localize format [LSTRING(AssignTeam%1), _x] } else { LLSTRING(LeaveTeam) };
+    _subActions pushBack ([_x, _name, _icon, 
+        {[_target, _this#2] call FUNC(joinTeam)}, {assignedTeam _target != _this#2}, {}, _x] call EFUNC(interact_menu,createAction));
+} forEach ["RED", "GREEN", "BLUE", "YELLOW", "MAIN"];
+
+private _actions = _units apply {
+    private _unit = _x;
+    private _icon = [QPATHTOF(UI\team\team_white_ca.paa), (assignedTeam _unit) call _fnc_color];
+    private _actionUnit = [hashValue _x, [_x, true] call EFUNC(common,getName), _icon, {}, {true}] call EFUNC(interact_menu,createAction);
+
+    [_actionUnit, _subActions apply { [_x, [], _unit] }, _unit]
+};
+
+_actions

addons/interaction/initSettings.inc.sqf

@@ -6,6 +6,14 @@
     true
 ] call CBA_fnc_addSetting;
 
+[
+    QGVAR(remoteTeamManagement), "CHECKBOX",
+    [LSTRING(remoteTeamManagement_DisplayName), LSTRING(remoteTeamManagement_Description)],
+    format ["ACE %1", LLSTRING(DisplayName)],
+    true,
+    true
+] call CBA_fnc_addSetting;
+
 [
     QGVAR(enableMagazinePassing), "CHECKBOX",
     LSTRING(PassMagazineSetting),

addons/interaction/stringtable.xml

@@ -582,8 +582,27 @@
             <Chinese>小隊管理</Chinese>
             <Turkish>Takım Yönetimi</Turkish>
         </Key>
-        <Key ID="STR_ACE_Interaction_groupDropDistantUnits">
-            <English>Drop Distant Members</English>
+        <Key ID="STR_ACE_Interaction_remoteTeamManagement_DisplayName">
+            <English>Remote Squad Management</English>
+        </Key>
+        <Key ID="STR_ACE_Interaction_remoteTeamManagement_Description">
+            <English>Allow dropping and changing team colors of any unit in player's squad</English>
+        </Key>
+        <Key ID="STR_ACE_Interaction_Squad">
+            <English>Squad</English>
+            <Czech>Družstvo</Czech>
+            <German>Trupp</German>
+            <Russian>Отряд</Russian>
+            <Polish>Drużyna</Polish>
+            <Italian>Squadra</Italian>
+            <Spanish>Escuadrón</Spanish>
+            <French>Escouade</French>
+            <Chinese>分隊</Chinese>
+            <Japanese>分隊</Japanese>
+            <Korean>분대</Korean>
+            <Portuguese>Esquadrão</Portuguese>
+            <Chinesesimp>小队</Chinesesimp>
+            <Turkish>Manga</Turkish>
         </Key>
         <Key ID="STR_ACE_Interaction_TeamRED">
             <English>Red</English>