# ----------------------------------
# - BBTKGEditor v 1.2 BBS BlackBox Script (Complex Box)
# - /Users/davila/Creatis/All5/creatools_source/creaRigidRegistration/PackRecalage/bbs/boxes/CompareImagesWidget.bbs
# ----------------------------------

include std
include itkvtk
include vtk
include wx
include PackRecalage
include std
include creaMaracasVisu

define CompareImagesWidget PackRecalage

author "info-dev@creatis.insa-lyon.fr"
description "creatisRecalage"

category "example"

new SliceImage imgslice1

new SliceImage imgslice2

new LayoutLine buttonsLayout
  set buttonsLayout.Orientation "V"
  set buttonsLayout.WinTitle "Image transformation"

new Slider slider
  set slider.In "0"
  set slider.Max "180"
  set slider.Min "-180"
  set slider.ReactiveOnTrack "1"
  set slider.Title "Angle"

new Slider sliderX
  set sliderX.In "100"
  set sliderX.Max "500"
  set sliderX.Min "10"
  set sliderX.ReactiveOnTrack "1"
  set sliderX.Title "% Scale in X"

new Slider sliderY
  set sliderY.In "100"
  set sliderY.Max "500"
  set sliderY.Min "10"
  set sliderY.ReactiveOnTrack "1"
  set sliderY.Title "% Scale in Y"

new Transform2DBox transform

new ReSlicerBox reslice1
  set reslice1.Centered false
  set reslice1.Interpolate true
  set reslice1.Origin "0 0 0"

new ImageConvolution convol1

new ImageConvolution convol2

new ImageRecalageProperties properties

new Slider sdrZ
  set sdrZ.Min "0"
  set sdrZ.ReactiveOnTrack "1"
  set sdrZ.Title "Z for slice"

new Slider sdrF
  set sdrF.In "0"
  set sdrF.Max "100"
  set sdrF.Min "0"
  set sdrF.ReactiveOnTrack "1"
  set sdrF.Title "Convolution Factor"

new CheckBox checkF
  set checkF.In "True"

new MultipleInputs multF

new Slider colorLevel
  set colorLevel.Min "0"
  set colorLevel.ReactiveOnTrack "true"
  set colorLevel.Title "Color Level"

new Slider windowLevel
  set windowLevel.Min "0"
  set windowLevel.ReactiveOnTrack "true"
  set windowLevel.Title "Window Level"

new MultipleInputs multLevels

new CheckBoardBox cbb

new Slider sdr
  set sdr.In "14"
  set sdr.Max "50"
  set sdr.ReactiveOnTrack "1"

new Slider sdr2
  set sdr2.In "14"
  set sdr2.Max "50"
  set sdr2.ReactiveOnTrack "1"

new LayoutSplit checkerBoard
  set checkerBoard.Proportion "80"

new LayoutLine ly

new ViewerNV viewerCH
  set viewerCH.nTypeView "0"

new TransparencyBox trans

new Slider sdrP
  set sdrP.In "50"
  set sdrP.Max "100"
  set sdrP.Min "0"
  set sdrP.ReactiveOnTrack "true"

new ViewerNV transView
  set transView.nTypeView "0"

new LayoutSplit transparency
  set transparency.Proportion "80"

new ImageSwitcherBox switch

new CheckBox checkS
  set checkS.In "true"
  set checkS.Title "On"

new Slider sdrT
  set sdrT.In "500"
  set sdrT.Max "1000"
  set sdrT.Min "0"
  set sdrT.ReactiveOnTrack "True"

new LayoutSplit switchWindow
  set switchWindow.Proportion "80"

new MultipleInputs mult

new MultipleInputs mult2

new MultipleInputs mult3

new MultipleInputs mult4

new LayoutTab tabs
  set tabs.Orientation V

new LayoutLine tools
  set tools.WinTitle "Appearance"

new LayoutSplit convolTools
  set convolTools.Orientation "H"
  set convolTools.Proportion "80"

new LayoutSplit window2
  set window2.Orientation H
  set window2.Proportion "25"

new vtkImageDataPointerRelay Box56

new vtkImageDataPointerRelay Box59

new LayoutTab Box61

new LayoutLine Box47
  set Box47.Orientation H

new LayoutLine Box48

new ViewerNV Box49
  set Box49.nTypeView 0

new ImageVtkProperties Box51

new VectorRescaleSlope Box52
  set Box52.A 0.5
  set Box52.B 0
  set Box52.Type 0

new ConcatStrings Box53

new ConcatStrings Box54

new Slider Box55
  set Box55.In 0
  set Box55.Label true
  set Box55.Max 200
  set Box55.Min -200
  set Box55.ReactiveOnTrack true
  set Box55.Title "Translate Y"

new Slider Box57
  set Box57.In 0
  set Box57.Label true
  set Box57.Max 200
  set Box57.Min -200
  set Box57.ReactiveOnTrack true
  set Box57.Title "translate X"

new ConcatStrings Box58
  set Box58.In2 " "
  set Box58.In4 " 0"

new GetVectorIntElement Box60
  set Box60.I 0

new Add Box62

new Add Box63

new GetVectorIntElement Box64
  set Box64.I 1

new ViewerNV Box65
  set Box65.nTypeView 0

new ViewerNV Box66
  set Box66.nTypeView 0

new LayoutLine Box67
  set Box67.Orientation H
  set Box67.WinTitle "Parallel"

new MultipleInputs Box68


