# ----------------------------------
# - BBTKGEditor v 1.2 BBS BlackBox Script (Complex Box)
# - /home/jpr/Creatis/All/creatools_source/bbtk/packages/toolsbbtk/bbs/boxes/bbSlidersForSize.bbs
# ----------------------------------

include std
include itkvtk
include itk
include std
include wx

define SlidersForSize toolsbbtk

author "jean-pierre.roux@creatis.univ-lyon1.fr"
description "Display 6 sliders for sizes of 3D image"

category "complex box, widget"

new ImageProperties mc

new GetVectorIntElement gveX
  set gveX.I "0"

new GetVectorIntElement gveY
  set gveY.I "1"

new GetVectorIntElement gveZ
  set gveZ.I "2"

new MagicBox mb

new Slider xMin
  set xMin.In 0
  set xMin.Label "1"
  set xMin.Min "0"
  set xMin.Title "XMin"

new Slider xMax
  set xMax.Label "1"
  set xMax.Min "0"
  set xMax.Title "XMax"

new Slider yMin
  set yMin.In 0
  set yMin.Label "1"
  set yMin.Min "0"
  set yMin.Title "YMin"

new Slider yMax
  set yMax.Label "1"
  set yMax.Min "0"
  set yMax.Title "YMax"

new Slider zMin
  set zMin.In 0
  set zMin.Label "1"
  set zMin.Min "0"
  set zMin.Title "ZMin"

new Slider zMax
  set zMax.Label "1"
  set zMax.Min "0"
  set zMax.Title "ZMax"

new MultipleInputs mi1

new LayoutLine Box13

new Add Box14
  set Box14.In2 -1

new Add Box15
  set Box15.In2 -1

new Add Box16
  set Box16.In2 -1


connect mc.Size gveX.In
connect mc.Size gveY.In
connect mc.Size gveZ.In
connect gveX.Out xMin.Max
connect mb.Out xMin.ReactiveOnTrack
connect mb.Out xMax.ReactiveOnTrack
connect gveY.Out yMin.Max
connect mb.Out yMin.ReactiveOnTrack
connect mb.Out yMax.ReactiveOnTrack
connect mb.Out zMin.ReactiveOnTrack
connect xMin.BoxChange mi1.In1
connect xMax.BoxChange mi1.In2
connect yMin.BoxChange mi1.In3
connect yMax.BoxChange mi1.In4
connect zMin.BoxChange mi1.In5
connect gveZ.Out zMin.Max
connect xMin.Widget Box13.Widget1
connect xMax.Widget Box13.Widget2
connect yMin.Widget Box13.Widget3
connect yMax.Widget Box13.Widget4
connect zMin.Widget Box13.Widget5
connect zMax.Widget Box13.Widget6
connect mb.Out zMax.ReactiveOnTrack
connect gveX.Out Box16.In1
connect Box15.Out yMax.Max
connect gveY.Out Box15.In1
connect gveZ.Out Box14.In1
connect Box15.Out yMax.In
connect Box16.Out xMax.In
connect Box16.Out xMax.Max
connect Box14.Out zMax.In
connect Box14.Out zMax.Max
connect zMax.BoxChange mi1.In6


# Complex input ports
input In mc.In " "
input ReactiveOnTrack mb.In " "

# Complex output ports
output XMin xMin.Out " "
output XMax xMax.Out " "
output YMin yMin.Out " "
output YMax yMax.Out " "
output ZMin zMin.Out " "
output ZMax zMax.Out " "
output Wigdet Box13.Widget " "
output BoxChange mi1.BoxChange " "

endefine