packages/appli/bbs/appli/Slicer.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 description "A 3D image slicer"
  27 author "jpr@creatis.insa-lyon.fr"
  28 category "application"
  29
  30 load vtk
  31 include wxvtk
  32 load std
  33 load itk
  34 include vtk
  35 include wx
  36 load itkvtk
  37
  38 //include wxvtk/boxes/bbSimpleSlicer
  39 //include wx/boxes/LayoutX4
  40
  41 new LayoutX4 main
  42 new LayoutLine upright
  43 new LayoutLine upleft
  44 new LayoutLine downleft
  45
  46 connect upright.Widget main.Widget1
  47 connect upleft.Widget main.Widget2
  48 connect downleft.Widget main.Widget3
  49
  50 load creaImageIO
  51 new Gimmick reader
  52
  53
  54 //For 3D Viewer
  55
  56 new ImagePlanes planes
  57    connect reader.Out planes.In
  58
  59 new Viewer3D viewer
  60    connect planes.PlaneX viewer.Obs1
  61    connect planes.PlaneY viewer.Obs2
  62    connect planes.PlaneZ viewer.Obs3
  63
  64    connect viewer.Widget main.Widget4
  65
  66
  67 // For X axis
  68 // ----------
  69 new Viewer2D viewerUL
  70   set viewerUL.BoxProcessMode Always
  71   connect planes.ImageX viewerUL.In
  72    # contains only one slice
  73   set viewerUL.Slice 0
  74   connect viewerUL.Widget upleft.Widget1
  75
  76 //  print "planes.BoxChange $planes.BoxChange"
  77 //  print "viewer.BoxChange $viewer.BoxChange"
  78
  79  connect planes.BoxChange viewerUL.BoxExecute
  80
  81 print "===============planes.ImageX $planes.ImageX"
  82
  83 // For Y axis
  84 // ----------
  85 new Viewer2D viewerUR
  86   set viewerUR.BoxProcessMode Always
  87   connect planes.ImageY viewerUR.In
  88   connect viewerUR.Widget upright.Widget1
  89  # contains only one  slice
  90   set viewerUR.Slice 0
  91  connect planes.BoxChange viewerUR.BoxExecute
  92
  93  print "===============planes.ImageY $planes.ImageY"
  94
  95 // For Z axis
  96 // ----------
  97 new Viewer2D viewerDL
  98   set viewerDL.BoxProcessMode Always
  99   connect planes.ImageZ viewerDL.In
 100   connect viewerDL.Widget downleft.Widget1
 101  # contains only one  slice
 102   set viewerDL.Slice 0
 103   connect planes.BoxChange viewerDL.BoxExecute
 104
 105  print "===============planes.ImageZ $planes.ImageZ"
 106
 107 set main.WinTitle "Slicer"
 108
 109 exec main
 110