bbtk_package_creaMiniTools/bbs/appli/PlaneViewer-MHD.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /tmpEED/creaTools/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/appli/PlaneViewer-MHD.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include wx
  12 include creaMaracasVisu
  13 include creaVtk
  14 include std
  15 include vtk
  16 include creaMiniTools
  17 include PackRecalage
  18
  19 author "Author ??"
  20 description "Description ??"
  21 category "<VOID>"
  22
  23 new wx:FileSelector Box00
  24   set Box00.Message "mhd file"
  25   set Box00.Title "mhd file"
  26
  27 new creaMaracasVisu:ViewerNV Box01
  28   set Box01.nTypeView "-1"
  29
  30 new creaVtk:ReadMHDPlane Box02
  31   set Box02.Type "1"
  32
  33 new wx:Slider Box03
  34   set Box03.ReactiveOnTrack "true"
  35
  36 new wx:LayoutSplit Box04
  37   set Box04.Orientation "H"
  38
  39 new wx:LayoutTab Box05
  40
  41 new std:ConcatStrings Box07
  42
  43 new creaVtk:MHDFileInfo Box08
  44
  45 new std:GetVectorIntElement Box09
  46   set Box09.ErrorValue "-100"
  47   set Box09.I "2"
  48
  49 new std:MathOperation Box10
  50   set Box10.In2 "-1"
  51
  52 new wx:LayoutLine Box16
  53   set Box16.WinTitle "Image XY (.mhd)"
  54
  55 new vtk:LoadHola Box20
  56
  57 new creaMiniTools:MHDFileInfo_widget Box21
  58
  59 new std:SharedMemory Box23
  60
  61 new PackRecalage:ImageSwitcherBox Box27
  62   set Box27.Time "200"
  63   set Box27.Title "AA"
  64
  65 new wx:CheckBox Box28
  66   set Box28.Title "Loop"
  67
  68 new std:MultipleInputs Box29
  69
  70 new wx:Slider Box30
  71   set Box30.In "200"
  72   set Box30.Label "true"
  73   set Box30.Max "1500"
  74   set Box30.Min "100"
  75   set Box30.Orientation "H"
  76   set Box30.ReactiveOnTrack "true"
  77   set Box30.Title "Speed (milliseconds)"
  78
  79 new wx:LayoutLine Box31
  80   set Box31.Orientation "V"
  81   set Box31.WinTitle "Animation"
  82
  83 new creaMaracasVisu:ColorLayerImageView Box32
  84   set Box32.TypeControlsInterface "2"
  85
  86 new wx:LayoutLine Box34
  87   set Box34.Orientation "H"
  88
  89 new wx:OutputText Box35
  90
  91 new wx:Slider Box36
  92   set Box36.Label "true"
  93   set Box36.ReactiveOnTrack "true"
  94   set Box36.Title "Slice Z min"
  95
  96 new wx:Slider Box37
  97   set Box37.Label "true"
  98   set Box37.ReactiveOnTrack "true"
  99   set Box37.Title "Slice Z max"
 100
 101 new wx:LayoutLine Box38
 102
 103 new std:MathOperation Box39
 104   set Box39.In1 "0"
 105   set Box39.In2 "1"
 106   set Box39.Type "7"
 107
 108 new std:MultipleInputs Box40
 109
 110 new wx:LayoutTab Box41
 111
 112 new wx:LayoutLine Box42
 113   set Box42.WinTitle "Base Image"
 114
 115 new wx:OutputText Box43
 116
 117 new wx:LayoutTab Box46
 118
 119 new wx:LayoutLine Box47
 120   set Box47.WinTitle "Transparence Layer"
 121
 122 new wx:LayoutLine Box48
 123   set Box48.Orientation "V"
 124
 125 new wx:OutputText Box49
 126   set Box49.Title "Drop your file here ..."
 127
 128 new wx:DropFiles Box51
 129
 130 new creaVtk:ReadMHDPlane Box54
 131   set Box54.Type "1"
 132
 133 new wx:DropFiles Box56
 134
 135 new std:GetVectorStringElement Box57
 136   set Box57.ErrorValue "hola"
 137   set Box57.I "0"
 138
 139 new wx:OutputText Box59
 140   set Box59.In "Drop your file here ..."
 141
 142 new wx:LayoutLine Box61
 143   set Box61.Orientation "H"
 144
 145 new creaVtk:OutputWindow Box62
 146
 147 new std:ConcatStrings Box66
 148   set Box66.In2 " "
 149
 150 new creaMaracasVisu:SliderMinMax-flexible Box68
 151   set Box68.maxIn "255"
 152   set Box68.minIn "0"
 153   set Box68.showactual "false"
 154
 155 new std:ConcatStrings Box65
 156   set Box65.In2 " "
 157
 158 new wx:CheckBox Box67
 159   set Box67.In "true"
 160   set Box67.ReactiveOnKeystroke "true"
 161   set Box67.Title "Interpolate"
 162
 163
 164 connect Box02.Out Box01.In
 165
 166 connect Box01.Widget Box04.Widget2
 167
 168 connect Box05.Widget Box04.Widget1
 169
 170 connect Box07.Out Box08.FileName
 171
 172 connect Box08.DimSize Box09.In
 173
 174 connect Box10.Out Box03.Max
 175
 176 connect Box16.Widget Box05.Widget1
 177
 178 connect Box07.Out Box21.NameFile
 179
 180 connect Box03.Out Box23.In
 181
 182 connect Box23.Out Box02.Slice
 183
 184 connect Box28.Out Box27.On
 185
 186 connect Box29.BoxChange Box01.BoxExecute
 187
 188 connect Box30.Out Box27.Time
 189
 190 connect Box01.wxVtkBaseView1 Box32.WxVtkBaseView
 191
 192 connect Box29.BoxChange Box32.BoxExecute
 193
 194 connect Box28.Widget Box34.Widget1
 195
 196 connect Box35.Widget Box34.Widget2
 197
 198 connect Box23.Out Box35.In
 199
 200 connect Box29.BoxChange Box35.BoxExecute
 201
 202 connect Box36.Widget Box38.Widget1
 203
 204 connect Box37.Widget Box38.Widget2
 205
 206 connect Box10.Out Box36.Max
 207
 208 connect Box10.Out Box37.Max
 209
 210 connect Box36.Out Box39.In1
 211
 212 connect Box37.Out Box39.In2
 213
 214 connect Box39.Out Box23.In1
 215
 216 connect Box27.BoxChange Box29.In2
 217
 218 connect Box03.BoxChange Box29.In1
 219
 220 connect Box27.BoxChange Box40.In1
 221
 222 connect Box40.BoxChange Box39.BoxExecute
 223
 224 connect Box36.BoxChange Box40.In2
 225
 226 connect Box37.BoxChange Box40.In3
 227
 228 connect Box10.Out Box37.In
 229
 230 connect Box42.Widget Box41.Widget1
 231
 232 connect Box41.Widget Box16.Widget1
 233
 234 connect Box47.Widget Box46.Widget1
 235
 236 connect Box48.Widget Box31.Widget1
 237
 238 connect Box30.Widget Box31.Widget2
 239
 240 connect Box38.Widget Box31.Widget3
 241
 242 connect Box34.Widget Box48.Widget1
 243
 244 connect Box27.Widget Box48.Widget2
 245
 246 connect Box47.Widget Box51.Widget
 247
 248 connect Box29.BoxChange Box49.BoxExecute
 249
 250 connect Box51.BoxChange Box29.In3
 251
 252 connect Box51.LstPaths Box49.In
 253
 254 connect Box54.Out Box32.In
 255
 256 connect Box23.Out Box54.Slice
 257
 258 connect Box51.LstPaths Box54.FileName
 259
 260 connect Box07.Out Box02.FileName
 261
 262 connect Box07.Out Box43.In
 263
 264 connect Box09.Out Box10.In1
 265
 266 connect Box56.LstPaths Box57.In
 267
 268 connect Box57.Out Box07.In1
 269
 270 connect Box43.Widget Box42.Widget2
 271
 272 connect Box59.Widget Box56.Widget
 273
 274 connect Box56.BoxChange Box43.BoxExecute
 275
 276 connect Box56.BoxChange Box29.In4
 277
 278 connect Box56.BoxChange Box21.boxExecute
 279
 280 connect Box61.Widget Box42.Widget1
 281
 282 connect Box59.Widget Box61.Widget1
 283
 284 connect Box03.Widget Box61.Widget2
 285
 286 connect Box46.Widget Box16.Widget2
 287
 288 connect Box21.widget Box05.Widget3
 289
 290 connect Box31.Widget Box05.Widget2
 291
 292 connect Box00.Out Box57.ErrorValue
 293
 294 connect Box66.Out Box32.lstRangeForColorBar
 295
 296 connect Box68.outend Box66.In3
 297
 298 connect Box68.outstart Box66.In1
 299
 300 connect Box68.boxchange Box29.In5
 301
 302 connect Box68.widget Box47.Widget3
 303
 304 connect Box32.Widget Box47.Widget2
 305
 306 connect Box49.Widget Box47.Widget1
 307
 308 connect Box68.outstart Box65.In1
 309
 310 connect Box65.Out Box32.lstTransparenceBoundaries
 311
 312 connect Box67.Widget Box42.Widget3
 313
 314 connect Box67.Out Box01.Interpolate
 315
 316 connect Box67.BoxChange Box29.In6
 317
 318
 319
 320 # Complex input ports
 321 exec Box04
 322 exec Box62