bbtk_package_creaMiniTools/bbs/appli/registration3D1PointExample.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.2 BBS BlackBox Script
   3 # - /home/pechan/Documents/courses/development/creatis/dev/src/creaMiniTools/examples/bbg/registration/registration3D1PointExample.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaMaracasVisu
  12 include wx
  13 include PackRegistration
  14 include std
  15 include creaImageIO
  16 include vtk
  17
  18 author "Author ??"
  19 description "Description ??"
  20 category "<VOID>"
  21
  22 new ViewerNV viewer
  23   set viewer.nTypeView "5"
  24
  25 new ViewerNV viewer2
  26   set viewer2.nTypeView "5"
  27
  28 new Slider sdrAngleX
  29   set sdrAngleX.In "0"
  30   set sdrAngleX.Max "180"
  31   set sdrAngleX.Min "-180"
  32   set sdrAngleX.ReactiveOnTrack "true"
  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.ReactiveOnTrack "true"
  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.ReactiveOnTrack "true"
  47   set sdrAngleZ.Title "Rotation angle in Z Axis"
  48
  49 new Slider sdrScaleX
  50   set sdrScaleX.In "100"
  51   set sdrScaleX.Max "300"
  52   set sdrScaleX.Min "10"
  53   set sdrScaleX.ReactiveOnTrack "true"
  54   set sdrScaleX.Title "Scale in X Axis"
  55
  56 new Slider sdrScaleY
  57   set sdrScaleY.In "100"
  58   set sdrScaleY.Max "300"
  59   set sdrScaleY.Min "10"
  60   set sdrScaleY.ReactiveOnTrack "true"
  61   set sdrScaleY.Title "Scale in Y Axis"
  62
  63 new Slider sdrScaleZ
  64   set sdrScaleZ.In "100"
  65   set sdrScaleZ.Max "300"
  66   set sdrScaleZ.Min "10"
  67   set sdrScaleZ.ReactiveOnTrack "true"
  68   set sdrScaleZ.Title "Scale in Z Axis"
  69
  70 new Transform3D1PointBox transform
  71
  72 new ReSlicerBox reslicer
  73
  74 new MultipleInputs mult
  75
  76 new MultipleInputs mult2
  77
  78 new MultipleInputs mult3
  79
  80 new ViewerNV viewerResult
  81   set viewerResult.nTypeView "5"
  82
  83 new LayoutSplit imagesLayout
  84   set imagesLayout.Orientation "v"
  85   set imagesLayout.Proportion "50"
  86
  87 new LayoutLine toolsLayout
  88   set toolsLayout.Orientation "v"
  89
  90 new LayoutSplit resultLayout
  91   set resultLayout.Orientation "v"
  92   set resultLayout.Proportion "60"
  93
  94 new LayoutSplit main
  95   set main.Orientation "h"
  96   set main.Proportion "50"
  97
  98 new ImagesChooserDialogBox Box22
  99
 100 new ImagesChooserDialogBox Box23
 101
 102 new CommandButton Box21
 103   set Box21.Label "Save Image"
 104
 105 new FileSelector Box25
 106   set Box25.OpenSave "Save"
 107   set Box25.Title "Save Image"
 108
 109 new MetaImageWriter Box26
 110
 111 new LayoutLine Box27
 112
 113 new LayoutTab Box28
 114
 115
 116 connect viewer2.Point transform.CenterPoint
 117 connect sdrAngleX.Out transform.AngleX
 118 connect sdrAngleY.Out transform.AngleY
 119 connect sdrAngleZ.Out transform.AngleZ
 120 connect sdrScaleX.Out transform.ScaleX
 121 connect sdrScaleY.Out transform.ScaleY
 122 connect sdrScaleZ.Out transform.ScaleZ
 123 connect viewer.Point reslicer.Origin
 124 connect transform.Out reslicer.Transform
 125 connect viewer.BoxChange mult.In1
 126 connect viewer2.BoxChange mult.In2
 127 connect sdrAngleX.BoxChange mult.In3
 128 connect sdrAngleY.BoxChange mult.In4
 129 connect sdrAngleZ.BoxChange mult.In5
 130 connect sdrScaleX.BoxChange mult2.In1
 131 connect sdrScaleY.BoxChange mult2.In2
 132 connect sdrScaleZ.BoxChange mult2.In3
 133 connect mult.BoxChange mult3.In1
 134 connect mult2.BoxChange mult3.In2
 135 connect mult3.BoxChange transform.BoxExecute
 136 connect mult3.BoxChange reslicer.BoxExecute
 137 connect reslicer.Out viewerResult.In
 138 connect mult3.BoxChange viewerResult.BoxExecute
 139 connect viewer.Widget imagesLayout.Widget1
 140 connect viewer2.Widget imagesLayout.Widget2
 141 connect sdrAngleX.Widget toolsLayout.Widget1
 142 connect sdrAngleY.Widget toolsLayout.Widget2
 143 connect sdrAngleZ.Widget toolsLayout.Widget3
 144 connect sdrScaleX.Widget toolsLayout.Widget4
 145 connect sdrScaleY.Widget toolsLayout.Widget5
 146 connect sdrScaleZ.Widget toolsLayout.Widget6
 147 connect viewerResult.Widget resultLayout.Widget1
 148 connect toolsLayout.Widget resultLayout.Widget2
 149 connect imagesLayout.Widget main.Widget1
 150 connect resultLayout.Widget main.Widget2
 151 connect Box22.Out viewer2.In
 152 connect Box22.Out reslicer.In
 153 connect Box23.Out viewer.In
 154 connect reslicer.Out Box26.In
 155 connect Box25.Out Box26.Filename
 156 connect Box21.BoxChange Box26.BoxExecute
 157 connect Box21.Widget Box27.Widget1
 158 connect main.Widget Box28.Widget1
 159 connect Box27.Widget Box28.Widget2
 160
 161 exec Box28