RPP_fnc_grabRTEObjects = {
	_ExportObjects = [];
	_ObjectID = 0;
	_ObjectIDs = [];

	{
		_model = typeOf _x;
		 _pos = [_x, _OldPos] call ION_RTE_fGetPos;
		 _dir = _x call ION_RTE_fGetDir;
		 _special = [_x, "ION_RTE_UNIT_SPECIAL"] call ION_RTE_fGetVariable;
		 _lock = switch (locked _x) do {
		  case true: { "LOCKED" };
		  default { "UNLOCKED" };
		 };
		 _health = 1 - (damage _x);
		 _fuel = fuel _x;
		 _ammo = [_x, "ION_RTE_UNIT_AMMO"] call ION_RTE_fGetVariable;
		 _init = [_x, "ION_RTE_UNIT_INIT"] call ION_RTE_fGetVariable;
		_init = (format["this setVectorUp %1;", vectorUp _x]) + _init;
		 _name = [_x, "ION_RTE_UNIT_NAME"] call ION_RTE_fGetVariable;
		 _ExportObjects = _ExportObjects + [[_ObjectID, [_model, _pos, _dir, _special, _lock, _health, _fuel, _ammo, _init, _name]]];
		 _ObjectIDs set [_ObjectID, _x];
		 _ObjectID = _ObjectID + 2;
	} forEach ION_RTE_Units;

	_finalArray = [ [], [], [], _ExportObjects, [], [], false, true, []];
	copyToClipboard ((str _finalArray) + "call ION_RTE_fRestore;");
};