function CountAggroTargets()
   local aggrocount = 0

   local objectList = CObjectList();
   objectList:update();
   for i = 0,objectList:size() do
      local obj = objectList:getObject(i);
      if( obj ~= nil ) then
         local pawn = CPawn(obj.Address);

         if pawn.TargetPtr == player.Address then
            aggrocount = aggrocount + 1
         end
      end
   end
   return aggrocount
end

function CountTargetsInRange(_range)
	player:update()
	local pawncount = 0

	local objectList = CObjectList();
	objectList:update();
	for i = 0,objectList:size() do
		local obj = objectList:getObject(i);
		if( obj ~= nil and obj.Type == PT_MONSTER) then
			local pawn = CPawn(obj.Address);
			if distance(pawn.X,pawn.Z,pawn.Y,player.X,player.Z,player.Y) < _range and
			   pawn.Alive and pawn.Attackable then
				pawncount = pawncount + 1
			end
		end
	end
	return pawncount
end