packages/wxvtk/bbs/boxes/bbSimpleSlicer.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  # Previous Authors : Laurent Guigues, Jean-Pierre Roux
   7  # CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil
   8  #
   9  #  This software is governed by the CeCILL-B license under French law and
  10  #  abiding by the rules of distribution of free software. You can  use,
  11  #  modify and/ or redistribute the software under the terms of the CeCILL-B
  12  #  license as circulated by CEA, CNRS and INRIA at the following URL
  13  #  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html
  14  #  or in the file LICENSE.txt.
  15  #
  16  #  As a counterpart to the access to the source code and  rights to copy,
  17  #  modify and redistribute granted by the license, users are provided only
  18  #  with a limited warranty  and the software's author,  the holder of the
  19  #  economic rights,  and the successive licensors  have only  limited
  20  #  liability.
  21  #
  22  #  The fact that you are presently reading this means that you have had
  23  #  knowledge of the CeCILL-B license and that you accept its terms.
  24  # ------------------------------------------------------------------------ */
  25
  26
  27 load std
  28 load wx
  29 load wxvtk
  30
  31 define SimpleSlicer wxvtk
  32
  33  description "Simple 2D viewer of a slice of a 3D image. The slice is controlled by a slider. See <a href='#exampleSimpleSlicer'>exampleSimpleSlicer.bbs</a>. Screenshot : <center><img src='ExampleSimpleSlicer.jpg'></center>"
  34  author "info-dev@creatis.insa-lyon.fr"
  35  category "viewer"
  36
  37  new LayoutSplit main
  38  set main.Proportion 80
  39  new Viewer2D viewer2D
  40  new Slider   slider
  41
  42  # WE NEED a MultipleInputs Box to connect BOTH
  43  # slider.BoxChange AND the input BoxExecute
  44  # of the Complex box to viewer2D.BoxExecute
  45
  46  new MultipleInputs refresh
  47
  48  connect viewer2D.Widget  main.Widget1
  49  connect slider.Widget    main.Widget2
  50  connect slider.Out       viewer2D.Slice
  51
  52  connect slider.BoxChange refresh.In1
  53  connect refresh.Out      viewer2D.BoxExecute
  54
  55  #set main.Proportion 80
  56
  57  input In                    viewer2D.In            "Input image"
  58  input WinDialog             main.WinDialog         "Execute in dialog mode"
  59  input WinTitle              main.WinTitle          "Title of the window"
  60  input WinWidth              main.WinWidth          "Width of the window"
  61  input WinHeight             main.WinHeight         "Height of the window"
  62  input BoxExecute            refresh.In2            "Execute the box"
  63  input Orientation           viewer2D.Orientation   "Slicing orientation : 0:yz / 1:xz / 2:xy"
  64  input Slice                 slider.In              "Initial slice"
  65  input Interpolate           viewer2D.Interpolate   "Pixels Interpolation (true/false)"
  66  input SliderSize            slider.Max             "Slider Size"
  67  input SliderTitle           slider.Title           "Slider Title"
  68  input SliderOrientation     slider.Orientation     "Slider Orientation (H/V)"
  69  input SliderReactiveOnTrack slider.ReactiveOnTrack "Reactive On track (default : 0)"
  70
  71  output Widget main.Widget "Widget"
  72
  73  # EXECUTING THE COMPLEX BOX EXECUTES main
  74  exec main
  75
  76 endefine