appli/template_creaPatientsSystem/scripts/00400_Correction.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_ceraGM/scripts/00400_Correction.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaMaracasVisu
  12 include wx
  13 include vtk
  14 include creaVtk
  15 include std
  16
  17 author "Author ??"
  18 description "Description ??"
  19 category "<VOID>"
  20
  21 new creaMaracasVisu:ManualPaint2 Box00
  22   set Box00.Active_ManualPaint_Model "false         true       true      true"
  23   set Box00.GrayLevel_ManualPaint_Model "-1             128    128       50"
  24   set Box00.MaxRange_ManualPaint_Model "-1             50000    50000     50000"
  25   set Box00.MinRange_ManualPaint_Model "-1              9000       9000      9000"
  26   set Box00.SizeDistance_ManualPaint_Model "-1                15            4         4"
  27   set Box00.TitleOptions "Desactivate Big    Small    Clean"
  28   set Box00.Tolerance_Fill_ManualPaint_Model "-1                10000   10000    10000"
  29   set Box00.colorBarPosition "-100 -100"
  30
  31 new creaMaracasVisu:ViewerNV Box02
  32
  33 new wx:LayoutSplit Box03
  34   set Box03.Orientation "H"
  35
  36 new vtk:vtkImageDataPointerRelay Box05
  37
  38 new creaVtk:OutputWindow Box08
  39
  40 new wx:LayoutLine Box09
  41   set Box09.WinTitle "00400_Correction.bbs"
  42
  43 new vtk:MarchingCubes Box13
  44   set Box13.Value "128"
  45
  46 new vtk:PolyDataToActor Box14
  47   set Box14.Colour "1 1 1"
  48
  49 new wx:Slider Box15
  50   set Box15.In "100"
  51   set Box15.Label "true"
  52   set Box15.Max "100"
  53   set Box15.ReactiveOnTrack "true"
  54   set Box15.Title "Opacity 3D "
  55
  56 new wx:LayoutLine Box17
  57
  58 new std:Div Box18
  59   set Box18.In2 "100"
  60
  61 new std:MultipleInputs Box19
  62
  63 new vtk:UpdateRender Box20
  64   set Box20.Active "true"
  65
  66 new vtk:MetaImageReader Box21
  67
  68 new wx:CheckBox Box22
  69   set Box22.In "false"
  70   set Box22.Title "Picker"
  71
  72 new creaVtk:PointPicker Box23
  73   set Box23.TypeEvent "2"
  74
  75 new std:MathOperationVector Box24
  76   set Box24.Type "3"
  77
  78 new std:MathOperationVector Box25
  79   set Box25.Type "23"
  80
  81 new vtk:ImageVtkProperties Box26
  82
  83 new creaMaracasVisu:SetPosition Box28
  84
  85 new wx:LayoutLine Box29
  86   set Box29.Orientation "H"
  87
  88 new wx:RadioButton Box30
  89   set Box30.In0 "1x"
  90   set Box30.In1 "3x"
  91   set Box30.In2 "6x"
  92   set Box30.In3 "12x"
  93
  94 new wx:LayoutLine Box31
  95   set Box31.Orientation "H"
  96
  97 new creaMaracasVisu:SliderMinMax Box35
  98   set Box35.InMinShow "100"
  99   set Box35.ShowActual "false"
 100
 101 new std:ConcatStrings Box34
 102
 103 new std:ConcatStrings Box36
 104
 105 new std:ConcatStrings Box37
 106
 107 new std:ConcatStrings Box38
 108   set Box38.In1 "/<CORE>/davila/<ALGO>/Test_01/<PATIENT>/Condition_01"
 109
 110 new std:ReplaceCleanString Box39
 111   set Box39.Search "<CORE>"
 112
 113 new std:ReplaceCleanString Box40
 114   set Box40.Search "<PATIENT>"
 115
 116 new std:ConcatStrings Box41
 117   set Box41.In2 "/results/"
 118
 119 new std:ConcatStrings Box42
 120   set Box42.In2 "/image.mha"
 121
 122 new std:ReplaceCleanString Box44
 123   set Box44.Replace "00100_OriginalImages"
 124   set Box44.Search "<ALGO>"
 125
 126 new std:ConcatStrings Box45
 127   set Box45.In2 "/image.mha"
 128
 129 new std:ReplaceCleanString Box46
 130   set Box46.Replace "00300_Filter"
 131   set Box46.Search "<ALGO>"
 132
 133 new vtk:vtkImageDataPointerRelay Box47
 134
 135 new vtk:MetaImageReader Box48
 136
 137 new vtk:ImageVtkProperties Box49
 138
 139 new std:GetVectorDoubleElement Box50
 140   set Box50.I "0"
 141
 142 new std:GetVectorDoubleElement Box51
 143   set Box51.I "1"
 144
 145 new std:ConcatStrings Box52
 146   set Box52.In1 "-1"
 147   set Box52.In2 "  "
 148   set Box52.In4 "  "
 149   set Box52.In6 "  "
 150
 151 new std:ConcatStrings Box53
 152   set Box53.In1 "-1"
 153   set Box53.In2 "  "
 154   set Box53.In4 "  "
 155   set Box53.In6 "  "
 156
 157 new std:StringSelect Box54
 158   set Box54.In0 "1"
 159   set Box54.In1 "3"
 160   set Box54.In2 "6"
 161   set Box54.In3 "12"
 162
 163 new std:ConcatStrings Box55
 164   set Box55.In1 "-1"
 165   set Box55.In2 "  "
 166   set Box55.In4 "  "
 167   set Box55.In6 "  "
 168
 169 new std:Mul Box56
 170   set Box56.In1 "2"
 171
 172 new wx:CommandButton Box58
 173   set Box58.Label "Save & Exit"
 174
 175 new std:MultipleInputs Box59
 176
 177 new std:Exit Box60
 178
 179 new vtk:MetaImageWriter Box61
 180   set Box61.Compression "true"
 181
 182 new wx:OutputText Box62
 183   set Box62.Title "Patient"
 184
 185 new creaVtk:ImageThreshold Box63
 186   set Box63.InValue "255"
 187   set Box63.OutValue "0"
 188
 189 new creaMaracasVisu:ColorLayerImageView Box64
 190   set Box64.ColorBarPosition "-100 -100"
 191   set Box64.Opacity "50"
 192   set Box64.PlainOrGradientColor "true"
 193   set Box64.TypeControlsInterface "2"
 194   set Box64.WinTitle "Opacity Reference"
 195   set Box64.lstBaseColor "0 0 0  1 0 0"
 196   set Box64.lstGreyLevelBoundaries "0 128 256"
 197   set Box64.lstTransparenceBoundaries "0"
 198
 199 new wx:LayoutLine Box65
 200
 201 new std:ConcatStrings Box66
 202   set Box66.In2 ".final.mha"
 203
 204 new vtk:MetaImageWriter Box67
 205   set Box67.Compression "true"
 206
 207 new creaVtk:ImageThreshold Box68
 208   set Box68.InValue "255"
 209   set Box68.Lower "127"
 210   set Box68.OutValue "0"
 211   set Box68.Upper "256"
 212
 213
 214 connect Box02.Widget Box03.Widget2
 215
 216 connect Box02.BoxChange Box00.BoxExecute_ManualPaint_Model
 217
 218 connect Box02.Point Box00.Point_ManualPaint_Model
 219
 220 connect Box02.wxVtkBaseView2 Box00.wxvtkbaseview1
 221
 222 connect Box02.wxVtkBaseView3 Box00.wxvtkbaseview2
 223
 224 connect Box02.wxVtkBaseView4 Box00.wxvtkbaseview3
 225
 226 connect Box05.Out Box02.In
 227
 228 connect Box03.Widget Box09.Widget1
 229
 230 connect Box05.Out Box00.Image_ManualPaint_Model
 231
 232 connect Box13.Out Box14.In
 233
 234 connect Box15.Out Box18.In1
 235
 236 connect Box17.Widget Box03.Widget1
 237
 238 connect Box18.Out Box14.Opacity
 239
 240 connect Box15.BoxChange Box19.In1
 241
 242 connect Box19.BoxChange Box14.BoxExecute
 243
 244 connect Box14.BoxChange Box20.BoxExecute
 245
 246 connect Box02.Renderer1 Box14.Renderer
 247
 248 connect Box02.Renderer1 Box20.Renderer
 249
 250 connect Box13.BoxChange Box19.In4
 251
 252 connect Box02.BoxChange Box13.BoxExecute
 253
 254 connect Box02.Renderer1 Box23.Renderer
 255
 256 connect Box22.Out Box23.Active
 257
 258 connect Box24.Out Box25.In0
 259
 260 connect Box23.Point Box24.In0
 261
 262 connect Box26.Spacing Box24.In1
 263
 264 connect Box05.Out Box26.In
 265
 266 connect Box25.Out Box28.Point
 267
 268 connect Box02.wxVtkBaseView1 Box28.wxVtkBaseView
 269
 270 connect Box23.BoxChange Box28.BoxExecute
 271
 272 connect Box22.Widget Box29.Widget4
 273
 274 connect Box15.Widget Box29.Widget3
 275
 276 connect Box30.Widget Box31.Widget1
 277
 278
 279
 280
 281 connect Box38.Out Box39.In
 282
 283 connect Box36.Out Box39.Replace
 284
 285 connect Box39.Out Box40.In
 286
 287 connect Box37.Out Box40.Replace
 288
 289 connect Box34.Out Box41.In1
 290
 291 connect Box40.Out Box41.In3
 292
 293 connect Box42.Out Box21.In
 294
 295 connect Box21.Out Box05.In
 296
 297 connect Box41.Out Box44.In
 298
 299 connect Box44.Out Box42.In1
 300
 301 connect Box46.Out Box45.In1
 302
 303 connect Box41.Out Box46.In
 304
 305 connect Box48.Out Box47.In
 306
 307 connect Box45.Out Box48.In
 308
 309 connect Box47.Out Box00.Image2_ManualPaint_Model
 310
 311 connect Box47.Out Box13.In
 312
 313 connect Box05.Out Box49.In
 314
 315 connect Box49.MinMax Box50.In
 316
 317 connect Box50.Out Box35.InMin
 318
 319 connect Box49.MinMax Box51.In
 320
 321 connect Box51.Out Box35.InMax
 322
 323 connect Box35.OutEnd Box52.In3
 324
 325 connect Box35.OutEnd Box52.In5
 326
 327 connect Box35.OutEnd Box52.In7
 328
 329 connect Box52.Out Box00.MaxRange_ManualPaint_Model
 330
 331 connect Box35.OutStart Box53.In3
 332
 333 connect Box35.OutStart Box53.In5
 334
 335 connect Box35.OutStart Box53.In7
 336
 337 connect Box53.Out Box00.MinRange_ManualPaint_Model
 338
 339 connect Box51.Out Box35.InMaxShow
 340
 341 connect Box30.Out Box54.In
 342
 343 connect Box54.Out Box56.In2
 344
 345 connect Box56.Out Box55.In3
 346
 347 connect Box54.Out Box55.In5
 348
 349 connect Box54.Out Box55.In7
 350
 351 connect Box55.Out Box00.SizeDistance_ManualPaint_Model
 352
 353 connect Box60.BoxChange Box59.In9
 354
 355 connect Box61.BoxChange Box59.In1
 356
 357 connect Box47.Out Box61.In
 358
 359 connect Box45.Out Box61.Filename
 360
 361 connect Box58.BoxChange Box59.BoxExecute
 362
 363 connect Box42.Out Box62.In
 364
 365 connect Box58.Widget Box17.Widget8
 366
 367 connect Box29.Widget Box17.Widget6
 368
 369 connect Box31.Widget Box17.Widget4
 370
 371 connect Box00.widgetOut Box17.Widget2
 372
 373 connect Box62.Widget Box17.Widget1
 374
 375 connect Box63.Out Box64.In
 376
 377 connect Box35.Widget Box65.Widget1
 378
 379 connect Box64.Widget Box65.Widget3
 380
 381 connect Box65.Widget Box31.Widget4
 382
 383 connect Box35.OutEnd Box63.Upper
 384
 385 connect Box35.OutStart Box63.Lower
 386
 387 connect Box02.wxVtkBaseView2 Box64.WxVtkBaseView
 388
 389 connect Box02.wxVtkBaseView3 Box64.WxVtkBaseView1
 390
 391 connect Box02.wxVtkBaseView4 Box64.WxVtkBaseView2
 392
 393 connect Box05.Out Box63.In
 394
 395 connect Box35.BoxChange Box64.BoxExecute
 396
 397 connect Box45.Out Box66.In1
 398
 399 connect Box66.Out Box67.Filename
 400
 401 connect Box47.Out Box68.In
 402
 403 connect Box67.BoxChange Box59.In3
 404
 405 connect Box68.Out Box67.In
 406
 407
 408
 409 # Complex input ports
 410 input BaseDir Box34.In1 " "
 411 input CoreID Box36.In1 " "
 412 input PatientID Box37.In1 " "
 413 exec Box08
 414 exec Box09