Added PlaneReorientation (Muller project)

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

diff --git a/PackRecalage/bbs/appli/Recalage2D.bbs b/PackRecalage/bbs/appli/Recalage2D.bbs
index 45ba02ac7f195e8fecb257bee0e4b597494948f4..eb4817afdd72fd006dd0b98b76aea634f125826d 100644 (file)
--- a/PackRecalage/bbs/appli/Recalage2D.bbs
+++ b/PackRecalage/bbs/appli/Recalage2D.bbs
@@ -6,6 +6,14 @@ load creaMaracasVisu
 
 load PackRecalage
 
+//include PackRecalage/boxes/checkerView.bbs
+
+//Uncomment the image readers you need
+
+/////////////////////////////////////////////////
+// File Selector
+////////////////////////////////////////////////
+/*
 new FileSelector imageSelector1
   set imageSelector1.Wildcard "*.mhd"
 new FileSelector imageSelector2
@@ -16,6 +24,24 @@ new MetaImageReader image
 
 new MetaImageReader image2 
   connect imageSelector2.Out image2.In  
+*/
+
+///////////////////////////////////////////////
+// Gimmick
+//////////////////////////////////////////////
+
+include creaImageIO
+
+new Gimmick image
+new Gimmick image2
+
+
+# Create the slicers
+
+new SliceImage imgslice1
+new SliceImage imgslice2
+  connect image.Out imgslice1.In
+  connect image2.Out imgslice2.In
 
 #Viewer containing image 1
 
@@ -76,13 +102,6 @@ new Slider sliderY
   set sliderY.ReactiveOnTrack "1"
   connect sliderY.Widget buttonsLayout.Widget3
 
-# Create the reslicers
-
-new SliceImage imgslice1
-new SliceImage imgslice2
-  connect image.Out imgslice1.In
-  connect image2.Out imgslice2.In
-
 #Box were the transformation will be made
 
 new Transform2DBox transform
@@ -103,11 +122,18 @@ new ImageConvolution convol1
 new ImageConvolution convol2
   connect reslice1.Out convol2.In
 
+#Image Properties
+
+new ImageRecalageProperties properties
+  connect image.Out properties.In
+  connect image.BoxChange properties.BoxExecute
+
 # Create the ZSlider for the slices
 
 new Slider sdrZ
   set sdrZ.ReactiveOnTrack 1
-  set sdrZ.Max 50
+  set sdrZ.Min 0
+  connect properties.LengthZ sdrZ.Max
   set sdrZ.Title "Z for slice"
 
   connect sdrZ.Out imgslice1.Z
@@ -141,21 +167,20 @@ new MultipleInputs multF
 
   connect multF.BoxChange convol1.BoxExecute
   connect multF.BoxChange convol2.BoxExecute
-  
 
 #Create Sliders for WinLevel and ColorLevel
 
 new Slider colorLevel
   set colorLevel.Min "0"
-  set colorLevel.Max "99"
-  set colorLevel.In "50"
+  connect properties.ColorLevel colorLevel.Max 
+  connect properties.MidColorLevel colorLevel.In
   set colorLevel.ReactiveOnTrack true
   set colorLevel.Title "Color Level"
 
 new Slider windowLevel
   set windowLevel.Min "0"
-  set windowLevel.Max "99"
-  set windowLevel.In "50"
+  connect properties.ColorLevel windowLevel.Max
+  connect properties.MidColorLevel windowLevel.In
   set windowLevel.ReactiveOnTrack true
   set windowLevel.Title "Window Level"
 
@@ -224,7 +249,7 @@ new ViewerNV viewerCH
   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
 
@@ -232,11 +257,19 @@ new ViewerNV viewerCH
   connect ly.Widget checkerBoard.Widget2
 /////////////end of Checkboard////////////////////
 
+/*
+new checkerView checkerboard
+
+  connect convol1.Out checkerboard.In1
+  connect convol2.Out checkerboard.In2
 
+  connect colorLevel.Out checkerboard.ColorLevel
+  connect windowLevel.Out checkerboard.WindowLevel
+*/
 //////////////Transparency///////////////////////////
 #Image Transparency view
 
-new TransparencyV2 trans
+new TransparencyBox trans
   connect convol1.Out trans.In1
   connect convol2.Out trans.In2
 
@@ -266,12 +299,18 @@ new LayoutSplit transparency
 
 new ImageSwitcherBox switch
   connect convol1.Out switch.In1 
-  connect convol2.Out switch.In2
+  connect convol2.Out switch.In2  
+
+new CheckBox checkS
+  connect checkS.Out switch.On
+  set checkS.Title "On"
+  set checkS.In "true"
 
 new Slider sdrT
   set sdrT.Max "1000"
   set sdrT.Min "0"
   set sdrT.In "500"
+  set sdrT.ReactiveOnTrack "True"
 
 connect sdrT.Out switch.Time
 
@@ -281,10 +320,23 @@ new Viewer2D viewerSwitch
   connect sdrT.BoxChange switch.BoxExecute
   connect switch.BoxChange viewerSwitch.BoxExecute
 
-new LayoutLine switcher
-  connect viewerSwitch.Widget switcher.Widget1
-  connect switch.Widget switcher.Widget2
-  connect sdrT.Widget switcher.Widget3
+new LayoutSplit switcher
+  set switcher.Proportion "70"
+
+new LayoutSplit switchWindow
+  set switchWindow.Proportion "80"
+  connect viewerSwitch.Widget switchWindow.Widget1
+
+new LayoutSplit switchTool
+  set switchTool.Orientation H
+  set switchTool.Proportion "50"
+  connect switch.Widget switchTool.Widget1
+  connect checkS.Widget switchTool.Widget2
+
+  connect switchTool.Widget switchWindow.Widget2
+
+  connect switchWindow.Widget switcher.Widget1 
+  connect sdrT.Widget switcher.Widget2
 
 //////////////end of Image Switch///////////////////