2020 Feature Comparing Images in XY XZ YZ planes

[creaRigidRegistration.git] / PackRecalage / bbs / boxes / CompareImagesWidget_base_2Dt_A.bbs

diff --git a/PackRecalage/bbs/boxes/CompareImagesWidget_base_2Dt_A.bbs b/PackRecalage/bbs/boxes/CompareImagesWidget_base_2Dt_A.bbs
new file mode 100644 (file)
index 0000000..3e1003a
--- /dev/null
+++ b/PackRecalage/bbs/boxes/CompareImagesWidget_base_2Dt_A.bbs
@@ -0,0 +1,148 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
+# - /home/davila/Creatis/All/creatools_source/creaRigidRegistration/PackRecalage/bbs/boxes/CompareImagesWidget_base_2Dt_A.bbs
+# ----------------------------------
+
+include std
+include itkvtk
+include vtk
+include wx
+include PackRecalage
+include std
+
+define CompareImagesWidget_base_2Dt_A PackRecalage
+
+author "info-dev@creatis.insa-lyon.fr"
+description "creatisRecalage"
+
+category "example"
+
+new SliceImage imgslice2
+
+new LayoutLine buttonsLayout
+  set buttonsLayout.Orientation "V"
+  set buttonsLayout.WinTitle "Image transformation"
+
+new Slider slider
+  set slider.In "0"
+  set slider.Max "180"
+  set slider.Min "-180"
+  set slider.ReactiveOnTrack "1"
+  set slider.Title "Angle"
+
+new Slider sliderX
+  set sliderX.In "100"
+  set sliderX.Max "500"
+  set sliderX.Min "10"
+  set sliderX.ReactiveOnTrack "1"
+  set sliderX.Title "% Scale in X"
+
+new Slider sliderY
+  set sliderY.In "100"
+  set sliderY.Max "500"
+  set sliderY.Min "10"
+  set sliderY.ReactiveOnTrack "1"
+  set sliderY.Title "% Scale in Y"
+
+new Transform2DBox transform
+
+new ReSlicerBox reslice1
+  set reslice1.Centered false
+  set reslice1.Interpolate true
+  set reslice1.Origin "0 0 0"
+
+new ImageConvolution convol2
+
+new MultipleInputs mult
+
+new ImageVtkProperties Box51
+
+new VectorRescaleSlope Box52
+  set Box52.A 0.5
+  set Box52.B 0
+  set Box52.Type 0
+
+new ConcatStrings Box53
+
+new ConcatStrings Box54
+
+new Slider Box55
+  set Box55.In 0
+  set Box55.Label true
+  set Box55.Max 200
+  set Box55.Min -200
+  set Box55.ReactiveOnTrack true
+  set Box55.Title "Translate Y"
+
+new Slider Box57
+  set Box57.In 0
+  set Box57.Label true
+  set Box57.Max 200
+  set Box57.Min -200
+  set Box57.ReactiveOnTrack true
+  set Box57.Title "translate X"
+
+new ConcatStrings Box58
+  set Box58.In2 " "
+  set Box58.In4 " 0"
+
+new GetVectorIntElement Box60
+  set Box60.I 0
+
+new Add Box62
+
+new Add Box63
+
+new GetVectorIntElement Box64
+  set Box64.I 1
+
+new MagicBox Box70
+
+
+connect slider.Widget buttonsLayout.Widget1
+connect sliderX.Widget buttonsLayout.Widget2
+connect sliderY.Widget buttonsLayout.Widget3
+connect slider.Out transform.Angle
+connect sliderX.Out transform.ScaleX
+connect sliderY.Out transform.ScaleY
+connect transform.Out reslice1.Transform
+connect imgslice2.Out reslice1.In
+connect slider.BoxChange mult.In1
+connect sliderX.BoxChange mult.In2
+connect sliderY.BoxChange mult.In3
+connect reslice1.Out convol2.In
+connect imgslice2.Out Box51.In
+connect Box51.Size Box53.In1
+connect Box53.Out Box52.In
+connect Box52.Out Box54.In1
+connect Box60.Out Box62.In1
+connect Box57.Out Box62.In2
+connect Box62.Out Box58.In1
+connect Box64.Out Box63.In1
+connect Box55.Out Box63.In2
+connect Box63.Out Box58.In3
+connect Box57.Widget buttonsLayout.Widget4
+connect Box55.Widget buttonsLayout.Widget5
+connect Box57.BoxChange mult.In4
+connect Box55.BoxChange mult.In5
+connect Box58.Out transform.CenterPoint
+connect Box54.Out reslice1.Origin
+connect Box54.Out Box64.In
+connect Box54.Out Box60.In
+connect Box70.BoxChange imgslice2.BoxExecute
+connect Box70.BoxChange convol2.BoxExecute
+
+# Complex input ports
+input SliceZ imgslice2.Z " "
+input ConvolutionFactor convol2.Factor " "
+input ConvolutionOnOff convol2.On " "
+input BoxExecute Box70.In " "
+input In imgslice2.In " "
+
+# Complex output ports
+output Out convol2.Out " "
+output Widget buttonsLayout.Widget " "
+output BoxChange mult.BoxChange " "
+
+
+endefine