ACE3/addons/common/functions/fnc_removeActionEventHandler.sqf

/*
 * Author: commy2
 *
 * Remove an addAction event from a unit.
 *
 * Argument:
 * 0: Unit the action is assigned to (Object)
 * 1: Name of the action, e.g. "DefaultAction" (String)
 * 2: ID of the action (Number)
 *
 * Return value:
 * None.
 */
#include "script_component.hpp"

private ["_unit", "_action", "_id", "_name", "_actionsVar", "_actionID", "_actions", "_currentID", "_actionIDs", "_count"];

_unit = _this select 0;
_action = _this select 1;
_id = _this select 2;

if (_id == -1) exitWith {};

_name = format ["ACE_Action_%1", _action];

_actionsVar = _unit getVariable [_name, [-1, [-1, [], []], objNull]];

_actionID = _actionsVar select 0;
_actions = _actionsVar select 1;

_currentID = _actions select 0;
_actionIDs = _actions select 1;
_actions = _actions select 2;

if (_unit != _actionsVar select 2) exitWith {};

_id = _actionIDs find _id;

if (_id == -1) exitWith {};

_actionIDs set [_id, -1];
_actionIDs = _actionIDs - [-1];

_actions set [_id, []];
_actions = _actions - [[]];

if (count _actions == 0) then {
  _unit removeAction _actionID;
  _actionID = -1;
};

_unit setVariable [_name, [_actionID, [_currentID, _actionIDs, _actions], _unit], false];