PackRecalage/bbs/appli/Recalage2D.bbs

   1 # ---------------------------------------------------------------------
   2 #
   3 # Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image
   4 #                        pour la Santé)
   5 # Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
   6 #
   7 #  This software is governed by the CeCILL-B license under French law and
   8 #  abiding by the rules of distribution of free software. You can  use,
   9 #  modify and/ or redistribute the software under the terms of the CeCILL-B
  10 #  license as circulated by CEA, CNRS and INRIA at the following URL
  11 #  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html
  12 #  or in the file LICENSE.txt.
  13 #
  14 #  As a counterpart to the access to the source code and  rights to copy,
  15 #  modify and redistribute granted by the license, users are provided only
  16 #  with a limited warranty  and the software's author,  the holder of the
  17 #  economic rights,  and the successive licensors  have only  limited
  18 #  liability.
  19 #
  20 #  The fact that you are presently reading this means that you have had
  21 #  knowledge of the CeCILL-B license and that you accept its terms.
  22 # ------------------------------------------------------------------------
  23
  24 # ----------------------------------
  25 # - BBTKGEditor v 1.2 BBS BlackBox Script
  26 # - /Users/davila/Creatis/All5/creatools_source/creaRigidRegistration/PackRecalage/bbs/appli/Recalage2D.bbs
  27 # ----------------------------------
  28
  29 # BBTK GEditor Script
  30 # ----------------------
  31
  32 include std
  33 include itkvtk
  34 include vtk
  35 include wx
  36 include creaMaracasVisu
  37 include PackRecalage
  38 include std
  39 include wxvtk
  40 include creaImageIO
  41
  42 author "info-dev@creatis.insa-lyon.fr"
  43 description "creatisRecalage"
  44 category "example"
  45
  46 new SliceImage imgslice1
  47
  48 new SliceImage imgslice2
  49
  50 new LayoutLine v1Layout
  51
  52 new ViewerNV viewer1
  53   set viewer1.nTypeView "0"
  54
  55 new LayoutLine v2Layout
  56
  57 new ViewerNV viewer2
  58   set viewer2.nTypeView "0"
  59
  60 new LayoutSplit initialImages
  61   set initialImages.Orientation "H"
  62   set initialImages.Proportion "50"
  63
  64 new LayoutLine buttonsLayout
  65   set buttonsLayout.Orientation "V"
  66
  67 new Slider slider
  68   set slider.In "0"
  69   set slider.Max "180"
  70   set slider.Min "-180"
  71   set slider.ReactiveOnTrack "1"
  72   set slider.Title "Angle"
  73
  74 new Slider sliderX
  75   set sliderX.In "100"
  76   set sliderX.Max "500"
  77   set sliderX.Min "10"
  78   set sliderX.ReactiveOnTrack "1"
  79   set sliderX.Title "% Scale in X"
  80
  81 new Slider sliderY
  82   set sliderY.In "100"
  83   set sliderY.Max "500"
  84   set sliderY.Min "10"
  85   set sliderY.ReactiveOnTrack "1"
  86   set sliderY.Title "% Scale in Y"
  87
  88 new Transform2DBox transform
  89
  90 new ReSlicerBox reslice1
  91
  92 new ImageConvolution convol1
  93
  94 new ImageConvolution convol2
  95
  96 new ImageRecalageProperties properties
  97
  98 new Slider sdrZ
  99   set sdrZ.Min "0"
 100   set sdrZ.ReactiveOnTrack "1"
 101   set sdrZ.Title "Z for slice"
 102
 103 new Slider sdrF
 104   set sdrF.In "0"
 105   set sdrF.Max "100"
 106   set sdrF.Min "0"
 107   set sdrF.ReactiveOnTrack "1"
 108   set sdrF.Title "Convolution Factor"
 109
 110 new CheckBox checkF
 111   set checkF.In "True"
 112
 113 new MultipleInputs multF
 114
 115 new Slider colorLevel
 116   set colorLevel.Min "0"
 117   set colorLevel.ReactiveOnTrack "true"
 118   set colorLevel.Title "Color Level"
 119
 120 new Slider windowLevel
 121   set windowLevel.Min "0"
 122   set windowLevel.ReactiveOnTrack "true"
 123   set windowLevel.Title "Window Level"
 124
 125 new MultipleInputs multLevels
 126
 127 new CommandButton saveBut
 128   set saveBut.Label "Save Image"
 129
 130 new FileSelector fileSave
 131   set fileSave.OpenSave "Save"
 132   set fileSave.Wildcard "*.mhd"
 133
 134 new MetaImageWriter writSave
 135
 136 new CheckBoardBox cbb
 137
 138 new Slider sdr
 139   set sdr.In "14"
 140   set sdr.Max "50"
 141   set sdr.ReactiveOnTrack "1"
 142
 143 new Slider sdr2
 144   set sdr2.In "14"
 145   set sdr2.Max "50"
 146   set sdr2.ReactiveOnTrack "1"
 147
 148 new LayoutSplit checkerBoard
 149   set checkerBoard.Proportion "80"
 150
 151 new LayoutLine ly
 152
 153 new ViewerNV viewerCH
 154   set viewerCH.nTypeView "0"
 155
 156 new TransparencyBox trans
 157
 158 new Slider sdrP
 159   set sdrP.In "50"
 160   set sdrP.Max "100"
 161   set sdrP.Min "0"
 162   set sdrP.ReactiveOnTrack "true"
 163
 164 new ViewerNV transView
 165   set transView.nTypeView "0"
 166
 167 new LayoutSplit transparency
 168   set transparency.Proportion "80"
 169
 170 new ImageSwitcherBox switch
 171
 172 new CheckBox checkS
 173   set checkS.In "true"
 174   set checkS.Title "On"
 175
 176 new Slider sdrT
 177   set sdrT.In "500"
 178   set sdrT.Max "1000"
 179   set sdrT.Min "0"
 180   set sdrT.ReactiveOnTrack "True"
 181
 182 new Viewer2D viewerSwitch
 183
 184 new LayoutSplit switcher
 185   set switcher.Proportion "70"
 186
 187 new LayoutSplit switchWindow
 188   set switchWindow.Proportion "80"
 189
 190 new LayoutSplit switchTool
 191   set switchTool.Orientation "H"
 192   set switchTool.Proportion "50"
 193
 194 new MultipleInputs mult
 195
 196 new MultipleInputs mult2
 197
 198 new MultipleInputs mult3
 199
 200 new MultipleInputs mult4
 201
 202 new LayoutTab tabs
 203
 204 new LayoutLine tools
 205
 206 new LayoutSplit convolTools
 207   set convolTools.Orientation "H"
 208   set convolTools.Proportion "80"
 209
 210 new LayoutSplit window1
 211   set window1.Orientation "V"
 212   set window1.Proportion "80"
 213   set window1.WinWidth "600"
 214
 215 new LayoutSplit window2
 216   set window2.Proportion "90"
 217
 218 new LayoutSplit main
 219   set main.Orientation "H"
 220   set main.Proportion "50"
 221   set main.WinWidth "1200"
 222
 223 new vtkImageDataPointerRelay Box56
 224
 225 new ImagesChooserDialogBox Box57
 226
 227 new ImagesChooserDialogBox Box58
 228
 229 new vtkImageDataPointerRelay Box59
 230
 231
 232 connect viewer1.Widget v1Layout.Widget1
 233 connect viewer2.Widget v2Layout.Widget1
 234 connect v1Layout.Widget initialImages.Widget1
 235 connect v2Layout.Widget initialImages.Widget2
 236 connect slider.Widget buttonsLayout.Widget1
 237 connect sliderX.Widget buttonsLayout.Widget2
 238 connect sliderY.Widget buttonsLayout.Widget3
 239 connect viewer2.Point transform.CenterPoint
 240 connect slider.Out transform.Angle
 241 connect sliderX.Out transform.ScaleX
 242 connect sliderY.Out transform.ScaleY
 243 connect viewer1.Point reslice1.Origin
 244 connect transform.Out reslice1.Transform
 245 connect imgslice2.Out reslice1.In
 246 connect imgslice1.Out convol1.In
 247 connect reslice1.Out convol2.In
 248 connect properties.LengthZ sdrZ.Max
 249 connect sdrZ.Out imgslice1.Z
 250 connect sdrZ.Out imgslice2.Z
 251 connect sdrZ.BoxChange imgslice1.BoxExecute
 252 connect sdrZ.BoxChange imgslice2.BoxExecute
 253 connect sdrF.Out convol1.Factor
 254 connect sdrF.Out convol2.Factor
 255 connect checkF.Out convol1.On
 256 connect checkF.Out convol2.On
 257 connect sdrF.BoxChange multF.In1
 258 connect checkF.BoxChange multF.In2
 259 connect multF.BoxChange convol1.BoxExecute
 260 connect multF.BoxChange convol2.BoxExecute
 261 connect properties.ColorLevel colorLevel.Max
 262 connect properties.MidColorLevel colorLevel.In
 263 connect properties.ColorLevel windowLevel.Max
 264 connect properties.MidColorLevel windowLevel.In
 265 connect colorLevel.Out viewer1.ColorLevel
 266 connect colorLevel.Out viewer2.ColorLevel
 267 connect windowLevel.Out viewer1.WindowLevel
 268 connect windowLevel.Out viewer2.WindowLevel
 269 connect colorLevel.BoxChange multLevels.In1
 270 connect windowLevel.BoxChange multLevels.In2
 271 connect multLevels.BoxChange viewer1.BoxExecute
 272 connect multLevels.BoxChange viewer2.BoxExecute
 273 connect reslice1.Out writSave.In
 274 connect fileSave.Out writSave.Filename
 275 connect saveBut.BoxChange fileSave.BoxExecute
 276 connect fileSave.BoxChange writSave.BoxExecute
 277 connect convol1.Out cbb.In1
 278 connect convol2.Out cbb.In2
 279 connect colorLevel.Out viewerCH.ColorLevel
 280 connect windowLevel.Out viewerCH.WindowLevel
 281 connect sdr.Out cbb.Cols
 282 connect sdr2.Out cbb.Rows
 283 connect cbb.Out viewerCH.In
 284 connect sdr.Widget ly.Widget2
 285 connect sdr2.Widget ly.Widget3
 286 connect viewerCH.Widget checkerBoard.Widget1
 287 connect ly.Widget checkerBoard.Widget2
 288 connect convol1.Out trans.In1
 289 connect convol2.Out trans.In2
 290 connect sdrP.Out trans.Percent
 291 connect trans.Out transView.In
 292 connect transView.Widget transparency.Widget1
 293 connect sdrP.Widget transparency.Widget2
 294 connect colorLevel.Out transView.ColorLevel
 295 connect windowLevel.Out transView.WindowLevel
 296 connect convol1.Out switch.In1
 297 connect convol2.Out switch.In2
 298 connect checkS.Out switch.On
 299 connect sdrT.Out switch.Time
 300 connect switch.Out viewerSwitch.In
 301 connect sdrT.BoxChange switch.BoxExecute
 302 connect switch.BoxChange viewerSwitch.BoxExecute
 303 connect viewerSwitch.Widget switchWindow.Widget1
 304 connect switch.Widget switchTool.Widget1
 305 connect checkS.Widget switchTool.Widget2
 306 connect switchTool.Widget switchWindow.Widget2
 307 connect switchWindow.Widget switcher.Widget1
 308 connect sdrT.Widget switcher.Widget2
 309 connect slider.BoxChange mult.In1
 310 connect sliderX.BoxChange mult.In2
 311 connect sliderY.BoxChange mult.In3
 312 connect viewer1.BoxChange mult.In4
 313 connect viewer2.BoxChange mult.In5
 314 connect multF.BoxChange mult2.In1
 315 connect mult.BoxChange mult2.In2
 316 connect ly.BoxChange mult3.In1
 317 connect mult2.BoxChange mult3.In2
 318 connect imgslice1.BoxChange mult3.In3
 319 connect imgslice2.BoxChange mult3.In4
 320 connect multLevels.BoxChange mult3.In5
 321 connect mult3.BoxChange cbb.BoxExecute
 322 connect cbb.BoxChange viewerCH.BoxExecute
 323 connect mult2.BoxChange mult4.In1
 324 connect sdrP.BoxChange mult4.In2
 325 connect mult4.BoxChange trans.BoxExecute
 326 connect trans.BoxChange transView.BoxExecute
 327 connect switcher.Widget tabs.Widget1
 328 connect checkerBoard.Widget tabs.Widget2
 329 connect transparency.Widget tabs.Widget3
 330 connect sdrZ.Widget tools.Widget1
 331 connect colorLevel.Widget tools.Widget2
 332 connect windowLevel.Widget tools.Widget3
 333 connect saveBut.Widget tools.Widget5
 334 connect sdrF.Widget convolTools.Widget1
 335 connect checkF.Widget convolTools.Widget2
 336 connect convolTools.Widget tools.Widget4
 337 connect initialImages.Widget window1.Widget1
 338 connect buttonsLayout.Widget window1.Widget2
 339 connect tabs.Widget window2.Widget1
 340 connect tools.Widget window2.Widget2
 341 connect window1.Widget main.Widget1
 342 connect window2.Widget main.Widget2
 343 connect Box56.Out imgslice2.In
 344 connect Box56.Out viewer2.In
 345 connect Box57.Out Box56.In
 346 connect Box58.Out Box59.In
 347 connect Box59.Out imgslice1.In
 348 connect Box59.Out viewer1.In
 349 connect Box59.Out properties.In
 350 connect Box58.BoxChange properties.BoxExecute
 351
 352 exec main