function azucar = commas2dots(sal)

% Cambia comas por puntos en archivos txt
% Entrada: nombre del archivo, ejemplo: datos.txt
% Salida:  archivo txt con las comas sustituidas por puntos.
%          Se almacena un archivo txt con nombre datos_C2D.txt

azucar = [sal(1:end-4) '_C2D.txt'];

Data = fileread(sal);
Data = strrep(Data, ',', '.');
FID = fopen(azucar, 'w');
fwrite(FID, Data, 'char');
fclose(FID);