Add Edit Terrain Location Module

addons/modules/CfgVehicles.hpp

@@ -309,6 +309,13 @@ class CfgVehicles {
         icon = QPATHTOF(ui\light_ca.paa);
         portrait = QPATHTOF(ui\light_ca.paa);
     };
+    class GVAR(moduleEditTerrainLocation): GVAR(moduleBase) {
+        category = "Environment";
+        displayName = CSTRING(moduleEditTerrainLocation);
+        icon = "\a3\3den\Data\Displays\Display3DEN\PanelLeft\entityList_location_ca.paa";
+        portrait = "\a3\3den\Data\Displays\Display3DEN\PanelLeft\entityList_location_ca.paa";
+        function = QFUNC(moduleEditTerrainLocation);
+    };
     class GVAR(moduleMakeInvincible): GVAR(moduleBase) {
         curatorCanAttach = 1;
         category = QGVAR(Objects);

addons/modules/XEH_PREP.hpp

@@ -63,6 +63,7 @@ PREP(moduleHeal);
 PREP(moduleHideTerrainObjects);
 PREP(moduleHideZeus);
 PREP(moduleLightSource);
+PREP(moduleEditTerrainLocation);
 PREP(moduleMakeInvincible);
 PREP(moduleNuke);
 PREP(moduleNukeLocal);

addons/modules/XEH_postInit.sqf

@@ -103,6 +103,32 @@ if (isServer) then {
     player createDiaryRecord [QGVAR(intel), [_title, _text]];
 }] call CBA_fnc_addEventHandler;
 
+[QGVAR(editTerrainLocation), {
+    params ["_values", "_location"];
+    _values params [
+        "_type",
+        "_text",
+        "_direction",
+        "_isRectangular",
+        "_size",
+        "_name",
+        "_side",
+        "_importance"
+    ];
+
+    private _location = createLocation [_location];
+    _location setType _type;
+    _location setText _text;
+    _location setDirection _direction;
+    _location setRectangular _isRectangular;
+    _location setSize _size;
+    _location setName _name;
+    _location setSide _side;
+    _location setImportance parseNumber _importance;
+
+    deleteLocation _location;
+}] call CBA_fnc_addEventHandler;
+
 [QGVAR(teleportOutOfVehicle), {
     params ["_unit", "_position"];
 

addons/modules/config.cpp

@@ -46,6 +46,7 @@ class CfgPatches {
             QGVAR(moduleHideTerrainObjects),
             QGVAR(moduleHideZeus),
             QGVAR(moduleLightSource),
+            QGVAR(moduleEditTerrainLocation),
             QGVAR(moduleMakeInvincible),
             QGVAR(moduleNuke),
             QGVAR(modulePatrolArea),

addons/modules/functions/fnc_moduleEditTerrainLocation.sqf

@@ -0,0 +1,92 @@
+#include "script_component.hpp"
+/*
+ * Author: Ampersand
+ * Zeus module function to edit terrain locations.
+ *
+ * Arguments:
+ * 0: Logic <OBJECT>
+ *
+ * Return Value:
+ * None
+ *
+ * Example:
+ * [LOGIC] call zen_modules_fnc_moduleEditTerrainLocation
+ *
+ * Public: No
+ */
+
+params ["_logic"];
+
+private _location = nearestLocation [_logic, ""];
+
+private _type = type _location;
+private _text = text _location;
+private _direction = direction _location;
+private _isRectangular = rectangular _location;
+private _size = size _location;
+private _name = name _location;
+private _side = side _location;
+private _importance = importance _location;
+
+if (isNil QGVAR(locationTypes)) then {
+    GVAR(locationTypes) = [];
+    {
+        private _type = configName _x;
+        GVAR(locationTypes) pushBack _type;
+    } forEach ("true" configClasses (configFile >> "CfgLocationTypes"));
+};
+private _sides = [
+    east,
+    west,
+    independent,
+    civilian,
+    sideUnknown
+];
+
+[LSTRING(ModuleEditTerrainLocation), [
+    [
+        "COMBO",
+        "str_3den_trigger_attribute_type_displayname",
+        [GVAR(locationTypes), GVAR(locationTypes), GVAR(locationTypes) find _type]
+    ],
+    [
+        "EDIT",
+        "str_a3_cfgvehicles_modulecuratoraddicon_f_arguments_text",
+        _text
+    ],
+    [
+        "SLIDER",
+        "STR_3DEN_Display3DEN_ControlsHint_Rotate",
+        [0, 360, _direction, EFUNC(common,formatDegrees)]
+    ],
+    [
+        "TOOLBOX",
+        LSTRING(ModuleEditTerrainLocation_AreaShape),
+        [_isRectangular, 1, 2, ["str_3den_attributes_shapetrigger_ellipse", "str_3den_attributes_shapetrigger_rectangle"]],
+        true
+    ],
+    [
+        "VECTOR",
+        "str_3den_trigger_attribute_size_displayname",
+        _size
+    ],
+    [
+        "EDIT",
+        "STR_3DEN_Display3DENSave_Filter_Name_text",
+        _name
+    ],
+    [
+        "COMBO",
+        "str_a3_rscdisplaydynamicgroups_side",
+        [_sides, _sides apply {[_x] call BIS_fnc_sideName}, _sides find _side]
+    ],
+    [
+        "EDIT",
+        LSTRING(ModuleEditTerrainLocation_Importance),
+        _importance
+    ]
+], {
+    [QGVAR(editTerrainLocation), _this] call CBA_fnc_globalEvent;
+}, {}, _location] call EFUNC(dialog,create);
+
+deleteVehicle _logic;

addons/modules/stringtable.xml

@@ -1108,6 +1108,15 @@
             <Chinese>無敵</Chinese>
             <Italian>Rendi invincibile</Italian>
         </Key>
+        <Key ID="STR_ZEN_Modules_ModuleEditTerrainLocation">
+            <English>Edit Terrain Location</English>
+        </Key>
+        <Key ID="STR_ZEN_Modules_ModuleEditTerrainLocation_Importance">
+            <English>Importance</English>
+        </Key>
+        <Key ID="STR_ZEN_Modules_ModuleEditTerrainLocation_AreaShape">
+            <English>Area Shape</English>
+        </Key>
         <Key ID="STR_ZEN_Modules_ModuleMakeInvincible_Invincible">
             <English>Invincible</English>
             <Russian>Неуязвимость</Russian>