removeWeaponsFromVehicle

_obj = _vehicle createVehicle position player;



player2_outputVehicleWeapons = {

    _vehicleObject = _this;
    _vehicle = (typeOf _vehicleObject);

    diag_log("P2DEBUG: player2_outputVehicleWeapons");

     diag_log("Vehicle Weapons Now:" + str (weapons _this));
     diag_log("Vehicle Magazines Now:" + str (magazines _this));


};


player2_removeVehicleWeapons = {

    _vehicleObject = _this;
    _vehicle = (typeOf _vehicleObject);

    diag_log("P2DEBUG: player2_removeVehicleWeapons");


    if ((isArray (configFile >> "CfgVehicles" >> _vehicle >> "weapons"))) then {
            _mainWeapons = (getArray (configFile >> "CfgVehicles" >> _vehicle >> "weapons"));

            {
              _vehicleObject removeWeapon _x;
              diag_log("Main Weapon Removed: " + str _x);
            } forEach _mainWeapons;

            if ((isArray (configFile >> "CfgVehicles" >> _vehicle >> "magazines"))) then {
                _mainMagazines = (getArray (configFile >> "CfgVehicles" >> _vehicle >> "magazines"));

                {
                  _vehicleObject removeMagazineTurret [_x,[-1]];
                  diag_log("Main Magazine Removed: " + str _x);
                } forEach _mainMagazines;

            };

        };

        _dn = getText (configFile >> "CfgVehicles" >> _vehicle >> "displayName");

        _cfg = configFile >> "CfgVehicles" >> _vehicle >> "turrets";
        _tc = count _cfg;
        if (_tc>0) then {
            _mtc = count _cfg;

            for "_mti" from 0 to _mtc-1 do {
                _mt = (_cfg select _mti);
                _st = _mt >> "turrets";
                _stc = count _st;

                _weaps = getArray(_mt >> "weapons");
                {
                  _vehicleObject removeWeapon _x;
                  diag_log("Turret #" + str(_mti) + " Weapon Removed: " + str _x);
                } forEach _weaps;

                _mags = getArray(_mt >> "magazines");

                {
                  _vehicleObject removeMagazineTurret [_x,[_mti]];
                  diag_log("Turret #" + str(_mti) + " Magazine Removed: " + str _x);
                } forEach _mags;

                for "_sti" from 0 to _stc-1 do {
                    _stp = (_st select _sti);
                    _weaps = getArray(_stp >> "weapons");

                    {
                        _vehicleObject removeWeapon _x;
                        diag_log("Turret #" + str(_mti) + " Weapon Removed: " + str _x);
                    } forEach _weaps;

                    _mags = getArray(_stp >> "magazines");
                    {
                      _vehicleObject removeMagazineTurret [_x,[_sti]];
                      diag_log("Turret #" + str(_sti) + " Magazine Removed: " + str _x);
                    } forEach _mags;

                };
            };
        };

        _this call player2_outputVehicleWeapons;
};


_obj call player2_removeVehicleWeapons;