1 # ---------------------------------------------------------------------
3 # Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image
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
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.
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
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 # ------------------------------------------------------------------------ */
32 define IsoSurfaceWidget wxvtk
33 author "laurent.guigues@creatis.insa-lyon.fr"
34 description "Image iso-surface extractor (vtk::IsoSurfaceExtractor) with associated control panel (isovalue, opacity and colour)"
35 category "image;mesh;widget;viewer"
37 new LayoutLine controls
38 new LayoutLine sliders
39 new IsoSurfaceExtractor surface
42 new LayoutLine colourFrame
43 new ColourSelectorButton colour
44 new MultipleInputs refresh
47 connect sliders.Widget controls.Widget1
48 connect colourFrame.Widget controls.Widget2
50 connect colour.Widget colourFrame.Widget1
51 connect isovalue.Widget sliders.Widget1
52 connect opacity.Widget sliders.Widget2
54 connect isovalue.Out surface.Isovalue
55 connect opacity.Out div.In1
57 connect div.Out surface.Opacity
58 connect colour.Out surface.Colour
60 connect isovalue.BoxChange refresh.In1
61 connect opacity.BoxChange refresh.In2
62 connect colour.BoxChange refresh.In3
64 # connect colourButton.BoxChange colour.BoxExecute
66 set colourFrame.WinTitle "Colour"
67 set controls.Orientation HORIZONTAL
68 set isovalue.Title "Isovalue"
69 set opacity.Title "Opacity"
74 # set colourButton.Label "Colour"
76 input Title controls.WinTitle "Title of the control panel"
77 input In surface.In "Input image"
79 input Opacity opacity.In "Initial opacity"
80 input Isovalue isovalue.In "Initial isovalue"
81 input Colour colour.In "Initial colour"
83 input BoxExecute surface.BoxExecute "Box execution"
85 input Vertical controls.Orientation "Set to 1 to have controls arranged vertically"
87 output Out surface.Out "Output surface"
88 output BoxChange refresh.Out "BoxChange"
89 output Widget controls.Widget "Widget"