PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/Creatis/All5/creatools_source/creaRigidRegistration/PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaMaracasVisu
  12 include wx
  13 include PackRecalage
  14 include std
  15 include vtk
  16 include creaImageIO
  17 include wxvtk
  18
  19 author "info-dev@creatis.insa-lyon.fr"
  20 description "Recalage3D 1-point"
  21 category "example"
  22
  23 new ViewerNV viewer
  24   set viewer.nTypeView "5"
  25
  26 new ViewerNV viewer2
  27   set viewer2.nTypeView "5"
  28
  29 new Slider sdrAngleX
  30   set sdrAngleX.In "0"
  31   set sdrAngleX.Max "180"
  32   set sdrAngleX.Min "-180"
  33   set sdrAngleX.Title "Rotation angle in X Axis"
  34
  35 new Slider sdrAngleY
  36   set sdrAngleY.In "0"
  37   set sdrAngleY.Max "180"
  38   set sdrAngleY.Min "-180"
  39   set sdrAngleY.Title "Rotation angle in Y Axis"
  40
  41 new Slider sdrAngleZ
  42   set sdrAngleZ.In "0"
  43   set sdrAngleZ.Max "180"
  44   set sdrAngleZ.Min "-180"
  45   set sdrAngleZ.Title "Rotation angle in Z Axis"
  46
  47 new Slider sdrScaleX
  48   set sdrScaleX.In "100"
  49   set sdrScaleX.Max "300"
  50   set sdrScaleX.Min "10"
  51   set sdrScaleX.Title "Scale in X Axis"
  52
  53 new Slider sdrScaleY
  54   set sdrScaleY.In "100"
  55   set sdrScaleY.Max "300"
  56   set sdrScaleY.Min "10"
  57   set sdrScaleY.Title "Scale in Y Axis"
  58
  59 new Slider sdrScaleZ
  60   set sdrScaleZ.In "100"
  61   set sdrScaleZ.Max "300"
  62   set sdrScaleZ.Min "10"
  63   set sdrScaleZ.Title "Scale in Z Axis"
  64
  65 new Transform3D1PointBox transform
  66
  67 new ReSlicerBox reslicer
  68
  69 new MultipleInputs mult
  70
  71 new MultipleInputs mult2
  72
  73 new MultipleInputs mult3
  74
  75 new ViewerNV viewerResult
  76   set viewerResult.nTypeView "5"
  77
  78 new LayoutSplit imagesLayout
  79   set imagesLayout.Orientation "v"
  80   set imagesLayout.Proportion "50"
  81
  82 new LayoutLine toolsLayout
  83   set toolsLayout.Orientation "v"
  84   set toolsLayout.WinTitle "Rotation"
  85
  86 new LayoutSplit resultLayout
  87   set resultLayout.Proportion "70"
  88
  89 new LayoutSplit main
  90   set main.Orientation "h"
  91   set main.Proportion "25"
  92   set main.WinHeight "800"
  93   set main.WinWidth "1200"
  94
  95 new vtkImageDataPointerRelay Box22
  96
  97 new vtkImageDataPointerRelay Box23
  98
  99 new ImagesChooserDialogBox Box24
 100
 101 new ImagesChooserDialogBox Box25
 102
 103 new LayoutTab Box26
 104   set Box26.WinTitle "2D-Compare"
 105
 106 new CompareImagesWidget Box27
 107   set Box27.WinTitle "2D-Comparing"
 108
 109 new LayoutSplit Box28
 110   set Box28.Orientation "H"
 111   set Box28.Proportion "50"
 112   set Box28.WinTitle "3D-Comparing"
 113
 114 new LayoutLine Box29
 115
 116 new IsoSurfaceWidget Box30
 117   set Box30.Title "Reference image"
 118
 119 new IsoSurfaceWidget Box31
 120   set Box31.Title "Registration image"
 121
 122 new LayoutTab Box32
 123
 124 new LayoutLine Box33
 125   set Box33.WinTitle "Scale"
 126
 127 new Slider TranslateZ
 128
 129 new Slider TranslateY
 130
 131 new Slider TranslateX
 132
 133 new LayoutLine Box37
 134   set Box37.WinTitle "Translate"
 135
 136 new LayoutTab Box38
 137
 138 new LayoutTab Box39
 139
 140
 141 connect viewer2.Point transform.CenterPoint
 142
 143 connect sdrAngleX.Out transform.AngleX
 144
 145 connect sdrAngleY.Out transform.AngleY
 146
 147 connect sdrAngleZ.Out transform.AngleZ
 148
 149 connect sdrScaleX.Out transform.ScaleX
 150
 151 connect sdrScaleY.Out transform.ScaleY
 152
 153 connect sdrScaleZ.Out transform.ScaleZ
 154
 155 connect viewer.Point reslicer.Origin
 156
 157 connect transform.Out reslicer.Transform
 158
 159 connect viewer.BoxChange mult.In1
 160
 161 connect viewer2.BoxChange mult.In2
 162
 163 connect sdrAngleX.BoxChange mult.In3
 164
 165 connect sdrAngleY.BoxChange mult.In4
 166
 167 connect sdrAngleZ.BoxChange mult.In5
 168
 169 connect sdrScaleX.BoxChange mult2.In1
 170
 171 connect sdrScaleY.BoxChange mult2.In2
 172
 173 connect sdrScaleZ.BoxChange mult2.In3
 174
 175 connect mult.BoxChange mult3.In1
 176
 177 connect mult2.BoxChange mult3.In2
 178
 179 connect mult3.BoxChange transform.BoxExecute
 180
 181 connect mult3.BoxChange reslicer.BoxExecute
 182
 183 connect reslicer.Out viewerResult.In
 184
 185 connect mult3.BoxChange viewerResult.BoxExecute
 186
 187 connect viewer.Widget imagesLayout.Widget1
 188
 189 connect viewer2.Widget imagesLayout.Widget2
 190
 191 connect sdrAngleX.Widget toolsLayout.Widget1
 192
 193 connect sdrAngleY.Widget toolsLayout.Widget2
 194
 195 connect sdrAngleZ.Widget toolsLayout.Widget3
 196
 197 connect imagesLayout.Widget main.Widget1
 198
 199 connect resultLayout.Widget main.Widget2
 200
 201 connect Box22.Out viewer2.In
 202
 203 connect Box22.Out reslicer.In
 204
 205 connect Box24.Out Box22.In
 206
 207 connect Box23.Out viewer.In
 208
 209 connect Box25.Out Box23.In
 210
 211 connect Box27.Widget Box26.Widget2
 212
 213 connect Box26.Widget resultLayout.Widget1
 214
 215 connect reslicer.Out Box27.In2
 216
 217 connect Box23.Out Box27.In1
 218
 219 connect viewerResult.Widget Box28.Widget2
 220
 221 connect Box28.Widget Box26.Widget1
 222
 223 connect Box29.Widget Box28.Widget1
 224
 225 connect sdrScaleX.Widget Box33.Widget1
 226
 227 connect sdrScaleY.Widget Box33.Widget2
 228
 229 connect sdrScaleZ.Widget Box33.Widget3
 230
 231 connect Box33.Widget Box32.Widget2
 232
 233 connect toolsLayout.Widget Box32.Widget1
 234
 235 connect Box32.Widget resultLayout.Widget2
 236
 237 connect TranslateX.Widget Box37.Widget1
 238
 239 connect TranslateY.Widget Box37.Widget2
 240
 241 connect TranslateZ.Widget Box37.Widget3
 242
 243 connect Box37.Widget Box32.Widget3
 244
 245 connect Box31.Widget Box38.Widget2
 246
 247 connect Box38.Widget Box29.Widget2
 248
 249 connect Box39.Widget Box29.Widget1
 250
 251 connect Box30.Widget Box39.Widget1
 252
 253 connect Box23.Out Box30.In
 254
 255 connect viewerResult.Renderer1 Box30.vtkRenderer
 256
 257 connect Box30.BoxChange mult3.In3
 258
 259 connect viewerResult.Renderer1 Box31.vtkRenderer
 260
 261 connect Box31.BoxChange mult3.In4
 262
 263 connect reslicer.Out Box31.In
 264
 265
 266
 267 # Complex input ports
 268 exec main