Script Help(Send sitrep)

_scout = _this select 0;// unit tracking the target
_target = _this select 1;//unit being tracked

_info = [];

_kbLvl = _scout knowsAbout _target;// how much does the scout need to know to determine type,side, etc?
_dir = getDir _target;
_speed = getSpeed _target;
_strength = 0;
_distance = _scout distance _target;
_grp = group _target;
_grpCount = count units _grp;
if(_grpCount > 1)then
{
_strength = _strength + _grpCount;
_friends = [];
_unitsNear = nearestObjects [_target,["CAManBase"],100];
{
if(_x getFriend _target > 0.6)then
{
_friends set [(count _friends),_x];
_fCount = count _friends;
_strength = _strength + _fCount;
};
_info = [(getPosASL _tgt),_dir,_speed,_distance,_strength];
hintFormat ["%1",_info];