#3309 BBTK Bug New Normal - Bug gdcmvtk - GetXCoherentInfoGdcmReader std - FilesFro...

[bbtk.git] / packages / gdcmvtk / bbs / boxes / LstDicomSerieInfoDir.bbs

diff --git a/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs b/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
new file mode 100644 (file)
index 0000000..a9d7e81
--- /dev/null
+++ b/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
@@ -0,0 +1,186 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
+# - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/LstDicomSerieInfoDir.bbs
+# ----------------------------------
+
+include std
+include itkvtk
+include gdcmvtk
+include std
+
+define LstDicomSerieInfoDir gdcmvtk
+
+author "Author ??"
+description "Description ??"
+
+category "<VOID>"
+
+new gdcmvtk:DicomSerieInfoDir Box00
+  set Box00.idDir "0"
+
+new std:FilesFromDirectory Box01
+  set Box01.In "/home/davila/CreatisWorks/tmpMonica/SegCal/Benoit-Test-Dicom"
+  set Box01.Recursive "true"
+  set Box01.Type "2"
+
+new std:ConcatStrings Box03
+  set Box03.In10 " "
+  set Box03.In2 " "
+  set Box03.In4 " "
+  set Box03.In6 " "
+  set Box03.In8 " "
+
+new gdcmvtk:DicomSerieInfoDir Box04
+  set Box04.idDir "1"
+
+new std:ConcatStrings Box06
+  set Box06.In10 " "
+  set Box06.In2 " "
+  set Box06.In4 " "
+  set Box06.In6 " "
+  set Box06.In8 " "
+
+new std:ConcatStrings Box07
+  set Box07.In10 " "
+  set Box07.In3 " "
+  set Box07.In5 " "
+  set Box07.In7 " "
+  set Box07.In9 " "
+
+new gdcmvtk:DicomSerieInfoDir Box09
+  set Box09.idDir "2"
+
+new gdcmvtk:DicomSerieInfoDir Box11
+  set Box11.idDir "3"
+
+new gdcmvtk:DicomSerieInfoDir Box12
+  set Box12.idDir "4"
+
+new gdcmvtk:DicomSerieInfoDir Box13
+  set Box13.idDir "5"
+
+new gdcmvtk:DicomSerieInfoDir Box14
+  set Box14.idDir "6"
+
+new gdcmvtk:DicomSerieInfoDir Box15
+  set Box15.idDir "7"
+
+new gdcmvtk:DicomSerieInfoDir Box16
+  set Box16.idDir "8"
+
+new gdcmvtk:DicomSerieInfoDir Box17
+  set Box17.idDir "9"
+
+new gdcmvtk:DicomSerieInfoDir Box18
+  set Box18.idDir "10"
+
+new gdcmvtk:DicomSerieInfoDir Box19
+  set Box19.idDir "11"
+
+new gdcmvtk:DicomSerieInfoDir Box20
+  set Box20.idDir "12"
+
+new gdcmvtk:DicomSerieInfoDir Box21
+  set Box21.idDir "14"
+
+new gdcmvtk:DicomSerieInfoDir Box22
+  set Box22.idDir "13"
+
+new gdcmvtk:DicomSerieInfoDir Box23
+  set Box23.idDir "15"
+
+new gdcmvtk:DicomSerieInfoDir Box24
+  set Box24.idDir "16"
+
+new gdcmvtk:DicomSerieInfoDir Box25
+  set Box25.idDir "17"
+
+new std:ConcatStrings Box26
+  set Box26.In10 " "
+  set Box26.In3 " "
+  set Box26.In5 " "
+  set Box26.In7 " "
+  set Box26.In9 " "
+
+new gdcmvtk:DicomSerieInfoDir Box27
+  set Box27.idDir "17"
+
+new std:ConcatStrings Box28
+  set Box28.In10 " "
+  set Box28.In3 " "
+  set Box28.In5 " "
+  set Box28.In7 " "
+  set Box28.In9 " "
+
+
+connect Box01.OutSimple Box00.LstSimpleDirName
+connect Box01.Out Box00.LstPaths
+connect Box01.OutSimple Box04.LstSimpleDirName
+connect Box01.Out Box04.LstPaths
+connect Box04.OutString Box03.In3
+connect Box00.OutString Box03.In1
+connect Box03.Out Box06.In1
+connect Box06.Out Box07.In1
+connect Box01.OutSimple Box09.LstSimpleDirName
+connect Box09.OutString Box03.In5
+connect Box01.Out Box09.LstPaths
+connect Box01.Out Box11.LstPaths
+connect Box01.OutSimple Box11.LstSimpleDirName
+connect Box01.Out Box12.LstPaths
+connect Box01.OutSimple Box12.LstSimpleDirName
+connect Box01.Out Box13.LstPaths
+connect Box01.OutSimple Box13.LstSimpleDirName
+connect Box11.OutString Box03.In7
+connect Box12.OutString Box03.In9
+connect Box13.OutString Box06.In3
+connect Box14.OutString Box06.In5
+connect Box15.OutString Box06.In7
+connect Box16.OutString Box06.In9
+connect Box01.Out Box14.LstPaths
+connect Box01.OutSimple Box14.LstSimpleDirName
+connect Box01.Out Box15.LstPaths
+connect Box01.OutSimple Box15.LstSimpleDirName
+connect Box01.Out Box16.LstPaths
+connect Box01.OutSimple Box16.LstSimpleDirName
+connect Box01.Out Box17.LstPaths
+connect Box01.OutSimple Box17.LstSimpleDirName
+connect Box01.Out Box18.LstPaths
+connect Box01.OutSimple Box18.LstSimpleDirName
+connect Box01.Out Box19.LstPaths
+connect Box01.OutSimple Box19.LstSimpleDirName
+connect Box01.Out Box20.LstPaths
+connect Box01.OutSimple Box20.LstSimpleDirName
+connect Box01.Out Box22.LstPaths
+connect Box01.OutSimple Box22.LstSimpleDirName
+connect Box01.Out Box21.LstPaths
+connect Box01.OutSimple Box21.LstSimpleDirName
+connect Box01.Out Box23.LstPaths
+connect Box01.OutSimple Box23.LstSimpleDirName
+connect Box01.Out Box24.LstPaths
+connect Box01.OutSimple Box24.LstSimpleDirName
+connect Box01.Out Box25.LstPaths
+connect Box01.OutSimple Box25.LstSimpleDirName
+connect Box17.OutString Box07.In2
+connect Box18.OutString Box07.In4
+connect Box19.OutString Box07.In6
+connect Box20.OutString Box07.In8
+connect Box22.OutString Box07.In10
+connect Box07.Out Box26.In1
+connect Box21.OutString Box26.In2
+connect Box23.OutString Box26.In4
+connect Box24.OutString Box26.In6
+connect Box25.OutString Box26.In8
+connect Box01.Out Box27.LstPaths
+connect Box01.OutSimple Box27.LstSimpleDirName
+connect Box26.Out Box28.In1
+connect Box27.OutString Box28.In2
+
+# Complex input ports
+input DirName Box01.In " "
+
+# Complex output ports
+output lst Box28.Out " "
+output lstPath Box01.Out " "
+
+
+endefine