ACE3/addons/zeus/functions/fnc_moduleUnGarrison.sqf

52 lines
1.1 KiB
Plaintext
Raw Normal View History

/*
* Author: alganthe
* Un-garrison a garrisoned group.
*
* Arguments:
* 0: Module logic <OBJECT>
*
* Return Value:
* None
*
* Example:
* [LOGIC] call ace_zeus_fnc_moduleUngarrison
*
* Public: No
*/
#include "script_component.hpp"
params ["_logic"];
if (!local _logic) exitWith {}; // Module is global
scopeName "Main";
private _fnc_errorAndClose = {
params ["_msg"];
deleteVehicle _logic;
[_msg] call EFUNC(common,displayTextStructured);
breakOut "Main";
};
private _unit = effectiveCommander (attachedTo _logic);
switch (false) do {
case !(isNull _unit): {
[LSTRING(NothingSelected)] call _fnc_errorAndClose;
};
case (_unit isKindOf "CAManBase"): {
[LSTRING(OnlyInfantry)] call _fnc_errorAndClose;
};
case (alive _unit): {
[LSTRING(OnlyAlive)] call _fnc_errorAndClose;
};
case !(isPlayer _unit): {
[LSTRING(OnlyNonPlayer)] call _fnc_errorAndClose;
};
};
private _units = units _unit;
[QEGVAR(ai,unGarrison), [_units], _units] call CBA_fnc_targetEvent;
deleteVehicle _logic;