# ---------------------------------------------------------------------
#
# Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image 
#                        pour la Sant�)
# Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
# Previous Authors : Laurent Guigues, Jean-Pierre Roux
# CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil
#
#  This software is governed by the CeCILL-B license under French law and 
#  abiding by the rules of distribution of free software. You can  use, 
#  modify and/ or redistribute the software under the terms of the CeCILL-B 
#  license as circulated by CEA, CNRS and INRIA at the following URL 
#  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html 
#  or in the file LICENSE.txt.
#
#  As a counterpart to the access to the source code and  rights to copy,
#  modify and redistribute granted by the license, users are provided only
#  with a limited warranty  and the software's author,  the holder of the
#  economic rights,  and the successive licensors  have only  limited
#  liability. 
#
#  The fact that you are presently reading this means that you have had
#  knowledge of the CeCILL-B license and that you accept its terms.
# ------------------------------------------------------------------------ */ 

description "creaMaracasVisu VOI box example. "
category "example"
author "eduardo.davila@creatis.insa-lyon.fr"

load wx
load std
load maracasvisu
load vtk

new MetaImageReader reader
include  std/boxes/bbPrependPackageDataPath.bbs
new PrependPackageDataPath prependDatapath
  set prependDatapath.In "vtk/hola.mhd"
  connect prependDatapath.Out reader.In

new ViewerNV vmA
  set vmA.nTypeView "-1"
  connect reader.Out vmA.In

new ContourVOI countourvoi
  connect vmA.wxVtkBaseView1	countourvoi.wxVtkBaseView
  connect reader.Out				countourvoi.In

new LayoutLine sizerA
  connect countourvoi.Widget	sizerA.Widget1 

new LayoutSplit mainSplit
  set mainSplit.Proportion 10
  connect sizerA.Widget			mainSplit.Widget1 
  connect vmA.Widget				mainSplit.Widget2 


new ConcatStrings concatstring
  connect countourvoi.Index concatstring.In1
  set concatstring.In2 "  ("
  connect countourvoi.Size concatstring.In3
  set concatstring.In4 ")"

exec mainSplit
#exec concatstring
print $concatstring.Out$