_men = nearestObjects [getpos player, ["Man"], 20];
_gearArray = [];

_crate = "Box_NATO_AmmoVeh_F" createVehicle (position player);
clearWeaponCargoGlobal _crate;
clearMagazineCargoGlobal _crate;
clearBackpackCargoGlobal _crate;
clearItemCargoGlobal _crate;

{
	_vest = vestContainer _x;
	_vestCargo = getMagazineCargo _vest;
	_gearArray = _gearArray + [_vestCargo];
}forEach _men;

_place = 0;
_vestPlace = 0;
_numberOfVests = count _gearArray;
hint str (_gearArray select 0);
while {_vestPlace < _numberOfVests}do{
	{
		_crate addMagazineCargoGlobal [_x,(((_gearArray select _vestPlace) select 1) select _place)];
		_place = _place + 1;
	}forEach ((_gearArray select _vestPlace) select 0);
	_vestPlace = _vestPlace + 1;
	_place = 0;
};