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 # ------------------------------------------------------------------------ */
27 # ----------------------------------
28 # - BBTKGEditor v 1.2 BBS BlackBox Script (Complex Box)
29 # - /Users/davila/Creatis/All3/creatools_source/bbtk/packages/toolsbbtk/bbs/boxes/SaveMHD_infoCrop-Button.bbs
30 # ----------------------------------
38 define SaveMHD_infoCrop-Button toolsbbtk
41 description "Description ??"
45 new CommandButton Box00
46 set Box00.Label "Save Image (*.mhd and *.mhd_infoCrop)"
48 new MetaImageWriter Box01
50 new FileSelector Box02
51 set Box02.OpenSave Save
53 new StringWriter Box03
55 new ConcatStrings Box04
56 set Box04.In1 "Index "
58 new ConcatStrings Box05
59 set Box05.In2 "_infoCrop"
61 new ConcatStrings Box06
64 new ConcatStrings Box07
65 set Box07.In1 "FileName "
68 connect Box00.BoxChange Box01.BoxExecute
69 connect Box04.Out Box03.In0
70 connect Box05.Out Box03.FileName
71 connect Box00.BoxChange Box03.BoxExecute
72 connect Box00.BoxChange Box02.BoxExecute
73 connect Box06.Out Box03.In1
74 connect Box02.Out Box05.In1
75 connect Box07.Out Box03.In2
76 connect Box02.Out Box01.Filename
77 connect Box02.Out Box07.In2
82 input Size Box06.In2 " "
83 input Index Box04.In2 " "
85 # Complex output ports
86 output Widget Box00.Widget " "