comparison functions/funcsMobilab/find_format.m @ 0:2fadb31a9d55 tip

Import code by Vuegen et al

+function [files] = find_format(DIR,format)
+
+i = 1;
+inhoud_DIR = dir(DIR);
+aantal_bestanden = length(inhoud_DIR);
+for j = 1:aantal_bestanden
+    bestandsnaam = inhoud_DIR(j,1).name;
+    if strcmp(format,'map')
+        if inhoud_DIR(j,1).isdir ==true
+            if bestandsnaam(1) ~= '.'
+                files.labels(i) = {bestandsnaam(1:(length(bestandsnaam)-length('01.wav')))};
+                files.names(i) = {bestandsnaam};
+                i = i+1;
+            end
+        end  
+    else
+        if length(bestandsnaam)>=length(format),
+            formaatBestandsnaam = bestandsnaam(end-length(format)+1:end);
+            if strcmp(formaatBestandsnaam, char(ones(1,0)));
+                formaatBestandsnaam = '';
+            end
+            if strcmp(formaatBestandsnaam, format),
+                files.labels(i) = {bestandsnaam(1:(length(bestandsnaam)-length('01.wav')))};
+                files.names(i) = {bestandsnaam};
+                i = i+1;
+            end
+        end
+    end
+end