# ---------------------------------------------------------------------
 #
 # 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.
 # ------------------------------------------------------------------------ */


load wx
load vtk
load std
load wxvtk

define MIPWidget wxvtk
  author "laurent.guigues@creatis.insa-lyon.fr"
  description "Maximum Intensity Projection (MIP) creator (vtk::MIPCreator) with associated control panel (shift and scale)"
  category "image;mesh;widget;viewer"

  new LayoutLine controls
  new LayoutLine sliders
  new MIPCreator MIP
##EED  new Slider shift
##EED  new Slider scale
#  new LayoutLine colourFrame
#  new ColourSelectorButton colour
  new MultipleInputs refresh  
##EED  new Div div

  connect sliders.Widget controls.Widget1
#  connect colourFrame.Widget controls.Widget2

#  connect colour.Widget colourFrame.Widget1
##EED  connect shift.Widget sliders.Widget1
##EED  connect scale.Widget sliders.Widget2
  
##EED  connect shift.Out MIP.Shift
##EED  connect scale.Out div.In1
##EED  set div.In2 10
##EED  connect div.Out MIP.Scale
#  connect colour.Out MIP.Colour

##EED  connect shift.BoxChange refresh.In1
##EED  connect scale.BoxChange refresh.In2
#  connect colour.BoxChange refresh.In3

#  connect colourButton.BoxChange colour.BoxExecute

#  set colourFrame.WinTitle "Colour"
  set controls.Orientation HORIZONTAL
##EED  set shift.Title "Shift"
##EED  set shift.Min 0
##EED  set shift.Max 500
##EED  set scale.Title "Scale x10"
##EED  set scale.Min 0
##EED  set scale.Max 500
##EED  set scale.In 10
 
#  set colourButton.Label "Colour"


  input Title controls.WinTitle "Title of the control panel" 
  input In MIP.In "Input image"

##EED  input Scale scale.In "Initial scale"
##EED  input Shift shift.In "Initial shift"
#  input Colour colour.In "Initial colour"

  input BoxExecute MIP.BoxExecute "Box execution"

  input Vertical controls.Orientation "Set to 1 to have controls arranged vertically"

  output Out MIP.Out "Output MIP"
  output BoxChange refresh.Out "BoxChange" 
  output Widget controls.Widget "Widget"

endefine