PackRecalage/bbs/appli/ExampleRecalage3D1Point.bbs

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