Simplify pulling out bodies

This commit is contained in:
johnb432 2024-06-28 10:59:57 +02:00
parent bfa23f01db
commit 59e92e10a5

View File

@ -5,7 +5,7 @@
*
* Arguments:
* 0: Body <OBJECT>
* 1: Unit <OBJECT>
* 1: Unit (not used) <OBJECT>
*
* Return Value:
* None
@ -18,46 +18,4 @@
params ["_body", "_unit"];
private _vehicle = objectParent _body; // vehicle command doesn't work for dead
// get target crew properties
private ["_cargoIndex", "_turretPath"];
private _cargoNumber = -1;
{
if ("cargo" == _x select 1) then {
INC(_cargoNumber);
};
if (_body == _x select 0) exitWith {
_cargoIndex = _x select 2;
_turretPath = _x select 3;
};
} forEach fullCrew [_vehicle, "", true];
TRACE_3("",_cargoIndex,_cargoNumber,_turretPath);
private _preserveEngineOn = false;
// first get in to target seat
if (_turretPath isNotEqualTo []) then {
_unit action ["GetInTurret", _vehicle, _turretPath];
} else {
if (_cargoIndex > -1) then {
_unit action ["GetInCargo", _vehicle, _cargoNumber];
} else {
_unit action ["GetInDriver", _vehicle];
_preserveEngineOn = isEngineOn _vehicle;
};
};
// then get out
[
{(_this select 0) in (_this select 1)},
{
params ["_unit", "_vehicle", "_preserveEngineOn"];
TRACE_3("",_unit,_vehicle,_preserveEngineOn);
_unit action ["GetOut", _vehicle];
if (_preserveEngineOn) then {
[{isNull driver _this}, {_this engineOn true}, _vehicle] call CBA_fnc_waitUntilAndExecute;
};
},
[_unit, _vehicle, _preserveEngineOn]
] call CBA_fnc_waitUntilAndExecute;
moveOut _body;