function rtsRAW2Images(source, destination_directory)

for i=1:size(source, 3)
    filename = [destination_directory '\' rtsInt2Str(i, 4) '.bmp'];
    imwrite(source(:, :, i)', filename);
    disp(filename);
end