function ReplaceTxt()
folderPath = pwd;  % Or specify your folder path like 'C:\Users\YourName\Documents\MATLAB'
files = dir(fullfile(folderPath, '*.txt'));

for k = 1:length(files)
    oldName = fullfile(folderPath, files(k).name);
    [~, name, ~] = fileparts(files(k).name);
    newName = fullfile(folderPath, [name, '.m']);
    movefile(oldName, newName);
  

end
end

