Feature #1727

[creaRigidRegistration.git] / PackRecalage / bbs / appli / ExampleRecalage3D1Point.bbs

diff --git a/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs b/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs
index 1dbc751a4add798b9e92e8cb5892ce4df3e0bf18..b195e7c2be751d66c0520c7c52eb70a30487e6e9 100644 (file)
--- a/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs
+++ b/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs
@@ -1,5 +1,5 @@
 # ----------------------------------
-# - BBTKGEditor v 1.2 BBS BlackBox Script
+# - BBTKGEditor v 1.4 BBS BlackBox Script
 # - /Users/davila/Creatis/All5/creatools_source/creaRigidRegistration/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs
 # ----------------------------------
 
@@ -14,6 +14,7 @@ include PackRecalage
 include std
 include vtk
 include creaImageIO
+include wxvtk
 
 author "info-dev@creatis.insa-lyon.fr"
 description "Recalage3D 1-point"
@@ -29,42 +30,36 @@ 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
@@ -86,14 +81,16 @@ new LayoutSplit imagesLayout
 
 new LayoutLine toolsLayout
   set toolsLayout.Orientation "v"
+  set toolsLayout.WinTitle "Rotation"
 
 new LayoutSplit resultLayout
-  set resultLayout.Orientation "v"
-  set resultLayout.Proportion "60"
+  set resultLayout.Proportion "70"
 
 new LayoutSplit main
   set main.Orientation "h"
-  set main.Proportion "50"
+  set main.Proportion "25"
+  set main.WinHeight "800"
+  set main.WinWidth "1200"
 
 new vtkImageDataPointerRelay Box22
 
@@ -103,46 +100,169 @@ new ImagesChooserDialogBox Box24
 
 new ImagesChooserDialogBox Box25
 
+new LayoutTab Box26
+  set Box26.WinTitle "2D-Compare"
+
+new CompareImagesWidget Box27
+  set Box27.WinTitle "2D-Comparing"
+
+new LayoutSplit Box28
+  set Box28.Orientation "H"
+  set Box28.Proportion "50"
+  set Box28.WinTitle "3D-Comparing"
+
+new LayoutLine Box29
+
+new IsoSurfaceWidget Box30
+  set Box30.Title "Reference image"
+
+new IsoSurfaceWidget Box31
+  set Box31.Title "Registration image"
+
+new LayoutTab Box32
+
+new LayoutLine Box33
+  set Box33.WinTitle "Scale"
+
+new Slider TranslateZ
+
+new Slider TranslateY
+
+new Slider TranslateX
+
+new LayoutLine Box37
+  set Box37.WinTitle "Translate"
+
+new LayoutTab Box38
+
+new LayoutTab Box39
+
 
 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
 
+connect Box27.Widget Box26.Widget2
+
+connect Box26.Widget resultLayout.Widget1
+
+connect reslicer.Out Box27.In2
+
+connect Box23.Out Box27.In1
+
+connect viewerResult.Widget Box28.Widget2
+
+connect Box28.Widget Box26.Widget1
+
+connect Box29.Widget Box28.Widget1
+
+connect sdrScaleX.Widget Box33.Widget1
+
+connect sdrScaleY.Widget Box33.Widget2
+
+connect sdrScaleZ.Widget Box33.Widget3
+
+connect Box33.Widget Box32.Widget2
+
+connect toolsLayout.Widget Box32.Widget1
+
+connect Box32.Widget resultLayout.Widget2
+
+connect TranslateX.Widget Box37.Widget1
+
+connect TranslateY.Widget Box37.Widget2
+
+connect TranslateZ.Widget Box37.Widget3
+
+connect Box37.Widget Box32.Widget3
+
+connect Box31.Widget Box38.Widget2
+
+connect Box38.Widget Box29.Widget2
+
+connect Box39.Widget Box29.Widget1
+
+connect Box30.Widget Box39.Widget1
+
+connect Box23.Out Box30.In
+
+connect viewerResult.Renderer1 Box30.vtkRenderer
+
+connect Box30.BoxChange mult3.In3
+
+connect viewerResult.Renderer1 Box31.vtkRenderer
+
+connect Box31.BoxChange mult3.In4
+
+connect reslicer.Out Box31.In
+
+
+
+# Complex input ports
 exec main