First CommitHEADmaster

1 files changed, 30 insertions, 0 deletions

diff --git a/macros/imageSetToList.sci b/macros/imageSetToList.sci
new file mode 100644
index 0000000..1e7a461
--- /dev/null
+++ b/macros/imageSetToList.sci
@@ -0,0 +1,30 @@
+function imgSetList=imageSetToList(imageSet)
+    if isstruct(imageSet)<> %T  then
+            error(msprintf("Error: The input argument is not of type imageSet."));
+        end
+        fieldNamesActual=["Description";"ImageLocation";"Count"];
+        fieldNamesInput=fieldnames(imageSet);
+        if fieldNamesActual <> fieldNamesInput then
+            error(msprintf("Error: The input argument is not of type imageSet, Wrong field names"));
+        end
+        if size(imageSet) == [1 1] then
+            locationList=list();
+            Desc=imageSet.Description;
+            Count=int32(imageSet.Count);
+            for j=1:imageSet.Count
+                tempMat(1,j)=imageSet.ImageLocation(j);
+            end
+            locationList($+1)=tempMat;
+        else
+            locationList=list();
+            for i=1:size(imageSet.Count)
+                Desc(i)=imageSet(i).Description;
+                Count(i)=int32(imageSet(i).Count);
+                for j=1:imageSet(i).Count
+                    tempMat(1,j)=imageSet(i).ImageLocation(j);
+                end
+                locationList($+1)=tempMat;
+            end
+        end
+        imgSetList=list("imageSet",Desc,Count,locationList);
+endfunction