packages/wxvtk/bbs/appli/exampleIsoSurfaceWidget.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 description "Example of IsoSurfaceWidget."
  28 author "laurent.guigues at creatis.insa-lyon.fr"
  29 category "example"
  30
  31 include wxvtk
  32
  33 include wxvtk/boxes/bbIsoSurfaceWidget
  34 include vtk/boxes/bbLoadHola
  35
  36 new IsoSurfaceWidget surface1
  37 new IsoSurfaceWidget surface2
  38
  39 //load wxvtk
  40 new Viewer3D viewer
  41 new LoadHola reader1
  42
  43 connect reader1.Out surface1.In
  44 connect reader1.Out surface2.In
  45
  46 set surface1.Isovalue 100
  47 set surface1.Opacity 100
  48 set surface1.Colour "0.5 0 0"
  49 set surface1.Title "Iso-surface 1"
  50
  51 set surface2.Isovalue 200
  52 set surface2.Opacity 20
  53 set surface2.Title "Iso-surface 2"
  54
  55
  56 connect surface1.Out viewer.In1
  57 connect surface2.Out viewer.In2
  58 new MultipleInputs refresh
  59 connect surface1.BoxChange refresh.In1
  60 connect surface2.BoxChange refresh.In2
  61
  62 new LayoutLine main
  63 new LayoutLine controls
  64 connect viewer.Widget main.Widget1
  65 connect controls.Widget main.Widget2
  66 connect surface1.Widget controls.Widget1
  67 connect surface2.Widget controls.Widget2
  68
  69 set main.WinWidth 800
  70 set main.WinHeight  800
  71
  72 exec main
  73
  74 # BUG in pipeline update : have to plug forced execution of viewer
  75 # after creation of all windows
  76 connect refresh.Out viewer.BoxExecute