# ----------------------------------
# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
# - /home/davila/Creatis/creaTools/creatools_install/bin/../share/bbtk/bbs/wxvtk/boxes/bbIsoSurfaceWidget.bbs
# ----------------------------------

include std
include itkvtk
include wx
include vtk
include std

define IsoSurfaceWidget wxvtk

author "laurent.guigues@creatis.insa-lyon.fr"
description "Image iso-surface extractor (vtk"

category "image;mesh;widget;viewer"

new LayoutLine controls
  set controls.Orientation "HORIZONTAL"

new IsoSurfaceExtractor surface

new Slider isovalue
  set isovalue.ChangeResolution "true"
  set isovalue.Max "5000"
  set isovalue.Title "Isovalue"

new Slider opacity
  set opacity.In "100"
  set opacity.Max "100"
  set opacity.Min "0"
  set opacity.ReactiveOnTrack "true"
  set opacity.Title "Opacity"

new ColourSelectorButton colour

new MultipleInputs refresh

new Div div
  set div.In2 "100"

new UpdateRender Box08
  set Box08.Active "true"

new MagicBox Box09


connect isovalue.Out surface.Isovalue
connect opacity.Out div.In1
connect div.Out surface.Opacity
connect colour.Out surface.Colour
connect isovalue.BoxChange refresh.In1
connect opacity.BoxChange refresh.In2
connect colour.BoxChange refresh.In3
connect colour.Widget controls.Widget3
connect isovalue.Widget controls.Widget1
connect opacity.Widget controls.Widget2
connect Box09.Out surface.Renderer
connect Box09.Out Box08.Renderer
connect refresh.Out Box08.BoxExecute
connect refresh.Out surface.BoxExecute
connect opacity.BoxChange refresh.BoxExecute

# Complex input ports
input Title controls.WinTitle " "
input Opacity opacity.In " "
input Isovalue isovalue.In " "
input Colour colour.In " "
input Vertical controls.Orientation " "
input BoxExecute refresh.In4 " "
input In surface.In " "
input maxIsovalue isovalue.Max " "
input vtkRenderer Box09.In " "

# Complex output ports
output Out surface.Out " "
output Widget controls.Widget " "
output BoxChange refresh.Out " "


endefine