appli/template_creaPatientsSystem/scripts/00200_InitialParameters.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_ceraGM/scripts/00200_InitialParameters.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include std
  12 include wx
  13 include creaVtk
  14 include vtk
  15 include creaMaracasVisu
  16
  17 author "Author ??"
  18 description "Description ??"
  19 category "<VOID>"
  20
  21 new std:ConcatStrings Box01
  22
  23 new std:ConcatStrings Box02
  24
  25 new wx:LayoutLine Box04
  26
  27 new creaVtk:OutputWindow Box05
  28
  29 new std:ConcatStrings Box06
  30   set Box06.In1 "<CORE>/davila/00100_OriginalImages/Test_01/<PATIENT>/Condition_01"
  31
  32 new wx:OutputText Box07
  33
  34 new std:ReplaceCleanString Box08
  35   set Box08.Search "<PATIENT>"
  36
  37 new std:ConcatStrings Box09
  38   set Box09.In2 "/results/"
  39
  40 new std:ConcatStrings Box10
  41
  42 new std:ReplaceCleanString Box11
  43   set Box11.Search "<CORE>"
  44
  45 new std:ConcatStrings Box12
  46   set Box12.In2 "/image.mha"
  47
  48 new vtk:MetaImageReader Box13
  49
  50 new creaMaracasVisu:ViewerNV Box14
  51
  52 new wx:LayoutSplit Box15
  53   set Box15.Orientation "H"
  54   set Box15.WinTitle "00200_InitialParameters.bbg"
  55
  56 new wx:Slider Box16
  57   set Box16.In "100"
  58   set Box16.ReactiveOnTrack "true"
  59   set Box16.Title "Threshold"
  60
  61 new creaVtk:ImageThreshold Box17
  62   set Box17.InValue "255"
  63   set Box17.OutValue "0"
  64   set Box17.Upper "10000"
  65
  66 new creaMaracasVisu:ColorLayerImageView Box18
  67   set Box18.TypeControlsInterface "2"
  68
  69 new wx:CommandButton Box19
  70   set Box19.Label "Save & Exit"
  71
  72 new std:MultipleInputs Box20
  73
  74 new std:Exit Box22
  75
  76 new std:ConcatStrings Box23
  77   set Box23.In2 "/InitialValues.txt"
  78
  79 new std:StringWriter Box24
  80
  81 new std:ConcatStrings Box25
  82   set Box25.In1 "Threshold  "
  83
  84 new std:ReadColumnsString Box26
  85   set Box26.Dimension "2"
  86
  87 new std:GetVectorStringElement Box27
  88   set Box27.ErrorValue "100"
  89   set Box27.I "0"
  90
  91 new std:ReplaceCleanString Box29
  92   set Box29.Replace "00200_InitialParameters"
  93   set Box29.Search "00100_OriginalImages"
  94
  95 new std:ConcatStrings Box30
  96   set Box30.In1 "mkdir -p    "
  97
  98 new std:ExecSystemCommand Box31
  99
 100 new creaMaracasVisu:ImageChangeInformation Box32
 101
 102 new vtk:ImageVtkProperties Box33
 103
 104 new std:GetVectorDoubleElement Box34
 105   set Box34.I "1"
 106
 107
 108
 109
 110 connect Box06.Out Box08.In
 111
 112 connect Box02.Out Box08.Replace
 113
 114 connect Box01.Out Box09.In1
 115
 116 connect Box09.Out Box07.In
 117
 118
 119 connect Box08.Out Box11.In
 120
 121 connect Box10.Out Box11.Replace
 122
 123 connect Box11.Out Box09.In3
 124
 125 connect Box09.Out Box12.In1
 126
 127 connect Box12.Out Box13.In
 128
 129 connect Box14.Widget Box15.Widget2
 130
 131 connect Box04.Widget Box15.Widget1
 132
 133 connect Box16.Out Box17.Lower
 134
 135 connect Box17.Out Box18.In
 136
 137 connect Box14.wxVtkBaseView2 Box18.WxVtkBaseView
 138
 139 connect Box14.wxVtkBaseView3 Box18.WxVtkBaseView1
 140
 141 connect Box14.wxVtkBaseView4 Box18.WxVtkBaseView2
 142
 143 connect Box16.BoxChange Box18.BoxExecute
 144
 145 connect Box19.Widget Box04.Widget9
 146
 147 connect Box19.BoxChange Box20.BoxExecute
 148
 149 connect Box07.Widget Box04.Widget2
 150
 151 connect Box18.Widget Box04.Widget4
 152
 153 connect Box16.Widget Box04.Widget6
 154
 155 connect Box23.Out Box24.FileName
 156
 157 connect Box16.Out Box25.In2
 158
 159 connect Box25.Out Box24.In0
 160
 161 connect Box24.BoxChange Box20.In2
 162
 163 connect Box23.Out Box26.FileName
 164
 165 connect Box26.lstData2 Box27.In
 166
 167 connect Box27.Out Box16.In
 168
 169 connect Box09.Out Box29.In
 170
 171 connect Box29.Out Box23.In1
 172
 173 connect Box29.Out Box30.In2
 174
 175 connect Box30.Out Box31.In
 176
 177 connect Box31.BoxChange Box20.In1
 178
 179 connect Box22.BoxChange Box20.In9
 180
 181 connect Box32.Out Box17.In
 182
 183 connect Box32.Out Box14.In
 184
 185 connect Box13.Out Box32.In
 186
 187 connect Box32.Out Box33.In
 188
 189 connect Box33.MinMax Box34.In
 190
 191 connect Box34.Out Box16.Max
 192
 193
 194
 195 # Complex input ports
 196 input BaseDir Box01.In1 " "
 197 input PatientID Box02.In1 " "
 198 input CoreID Box10.In1 " "
 199 exec Box05
 200 exec Box15
 201 exec Box18