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
 159 connect Box02.Out Box01.In
 160
 161 connect Box01.Widget Box04.Widget2
 162
 163 connect Box05.Widget Box04.Widget1
 164
 165 connect Box07.Out Box08.FileName
 166
 167 connect Box08.DimSize Box09.In
 168
 169 connect Box10.Out Box03.Max
 170
 171 connect Box16.Widget Box05.Widget1
 172
 173 connect Box07.Out Box21.NameFile
 174
 175 connect Box03.Out Box23.In
 176
 177 connect Box23.Out Box02.Slice
 178
 179 connect Box28.Out Box27.On
 180
 181 connect Box29.BoxChange Box01.BoxExecute
 182
 183 connect Box30.Out Box27.Time
 184
 185 connect Box01.wxVtkBaseView1 Box32.WxVtkBaseView
 186
 187 connect Box29.BoxChange Box32.BoxExecute
 188
 189 connect Box28.Widget Box34.Widget1
 190
 191 connect Box35.Widget Box34.Widget2
 192
 193 connect Box23.Out Box35.In
 194
 195 connect Box29.BoxChange Box35.BoxExecute
 196
 197 connect Box36.Widget Box38.Widget1
 198
 199 connect Box37.Widget Box38.Widget2
 200
 201 connect Box10.Out Box36.Max
 202
 203 connect Box10.Out Box37.Max
 204
 205 connect Box36.Out Box39.In1
 206
 207 connect Box37.Out Box39.In2
 208
 209 connect Box39.Out Box23.In1
 210
 211 connect Box27.BoxChange Box29.In2
 212
 213 connect Box03.BoxChange Box29.In1
 214
 215 connect Box27.BoxChange Box40.In1
 216
 217 connect Box40.BoxChange Box39.BoxExecute
 218
 219 connect Box36.BoxChange Box40.In2
 220
 221 connect Box37.BoxChange Box40.In3
 222
 223 connect Box10.Out Box37.In
 224
 225 connect Box42.Widget Box41.Widget1
 226
 227 connect Box41.Widget Box16.Widget1
 228
 229 connect Box47.Widget Box46.Widget1
 230
 231 connect Box48.Widget Box31.Widget1
 232
 233 connect Box30.Widget Box31.Widget2
 234
 235 connect Box38.Widget Box31.Widget3
 236
 237 connect Box34.Widget Box48.Widget1
 238
 239 connect Box27.Widget Box48.Widget2
 240
 241 connect Box47.Widget Box51.Widget
 242
 243 connect Box29.BoxChange Box49.BoxExecute
 244
 245 connect Box51.BoxChange Box29.In3
 246
 247 connect Box51.LstPaths Box49.In
 248
 249 connect Box54.Out Box32.In
 250
 251 connect Box23.Out Box54.Slice
 252
 253 connect Box51.LstPaths Box54.FileName
 254
 255 connect Box07.Out Box02.FileName
 256
 257 connect Box07.Out Box43.In
 258
 259 connect Box09.Out Box10.In1
 260
 261 connect Box56.LstPaths Box57.In
 262
 263 connect Box57.Out Box07.In1
 264
 265 connect Box43.Widget Box42.Widget2
 266
 267 connect Box59.Widget Box56.Widget
 268
 269 connect Box56.BoxChange Box43.BoxExecute
 270
 271 connect Box56.BoxChange Box29.In4
 272
 273 connect Box56.BoxChange Box21.boxExecute
 274
 275 connect Box61.Widget Box42.Widget1
 276
 277 connect Box59.Widget Box61.Widget1
 278
 279 connect Box03.Widget Box61.Widget2
 280
 281 connect Box46.Widget Box16.Widget2
 282
 283 connect Box21.widget Box05.Widget3
 284
 285 connect Box31.Widget Box05.Widget2
 286
 287 connect Box00.Out Box57.ErrorValue
 288
 289 connect Box66.Out Box32.lstRangeForColorBar
 290
 291 connect Box68.outend Box66.In3
 292
 293 connect Box68.outstart Box66.In1
 294
 295 connect Box68.boxchange Box29.In5
 296
 297 connect Box68.widget Box47.Widget3
 298
 299 connect Box32.Widget Box47.Widget2
 300
 301 connect Box49.Widget Box47.Widget1
 302
 303 connect Box68.outstart Box65.In1
 304
 305 connect Box65.Out Box32.lstTransparenceBoundaries
 306
 307
 308
 309 # Complex input ports
 310 exec Box04
 311 exec Box62