# ----------------------------------
# - BBTKGEditor v 1.2 BBS BlackBox Script
# - /Users/davila/Creatis/All5/creatools_source/creaRigidRegistration/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs
# ----------------------------------

# BBTK GEditor Script
# ----------------------

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

author "info-dev@creatis.insa-lyon.fr"
description "Recalage3D 1-point"
category "example"

new ViewerNV viewer
  set viewer.nTypeView "5"

new ViewerNV viewer2
  set viewer2.nTypeView "5"

new Slider sdrAngleX
  set sdrAngleX.In "0"
  set sdrAngleX.Max "180"
  set sdrAngleX.Min "-180"
  set sdrAngleX.ReactiveOnTrack "true"
  set sdrAngleX.Title "Rotation angle in X Axis"

new Slider sdrAngleY
  set sdrAngleY.In "0"
  set sdrAngleY.Max "180"
  set sdrAngleY.Min "-180"
  set sdrAngleY.ReactiveOnTrack "true"
  set sdrAngleY.Title "Rotation angle in Y Axis"

new Slider sdrAngleZ
  set sdrAngleZ.In "0"
  set sdrAngleZ.Max "180"
  set sdrAngleZ.Min "-180"
  set sdrAngleZ.ReactiveOnTrack "true"
  set sdrAngleZ.Title "Rotation angle in Z Axis"

new Slider sdrScaleX
  set sdrScaleX.In "100"
  set sdrScaleX.Max "300"
  set sdrScaleX.Min "10"
  set sdrScaleX.ReactiveOnTrack "true"
  set sdrScaleX.Title "Scale in X Axis"

new Slider sdrScaleY
  set sdrScaleY.In "100"
  set sdrScaleY.Max "300"
  set sdrScaleY.Min "10"
  set sdrScaleY.ReactiveOnTrack "true"
  set sdrScaleY.Title "Scale in Y Axis"

new Slider sdrScaleZ
  set sdrScaleZ.In "100"
  set sdrScaleZ.Max "300"
  set sdrScaleZ.Min "10"
  set sdrScaleZ.ReactiveOnTrack "true"
  set sdrScaleZ.Title "Scale in Z Axis"

new Transform3D1PointBox transform

new ReSlicerBox reslicer

new MultipleInputs mult

new MultipleInputs mult2

new MultipleInputs mult3

new ViewerNV viewerResult
  set viewerResult.nTypeView "5"

new LayoutSplit imagesLayout
  set imagesLayout.Orientation "v"
  set imagesLayout.Proportion "50"

new LayoutLine toolsLayout
  set toolsLayout.Orientation "v"

new LayoutSplit resultLayout
  set resultLayout.Orientation "v"
  set resultLayout.Proportion "60"

new LayoutSplit main
  set main.Orientation "h"
  set main.Proportion "50"

new vtkImageDataPointerRelay Box22

new vtkImageDataPointerRelay Box23

new ImagesChooserDialogBox Box24

new ImagesChooserDialogBox Box25


connect viewer2.Point transform.CenterPoint
connect sdrAngleX.Out transform.AngleX
connect sdrAngleY.Out transform.AngleY
connect sdrAngleZ.Out transform.AngleZ
connect sdrScaleX.Out transform.ScaleX
connect sdrScaleY.Out transform.ScaleY
connect sdrScaleZ.Out transform.ScaleZ
connect viewer.Point reslicer.Origin
connect transform.Out reslicer.Transform
connect viewer.BoxChange mult.In1
connect viewer2.BoxChange mult.In2
connect sdrAngleX.BoxChange mult.In3
connect sdrAngleY.BoxChange mult.In4
connect sdrAngleZ.BoxChange mult.In5
connect sdrScaleX.BoxChange mult2.In1
connect sdrScaleY.BoxChange mult2.In2
connect sdrScaleZ.BoxChange mult2.In3
connect mult.BoxChange mult3.In1
connect mult2.BoxChange mult3.In2
connect mult3.BoxChange transform.BoxExecute
connect mult3.BoxChange reslicer.BoxExecute
connect reslicer.Out viewerResult.In
connect mult3.BoxChange viewerResult.BoxExecute
connect viewer.Widget imagesLayout.Widget1
connect viewer2.Widget imagesLayout.Widget2
connect sdrAngleX.Widget toolsLayout.Widget1
connect sdrAngleY.Widget toolsLayout.Widget2
connect sdrAngleZ.Widget toolsLayout.Widget3
connect sdrScaleX.Widget toolsLayout.Widget4
connect sdrScaleY.Widget toolsLayout.Widget5
connect sdrScaleZ.Widget toolsLayout.Widget6
connect viewerResult.Widget resultLayout.Widget1
connect toolsLayout.Widget resultLayout.Widget2
connect imagesLayout.Widget main.Widget1
connect resultLayout.Widget main.Widget2
connect Box22.Out viewer2.In
connect Box22.Out reslicer.In
connect Box24.Out Box22.In
connect Box23.Out viewer.In
connect Box25.Out Box23.In

exec main