bbtk_package_creaMiniTools/bbs/appli/PlaneViewer-MHD.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - 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
 148 connect Box02.Out Box01.In
 149
 150 connect Box01.Widget Box04.Widget2
 151
 152 connect Box05.Widget Box04.Widget1
 153
 154 connect Box07.Out Box08.FileName
 155
 156 connect Box08.DimSize Box09.In
 157
 158 connect Box10.Out Box03.Max
 159
 160 connect Box16.Widget Box05.Widget1
 161
 162 connect Box07.Out Box21.NameFile
 163
 164 connect Box03.Out Box23.In
 165
 166 connect Box23.Out Box02.Slice
 167
 168 connect Box28.Out Box27.On
 169
 170 connect Box29.BoxChange Box01.BoxExecute
 171
 172 connect Box30.Out Box27.Time
 173
 174 connect Box01.wxVtkBaseView1 Box32.WxVtkBaseView
 175
 176 connect Box29.BoxChange Box32.BoxExecute
 177
 178 connect Box28.Widget Box34.Widget1
 179
 180 connect Box35.Widget Box34.Widget2
 181
 182 connect Box23.Out Box35.In
 183
 184 connect Box29.BoxChange Box35.BoxExecute
 185
 186 connect Box36.Widget Box38.Widget1
 187
 188 connect Box37.Widget Box38.Widget2
 189
 190 connect Box10.Out Box36.Max
 191
 192 connect Box10.Out Box37.Max
 193
 194 connect Box36.Out Box39.In1
 195
 196 connect Box37.Out Box39.In2
 197
 198 connect Box39.Out Box23.In1
 199
 200 connect Box27.BoxChange Box29.In2
 201
 202 connect Box03.BoxChange Box29.In1
 203
 204 connect Box27.BoxChange Box40.In1
 205
 206 connect Box40.BoxChange Box39.BoxExecute
 207
 208 connect Box36.BoxChange Box40.In2
 209
 210 connect Box37.BoxChange Box40.In3
 211
 212 connect Box10.Out Box37.In
 213
 214 connect Box42.Widget Box41.Widget1
 215
 216 connect Box41.Widget Box16.Widget1
 217
 218 connect Box47.Widget Box46.Widget1
 219
 220 connect Box32.Widget Box47.Widget1
 221
 222 connect Box48.Widget Box31.Widget1
 223
 224 connect Box30.Widget Box31.Widget2
 225
 226 connect Box38.Widget Box31.Widget3
 227
 228 connect Box34.Widget Box48.Widget1
 229
 230 connect Box27.Widget Box48.Widget2
 231
 232 connect Box47.Widget Box51.Widget
 233
 234 connect Box49.Widget Box47.Widget2
 235
 236 connect Box29.BoxChange Box49.BoxExecute
 237
 238 connect Box51.BoxChange Box29.In3
 239
 240 connect Box51.LstPaths Box49.In
 241
 242 connect Box54.Out Box32.In
 243
 244 connect Box23.Out Box54.Slice
 245
 246 connect Box51.LstPaths Box54.FileName
 247
 248 connect Box07.Out Box02.FileName
 249
 250 connect Box07.Out Box43.In
 251
 252 connect Box09.Out Box10.In1
 253
 254 connect Box56.LstPaths Box57.In
 255
 256 connect Box57.Out Box07.In1
 257
 258 connect Box43.Widget Box42.Widget2
 259
 260 connect Box59.Widget Box56.Widget
 261
 262 connect Box56.BoxChange Box43.BoxExecute
 263
 264 connect Box56.BoxChange Box29.In4
 265
 266 connect Box56.BoxChange Box21.boxExecute
 267
 268 connect Box61.Widget Box42.Widget1
 269
 270 connect Box59.Widget Box61.Widget1
 271
 272 connect Box03.Widget Box61.Widget2
 273
 274 connect Box46.Widget Box16.Widget2
 275
 276 connect Box21.widget Box05.Widget3
 277
 278 connect Box31.Widget Box05.Widget2
 279
 280 connect Box00.Out Box57.ErrorValue
 281
 282
 283
 284 # Complex input ports
 285 exec Box04
 286 exec Box62