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
  new Slider shift
  new Slider scale
#  new LayoutLine colourFrame
#  new ColourSelectorButton colour
  new MultipleInputs refresh  
  new Div div

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

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

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

#  connect colourButton.BoxChange colour.BoxExecute

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


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

  input Scale scale.In "Initial scale"
  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