]> Creatis software - creaMiniTools.git/blobdiff - appli/template_creaPatientsSystem/scripts/00100_InsertDataA.bbs
#3421 template_creaPatientsSystem
[creaMiniTools.git] / appli / template_creaPatientsSystem / scripts / 00100_InsertDataA.bbs
diff --git a/appli/template_creaPatientsSystem/scripts/00100_InsertDataA.bbs b/appli/template_creaPatientsSystem/scripts/00100_InsertDataA.bbs
new file mode 100644 (file)
index 0000000..f205219
--- /dev/null
@@ -0,0 +1,215 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script
+# - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_creaGM/scripts/00100_InsertDataA.bbs
+# ----------------------------------
+
+# BBTK GEditor Script
+# ----------------------
+
+include std
+include itkvtk
+include creaMaracasVisu
+include wx
+include creaVtk
+include creaImageIO
+include std
+include vtk
+
+author "Author ??"
+description "Description ??"
+category "<VOID>"
+
+new creaMaracasVisu:ViewerNV Box00
+
+new wx:LayoutLine Box02
+
+new creaVtk:OutputWindow Box03
+
+new wx:LayoutSplit Box04
+  set Box04.Orientation "H"
+
+new wx:CommandButton Box06
+  set Box06.Label "Read Camera  Image RGB (*.PNG)"
+
+new creaImageIO:ReadImages Box07
+
+new wx:FileSelector Box09
+
+new wx:LayoutSplit Box11
+  set Box11.Proportion "90"
+  set Box11.WinTitle "00100_InsertDataA.bbg"
+
+new wx:LayoutLine Box12
+  set Box12.Orientation "H"
+
+new wx:InputText Box14
+  set Box14.In "Id_"
+  set Box14.ReactiveOnKeystroke "2"
+  set Box14.Title "Id"
+
+new wx:CommandButton Box15
+  set Box15.Label "Save & Exit"
+
+new std:ConcatStrings Box16
+
+new std:ConcatStrings Box17
+
+new std:ReplaceCleanString Box18
+  set Box18.Replace "_"
+  set Box18.Search " "
+
+new std:ConcatStrings Box19
+  set Box19.In2 "/image.mha"
+
+new std:ConcatStrings Box21
+  set Box21.In1 "mkdir -p  "
+
+new vtk:MetaImageWriter Box22
+  set Box22.Compression "true"
+
+new vtk:vtkImageDataPointerRelay Box23
+
+new std:ExecSystemCommand Box24
+
+new std:ConcatStrings Box25
+  set Box25.In1 "/results/<CORE>/davila/00100_OriginalImages/Test_01/<PATIENT_ID>/Condition_01"
+
+new std:ReplaceCleanString Box26
+  set Box26.Search "<PATIENT_ID>"
+
+new wx:OutputText Box27
+  set Box27.Title "File Name"
+
+new wx:LayoutLine Box28
+
+new std:Exit Box29
+
+new wx:ComboBox Box30
+  set Box30.In "Study_A  Study_B  Study_C"
+
+new std:ReplaceCleanString Box31
+  set Box31.Search "<CORE>"
+
+new std:MultipleInputs Box32
+
+new std:MultipleInputs Box33
+
+new wx:OutputText Box34
+
+new wx:InputText Box35
+  set Box35.In "VOID"
+  set Box35.Title "Parameter01"
+
+new std:GetVectorStringElement Box36
+  set Box36.ErrorValue "VOID"
+  set Box36.I "0"
+
+new std:StringWriter Box37
+
+new std:ConcatStrings Box38
+  set Box38.In1 "Parameter01"
+  set Box38.In2 "  "
+
+new std:ConcatStrings Box40
+  set Box40.In2 "/Parameters.txt"
+
+
+connect Box00.Widget Box04.Widget2
+
+connect Box02.Widget Box04.Widget1
+
+connect Box06.Widget Box02.Widget1
+
+connect Box09.Out Box07.LstNameImages
+
+connect Box06.BoxChange Box09.BoxExecute
+
+connect Box09.BoxChange Box07.BoxExecute
+
+connect Box07.BoxChange Box00.BoxExecute
+
+connect Box04.Widget Box11.Widget1
+
+
+connect Box16.Out Box17.In1
+
+connect Box14.Out Box18.In
+
+connect Box17.Out Box19.In1
+
+connect Box19.Out Box22.Filename
+
+connect Box07.Out Box23.In
+
+connect Box23.Out Box00.In
+
+connect Box23.Out Box22.In
+
+connect Box25.Out Box26.In
+
+connect Box18.Out Box26.Replace
+
+connect Box19.Out Box27.In
+
+connect Box12.Widget Box28.Widget1
+
+connect Box27.Widget Box28.Widget2
+
+connect Box17.Out Box21.In2
+
+connect Box21.Out Box24.In
+
+connect Box28.Widget Box11.Widget2
+
+connect Box15.Widget Box12.Widget6
+
+connect Box30.Widget Box12.Widget1
+
+connect Box14.Widget Box12.Widget3
+
+connect Box30.OutString Box31.Replace
+
+connect Box26.Out Box31.In
+
+connect Box31.Out Box17.In2
+
+connect Box30.BoxChange Box32.In1
+
+connect Box14.BoxChange Box32.In2
+
+connect Box32.BoxChange Box27.BoxExecute
+
+connect Box15.BoxChange Box33.BoxExecute
+
+connect Box24.BoxChange Box33.In1
+
+connect Box22.BoxChange Box33.In3
+
+connect Box29.BoxChange Box33.In5
+
+connect Box34.Widget Box02.Widget3
+
+connect Box09.Out Box34.In
+
+connect Box09.BoxChange Box34.BoxExecute
+
+connect Box35.Widget Box12.Widget2
+
+connect Box35.Out Box36.In
+
+connect Box38.Out Box37.In0
+
+connect Box17.Out Box40.In1
+
+connect Box37.BoxChange Box33.In2
+
+connect Box40.Out Box37.FileName
+
+connect Box36.Out Box38.In3
+
+
+
+# Complex input ports
+input ProjectDir Box16.In1 " "
+exec Box03
+exec Box11