--- a
+++ b/script_create_save_path_name.m
@@ -0,0 +1,41 @@
+% Location of the path to save results
+% You may modify this script to save the file to a path of your preference.
+function save_path = script_create_save_path_name(file_name, condition_Bmode)
+    % Protocol D
+    %     str1                        = strsplit(file_name, 'Experiment_Data/');
+    %     str1_TEMP                   = strsplit(str1{2}, '/supine_US');
+    %     if( size(str1_TEMP, 2) == 1)
+    %         str1_TEMP           	= strsplit(str1{2}, '/tilted_US'); 
+    %     end
+    %     if( size(str1_TEMP, 2) == 1 )
+    %         save_path = [];
+    %         fprintf('Error in the filename\n');
+    %         return;
+    %     end
+    %     subject_ID      	= str1_TEMP{1}; 
+    %     str               	= strsplit(file_name, 'US/');
+    %     str_2               = strsplit(str{1}, '_MIT/');
+
+    % Protocol E
+    str = strsplit(file_name, filesep);
+    
+    if condition_Bmode
+        % condition_Bmode is true if the input file is a BMODE image
+        
+        % Protocol D
+        %save_path   	= fullfile(sprintf('%sUS', str{1}), sprintf('%s_%sDIA_ECG_%s.mat', subject_ID, str_2{2}, str{2}));
+        
+        % Protocol E and MGH study
+        save_name = strcat(str{end-1}, '_supine_DIA_ECG_', str{end}, '.mat');
+        save_path = fullfile(str{1:end-1}, save_name);
+    else
+        % condition_Bmode is false if the input file is a Pulsed-Doppler 
+        
+        % Protocol D
+        %save_path   	= fullfile(sprintf('%sUS', str{1}), sprintf('%s_%sVEL_ECG_%s.mat', subject_ID, str_2{2}, str{2}));
+        
+        % Protocol E
+        save_name = strcat(str{end-1}, '_supine_VEL_ECG_', str{end}, '.mat');
+        save_path = fullfile(str{1:end-1}, save_name);
+    end
+end
\ No newline at end of file