# ---------------------------------------------------------------------
#
# 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::ColorBar box example. "
category "example"
author "eduardo.davila@creatis.insa-lyon.fr"

load std
load wx
load creaMaracasVisu

new LayoutSplit s
	set s.Orientation H
new LayoutSplit ss
	set ss.Orientation H

new LayoutLine s1
new LayoutLine s2

set s1.Orientation V
set ss.Orientation H
set s2.Orientation V

new SliderMinMax sliderMM_h
set sliderMM_h.Orientation 1
set sliderMM_h.InW 300
set sliderMM_h.InH 90
set sliderMM_h.InMax 350
set sliderMM_h.InMin 0
set sliderMM_h.ShowLabels 1

new SliderMinMax sliderMM_v
set sliderMM_v.Orientation 0
set sliderMM_v.InW 300
set sliderMM_v.InH 30
set sliderMM_v.InMax 350
set sliderMM_v.InMin 0
set sliderMM_v.ShowLabels 1

new ColorBar colorB_h
set colorB_h.Orientation 1
set colorB_h.InW 300
set colorB_h.InH 50
set colorB_h.InMax 350
set colorB_h.InMin 0
set colorB_h.Reds " 0 255 0 255 220 30"
set colorB_h.Greens " 0 220 220 100 240 55"
set colorB_h.Blues " 255 0 15 0 0 0"
set colorB_h.Values " 0 30 70 130 250 310"


new ColorBar colorB_v
set colorB_v.Orientation 0
set colorB_v.InW 300
set colorB_v.InH 50
set colorB_v.InMax 350
set colorB_v.InMin 0
set colorB_v.Reds " 0 255 0 255 220 30"
set colorB_v.Greens " 0 220 220 100 240 55"
set colorB_v.Blues " 255 0 15 0 0 0"
set colorB_v.Values " 0 30 70 130 250 310"


connect s1.Widget				s.Widget1
connect  s2.Widget				s.Widget2
connect sliderMM_h.Widget		s1.Widget1 
connect colorB_h.Widget			s1.Widget2 
connect ss.Widget				s2.Widget1 
connect sliderMM_v.Widget		ss.Widget1 
connect colorB_v.Widget			ss.Widget2 

exec s