packages/vtk/bbs/boxes/bbIsoSurfaceExtractor.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 include std
  28 include vtk
  29
  30 # --- Box Description ---
  31 define IsoSurfaceExtractor vtk
  32
  33   description "Extracts an iso-surface of a 3D image and creates a vtkProp3D object to insert into a 3D scene (e.g. a Viewer3D)"
  34   author "j p r at creatis.univ-lyon1.fr"
  35   category "3D object creator"
  36 # ---                ---
  37
  38   new MarchingCubes   mc
  39   new PolyDataToActor polydatatoactor
  40     connect mc.Out polydatatoactor.In
  41
  42   new MagicBox  mb
  43    connect mb.BoxChange mc.BoxExecute
  44    connect mb.BoxChange polydatatoactor.BoxExecute
  45
  46 # ---                ---
  47
  48   input In        mc.In              "vtkImageData"
  49   input Isovalue  mc.Value           "Isovalue"
  50   input Opacity   polydatatoactor.Opacity   "Opacity"
  51   input Colour    polydatatoactor.Colour    "R G B"
  52   input Renderer  polydatatoactor.Renderer  "3D scene in which to insert the surface"
  53   input Transform polydatatoactor.Transform "Linear Transform (4x4 homogeneous)"
  54   input BoxExecute mb.BoxExecute "BoxExecute"
  55
  56
  57   output Out polydatatoactor.Out "Extracted iso-surface (as a vtkProp3D *)"
  58
  59 endefine