connect slider.Widget buttonsLayout.Widget1
connect sliderX.Widget buttonsLayout.Widget2
connect sliderY.Widget buttonsLayout.Widget3
connect slider.Out transform.Angle
connect sliderX.Out transform.ScaleX
connect sliderY.Out transform.ScaleY
connect transform.Out reslice1.Transform
connect imgslice2.Out reslice1.In
connect imgslice1.Out convol1.In
connect properties.LengthZ sdrZ.Max
connect sdrZ.Out imgslice1.Z
connect sdrZ.Out imgslice2.Z
connect sdrZ.BoxChange imgslice1.BoxExecute
connect sdrZ.BoxChange imgslice2.BoxExecute
connect sdrF.Out convol1.Factor
connect sdrF.Out convol2.Factor
connect checkF.Out convol1.On
connect checkF.Out convol2.On
connect sdrF.BoxChange multF.In1
connect checkF.BoxChange multF.In2
connect multF.BoxChange convol1.BoxExecute
connect multF.BoxChange convol2.BoxExecute
connect properties.ColorLevel colorLevel.Max
connect properties.MidColorLevel colorLevel.In
connect properties.ColorLevel windowLevel.Max
connect properties.MidColorLevel windowLevel.In
connect colorLevel.BoxChange multLevels.In1
connect windowLevel.BoxChange multLevels.In2
connect convol1.Out cbb.In1
connect convol2.Out cbb.In2
connect colorLevel.Out viewerCH.ColorLevel
connect windowLevel.Out viewerCH.WindowLevel
connect sdr.Out cbb.Cols
connect sdr2.Out cbb.Rows
connect cbb.Out viewerCH.In
connect sdr.Widget ly.Widget2
connect sdr2.Widget ly.Widget3
connect viewerCH.Widget checkerBoard.Widget1
connect ly.Widget checkerBoard.Widget2
connect convol1.Out trans.In1
connect convol2.Out trans.In2
connect sdrP.Out trans.Percent
connect transView.Widget transparency.Widget1
connect sdrP.Widget transparency.Widget2
connect windowLevel.Out transView.WindowLevel
connect convol1.Out switch.In1
connect convol2.Out switch.In2
connect checkS.Out switch.On
connect sdrT.Out switch.Time
connect sdrT.BoxChange switch.BoxExecute
connect slider.BoxChange mult.In1
connect sliderX.BoxChange mult.In2
connect sliderY.BoxChange mult.In3
connect multF.BoxChange mult2.In1
connect mult.BoxChange mult2.In2
connect ly.BoxChange mult3.In1
connect mult2.BoxChange mult3.In2
connect imgslice1.BoxChange mult3.In3
connect imgslice2.BoxChange mult3.In4
connect multLevels.BoxChange mult3.In5
connect mult3.BoxChange cbb.BoxExecute
connect cbb.BoxChange viewerCH.BoxExecute
connect mult2.BoxChange mult4.In1
connect sdrP.BoxChange mult4.In2
connect mult4.BoxChange trans.BoxExecute
connect trans.BoxChange transView.BoxExecute
connect colorLevel.Widget tools.Widget2
connect windowLevel.Widget tools.Widget3
connect checkF.Widget convolTools.Widget2
connect convolTools.Widget tools.Widget4
connect Box56.Out imgslice2.In
connect Box59.Out imgslice1.In
connect Box59.Out properties.In
connect sdrF.Widget convolTools.Widget1
connect sdrZ.Widget tools.Widget1
connect transparency.Widget tabs.Widget2
connect checkS.Widget Box47.Widget2
connect switch.Widget Box47.Widget1
connect sdrT.Widget Box48.Widget2
connect Box47.Widget Box48.Widget1
connect Box48.Widget switchWindow.Widget2
connect switchWindow.Widget tabs.Widget1
connect checkerBoard.Widget tabs.Widget3
connect reslice1.Out convol2.In
connect trans.Out transView.In
connect Box49.Widget switchWindow.Widget1
connect switch.Out Box49.In
connect switch.BoxChange Box49.BoxExecute
connect imgslice2.Out Box51.In
connect Box51.Size Box53.In1
connect Box53.Out Box52.In
connect Box52.Out Box54.In1
connect Box60.Out Box62.In1
connect Box57.Out Box62.In2
connect Box62.Out Box58.In1
connect Box64.Out Box63.In1
connect Box55.Out Box63.In2
connect Box63.Out Box58.In3
connect Box57.Widget buttonsLayout.Widget4
connect Box55.Widget buttonsLayout.Widget5
connect Box57.BoxChange mult.In4
connect Box55.BoxChange mult.In5
connect Box58.Out transform.CenterPoint
connect Box54.Out reslice1.Origin
connect Box54.Out Box64.In
connect Box54.Out Box60.In
connect Box61.Widget window2.Widget1
connect tabs.Widget window2.Widget2
connect tools.Widget Box61.Widget1
connect buttonsLayout.Widget Box61.Widget2
connect Box66.Widget Box67.Widget2
connect Box65.Widget Box67.Widget1
connect Box67.Widget tabs.Widget4
connect convol1.Out Box66.In
connect convol2.Out Box65.In
connect mult3.BoxChange Box68.In1
connect Box68.BoxChange Box66.BoxExecute
connect Box68.BoxChange Box65.BoxExecute
connect mult4.BoxChange Box68.In2


# Complex input ports
input In2 Box59.In " "
input In1 Box56.In " "
input WinTitle window2.WinTitle " "

# Complex output ports
output Widget window2.Widget " "

endefine