# ----------------------------------
# - BBTKGEditor v 1.3 BBS BlackBox Script
# - /Users/davila/Creatis/All5/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/appli/SaveImagePlanes.bbs
# ----------------------------------

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

include std
include itkvtk
include wx
include vtk
include wxvtk
include creaImageIO
include toolsbbtk
include creaMaracasVisu
include std

author "jpr@creatis.insa-lyon.fr"
description "3 slicers and a 3D view"
category "demo"

new LayoutX4 main
  set main.WinTitle "demoViewing3"

new LayoutLine upright

new LayoutLine upleft

new LayoutLine downleft

new ImagePlanes planes
  set planes.Interpolation "0"

new Viewer3D viewer

new Viewer2D viewerUL
  set viewerUL.BoxProcessMode "Always"
  set viewerUL.Slice "0"

new Viewer2D viewerUR
  set viewerUR.BoxProcessMode "Always"
  set viewerUR.Slice "0"

new Viewer2D viewerDL
  set viewerDL.BoxProcessMode "Always"
  set viewerDL.Slice "0"

new ImagesChooserDialogBox Box10

new LayoutTab Box11

new ImageVtkPropertiesWidget Box12

new LayoutLine Box13
  set Box13.WinTitle "Save Image 2D"

new SaveMHD-Button Box14

new LayoutSplit Box15
  set Box15.Orientation "H"
  set Box15.Proportion "40"
  set Box15.WinTitle "Interactive Planes"

new SaveMHD-Button Box16

new SaveMHD-Button Box17

new OutputText Box18
  set Box18.In "X"

new LayoutLine Box19
  set Box19.Orientation "H"

new OutputText Box20
  set Box20.In "Y"

new LayoutLine Box21
  set Box21.Orientation "H"

new OutputText Box22
  set Box22.In "Z"

new LayoutLine Box23
  set Box23.Orientation "H"

new vtkImageDataPointerRelay Box24

new LayoutTab Box25

new LayoutSplit Box26
  set Box26.Orientation "H"
  set Box26.WinTitle "3 Points plane definition"

new ViewerNV Box27

new ShowNPoints Box30

new LayoutSplit Box31

new Viewer2D Box32

new SaveMHD-Button Box35

new ImagePlanes Box36
  set Box36.Interpolation "0"

new LoadHola Box37

new LayoutTab Box38

new LayoutLine Box39
  set Box39.Orientation "H"
  set Box39.WinTitle "Select 3 points"

new RadioButton Box40
  set Box40.In "1"
  set Box40.In0 "Nearest"
  set Box40.In1 "Linear"
  set Box40.In2 "Cubic"
  set Box40.WinTitle "Interpolation"

new MultipleInputs Box42

new RadioButton Box43
  set Box43.In "1"
  set Box43.In0 "Nearest"
  set Box43.In1 "Linear"
  set Box43.In2 "Cubic"
  set Box43.WinTitle "Interpolation"


connect upright.Widget main.Widget1
connect upleft.Widget main.Widget2
connect downleft.Widget main.Widget3
connect planes.PlaneX viewer.Obs1
connect planes.PlaneY viewer.Obs2
connect planes.PlaneZ viewer.Obs3
connect viewer.Widget main.Widget4
connect planes.ImageX viewerUL.In
connect viewerUL.Widget upleft.Widget1
connect planes.BoxChange viewerUL.BoxExecute
connect planes.ImageY viewerUR.In
connect viewerUR.Widget upright.Widget1
connect planes.BoxChange viewerUR.BoxExecute
connect planes.ImageZ viewerDL.In
connect viewerDL.Widget downleft.Widget1
connect planes.BoxChange viewerDL.BoxExecute
connect Box13.Widget Box11.Widget1
connect Box11.Widget Box15.Widget1
connect main.Widget Box15.Widget2
connect planes.ImageX Box14.In
connect planes.ImageY Box16.In
connect planes.ImageZ Box17.In
connect Box14.Widget Box19.Widget1
connect Box18.Widget Box19.Widget2
connect Box20.Widget Box21.Widget2
connect Box22.Widget Box23.Widget2
connect Box16.Widget Box21.Widget1
connect Box17.Widget Box23.Widget1
connect Box24.Out Box12.in
connect Box24.Out planes.In
connect Box27.Widget Box26.Widget2
connect Box27.Point Box30.In
connect Box27.BoxChange Box30.BoxExecute
connect Box27.Renderer1 Box30.Renderer
connect Box24.Out Box27.In
connect Box24.Out Box30.Image
connect Box32.Widget Box31.Widget2
connect Box30.lstPointsX Box36.PointsX
connect Box30.lstPointsY Box36.PointsY
connect Box30.lstPointsZ Box36.PointsZ
connect Box24.Out Box36.In
connect Box36.Image3Pts Box32.In
connect Box36.Image3Pts Box35.In
connect Box38.Widget Box31.Widget1
connect Box30.Widget Box39.Widget1
connect Box39.Widget Box38.Widget1
connect Box35.Widget Box38.Widget2
connect Box31.Widget Box26.Widget1
connect Box12.widget Box25.Widget3
connect Box40.Widget Box39.Widget2
connect Box40.Out Box36.Interpolation
connect Box40.BoxChange Box42.In1
connect Box30.BoxChange Box42.In2
connect Box42.Out Box36.BoxExecute
connect Box42.Out Box32.BoxExecute
connect Box19.Widget Box13.Widget2
connect Box21.Widget Box13.Widget3
connect Box23.Widget Box13.Widget4
connect Box43.Widget Box13.Widget1
connect Box43.Out planes.Interpolation
connect Box43.BoxChange planes.BoxExecute
connect Box10.Out Box24.In
connect Box15.Widget Box25.Widget1
connect Box26.Widget Box25.Widget2

exec Box25