_Egrp = _this select 0
_Object = _this select 1
_freq = _this select 2
_Who = _this select 3

_GrpVektor = Units _Egrp
_numEl = count _GrpVektor
_i = 0

? (_Who == "PLAYER") : Player action["EJECT",_Object]; UnassignVehicle Player; exit

#Update
? (_Who == "AI") && ((_GrpVektor select _i) == Player) : _i = _i + 1
? (_i == _numEl) : exit
(_GrpVektor select _i) action["EJECT",_Object]; UnassignVehicle (_GrpVektor select _i)
_i = _i + 1
~_freq
? (_i < _numEl) : goto "Update"
exit