]> Creatis software - creaRigidRegistration.git/blobdiff - PackRecalage/bbs/appli/ExampleRecalage.bbs
*** empty log message ***
[creaRigidRegistration.git] / PackRecalage / bbs / appli / ExampleRecalage.bbs
index da8b61470c77e33c53366ca077f2eabd33ac4517..8b91bb26dfec844c065dcd22872bd6db61e8ea49 100644 (file)
@@ -10,6 +10,7 @@ include vtk
 include wx
 load itkvtk
 load creaMaracasVisu
+load PackRecalage
 
 //File selection and file reader for the first image
 
@@ -38,16 +39,6 @@ new ShowNPoints showNpoints
   connect viewer.BoxChange showNpoints.BoxExecute
   set showNpoints.Radio 10
 
-/////////////////////////////////////////////////////
-#Calculate Vector Box
-/////////////////////////////////////////////////////
-/*
-new CalculateVectorBox vector1
-  connect showNpoints.lstPointsX vector1.PointsX1
-  connect showNpoints.BoxChange vector1.BoxExecute
-*/
-////////////////////////////////////////////////////
-
 //Viewer NV and ShowPoints for the second image
 
 new ViewerNV viewer2
@@ -61,6 +52,48 @@ new ShowNPoints showNpoints2
   connect viewer2.BoxChange showNpoints2.BoxExecute
   set showNpoints2.Radio 10
 
+/////////////////////////////////////////////////////
+#Calculate Vector Box
+/////////////////////////////////////////////////////
+
+new CalculateVectorBox vector1
+  connect showNpoints.lstPointsX vector1.PointsX1
+  connect showNpoints2.lstPointsX vector1.PointsX2
+  connect showNpoints.lstPointsY vector1.PointsY1
+  connect showNpoints2.lstPointsY vector1.PointsY2
+  connect showNpoints.lstPointsZ vector1.PointsZ1
+  connect showNpoints2.lstPointsZ vector1.PointsZ2  
+  
+////////////////////////////////////////////////////
+
+///////////////////////////////////////////////////
+#Transformation Boxes
+//////////////////////////////////////////////////
+
+new Transform2DBox transform
+  connect vector1.Origin transform.CenterPoint
+  connect vector1.OutAngle transform.Angle
+  connect vector1.OutScaleX transform.ScaleX
+  connect vector1.OutScaleY transform.ScaleY
+  connect vector1.OutScaleZ transform.ScaleZ
+  connect vector1.TransformAxis transform.Axis
+  set transform.3D true
+
+new ReSlicerBox reslice1
+  connect vector1.OriginReslicer reslice1.Origin
+  connect transform.Out reslice1.Transform
+  connect reader2.Out reslice1.In
+
+//ViewerNV and ComandButton for the result image
+
+new ViewerNV viewer3
+  set viewer3.nTypeView "5 1 2 0"
+  connect reslice1.Out viewer3.In
+
+new CommandButton butExec
+  set butExec.Label "Execute"
+  connect butExec.BoxChange viewer3.BoxExecute
+
 //Tab for the first image
 
 new LayoutSplit tab1
@@ -75,12 +108,19 @@ new LayoutSplit tab2
    connect showNpoints2.Widget tab2.Widget1
    connect viewer2.Widget tab2.Widget2
 
+//Tab for the result image
+
+new LayoutSplit result
+  set result.Orientation H
+  connect butExec.Widget result.Widget1
+  connect viewer3.Widget result.Widget2
+
 //Main window
 
 new LayoutTab main
 set main.Orientation H
 connect tab1.Widget main.Widget1
 connect tab2.Widget main.Widget2
+connect result.Widget main.Widget3
 
-exec main
-
+exec main
\ No newline at end of file