% Determine the average value of the
% series of images along each row.
for c = 1:3
   for x = 1:440
      ht(x,c) = sum(bt(x,:,c));
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b1(x,:,c));
      h1 = sum(temp);
      b1n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b2(x,:,c));
      h1 = sum(temp);
      b2n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b3(x,:,c));
      h1 = sum(temp);
      b3n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b4(x,:,c));
      h1 = sum(temp);
      b4n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b5(x,:,c));
      h1 = sum(temp);
      b5n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b6(x,:,c));
      h1 = sum(temp);
      b6n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b7(x,:,c));
      h1 = sum(temp);
      b7n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b8(x,:,c));
      h1 = sum(temp);
      b8n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(b9(x,:,c));
      h1 = sum(temp);
      b9n(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end
for c = 1:3
   for x = 1:440
      temp = double(ba(x,:,c));
      h1 = sum(temp);
      ban(x,:,c) = uint8(temp*ht(x,c)/h1);
   end
   disp('Color');
   c
end