]> Creatis software - bbtk.git/blob - packages/toolsbbtk/bbs/boxes/bbSlidersForSize.bbs
#2804 BBTK Feature New Normal - create std MathOperationVector box
[bbtk.git] / packages / toolsbbtk / bbs / boxes / bbSlidersForSize.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 # ----------------------------------
28 # - BBTKGEditor v 1.2 BBS BlackBox Script (Complex Box)
29 # - /home/jpr/Creatis/All/creatools_source/bbtk/packages/toolsbbtk/bbs/boxes/bbSlidersForSize.bbs
30 # ----------------------------------
31
32 include std
33 include itkvtk
34 include itk
35 include std
36 include wx
37
38 define SlidersForSize toolsbbtk
39
40 author "jean-pierre.roux@creatis.univ-lyon1.fr"
41 description "Display 6 sliders for sizes of 3D image"
42
43 category "complex box, widget"
44
45 new ImageProperties mc
46
47 new GetVectorIntElement gveX
48   set gveX.I "0"
49
50 new GetVectorIntElement gveY
51   set gveY.I "1"
52
53 new GetVectorIntElement gveZ
54   set gveZ.I "2"
55
56 new MagicBox mb
57
58 new Slider xMin
59   set xMin.In 0
60   set xMin.Label "1"
61   set xMin.Min "0"
62   set xMin.Title "XMin"
63
64 new Slider xMax
65   set xMax.Label "1"
66   set xMax.Min "0"
67   set xMax.Title "XMax"
68
69 new Slider yMin
70   set yMin.In 0
71   set yMin.Label "1"
72   set yMin.Min "0"
73   set yMin.Title "YMin"
74
75 new Slider yMax
76   set yMax.Label "1"
77   set yMax.Min "0"
78   set yMax.Title "YMax"
79
80 new Slider zMin
81   set zMin.In 0
82   set zMin.Label "1"
83   set zMin.Min "0"
84   set zMin.Title "ZMin"
85
86 new Slider zMax
87   set zMax.Label "1"
88   set zMax.Min "0"
89   set zMax.Title "ZMax"
90
91 new MultipleInputs mi1
92
93 new LayoutLine Box13
94
95 new Add Box14
96   set Box14.In2 -1
97
98 new Add Box15
99   set Box15.In2 -1
100
101 new Add Box16
102   set Box16.In2 -1
103
104
105 connect mc.Size gveX.In
106 connect mc.Size gveY.In
107 connect mc.Size gveZ.In
108 connect gveX.Out xMin.Max
109 connect mb.Out xMin.ReactiveOnTrack
110 connect mb.Out xMax.ReactiveOnTrack
111 connect gveY.Out yMin.Max
112 connect mb.Out yMin.ReactiveOnTrack
113 connect mb.Out yMax.ReactiveOnTrack
114 connect mb.Out zMin.ReactiveOnTrack
115 connect xMin.BoxChange mi1.In1
116 connect xMax.BoxChange mi1.In2
117 connect yMin.BoxChange mi1.In3
118 connect yMax.BoxChange mi1.In4
119 connect zMin.BoxChange mi1.In5
120 connect gveZ.Out zMin.Max
121 connect xMin.Widget Box13.Widget1
122 connect xMax.Widget Box13.Widget2
123 connect yMin.Widget Box13.Widget3
124 connect yMax.Widget Box13.Widget4
125 connect zMin.Widget Box13.Widget5
126 connect zMax.Widget Box13.Widget6
127 connect mb.Out zMax.ReactiveOnTrack
128 connect gveX.Out Box16.In1
129 connect Box15.Out yMax.Max
130 connect gveY.Out Box15.In1
131 connect gveZ.Out Box14.In1
132 connect Box15.Out yMax.In
133 connect Box16.Out xMax.In
134 connect Box16.Out xMax.Max
135 connect Box14.Out zMax.In
136 connect Box14.Out zMax.Max
137 connect zMax.BoxChange mi1.In6
138
139
140 # Complex input ports
141 input In mc.In " "
142 input ReactiveOnTrack mb.In " "
143
144 # Complex output ports
145 output XMin xMin.Out " "
146 output XMax xMax.Out " "
147 output YMin yMin.Out " "
148 output YMax yMax.Out " "
149 output ZMin zMin.Out " "
150 output ZMax zMax.Out " "
151 output Wigdet Box13.Widget " "
152 output BoxChange mi1.BoxChange " "
153
154 endefine