bbtk_package_creaMiniTools/bbs/appli/SaveImagePlanes.bbs

   1 # ---------------------------------------------------------------------
   2 #
   3 # Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image
   4 #                        pour la Sant�)
   5 # Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
   6 # Previous Authors : Laurent Guigues, Jean-Pierre Roux
   7 # CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil
   8 #
   9 #  This software is governed by the CeCILL-B license under French law and
  10 #  abiding by the rules of distribution of free software. You can  use,
  11 #  modify and/ or redistribute the software under the terms of the CeCILL-B
  12 #  license as circulated by CEA, CNRS and INRIA at the following URL
  13 #  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html
  14 #  or in the file LICENSE.txt.
  15 #
  16 #  As a counterpart to the access to the source code and  rights to copy,
  17 #  modify and redistribute granted by the license, users are provided only
  18 #  with a limited warranty  and the software's author,  the holder of the
  19 #  economic rights,  and the successive licensors  have only  limited
  20 #  liability.
  21 #
  22 #  The fact that you are presently reading this means that you have had
  23 #  knowledge of the CeCILL-B license and that you accept its terms.
  24 # ------------------------------------------------------------------------ */
  25
  26 # ----------------------------------
  27 # - BBTKGEditor v 1.3 BBS BlackBox Script
  28 # - /Users/davila/Creatis/All5/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/appli/SaveImagePlanes.bbs
  29 # ----------------------------------
  30
  31 # BBTK GEditor Script
  32 # ----------------------
  33
  34 include std
  35 include itkvtk
  36 include wx
  37 include vtk
  38 include wxvtk
  39 include creaImageIO
  40 include toolsbbtk
  41 include creaMaracasVisu
  42 include std
  43
  44 author "jpr@creatis.insa-lyon.fr"
  45 description "3 slicers and a 3D view"
  46 category "demo"
  47
  48 new LayoutX4 main
  49   set main.WinTitle "demoViewing3"
  50
  51 new LayoutLine upright
  52
  53 new LayoutLine upleft
  54
  55 new LayoutLine downleft
  56
  57 new ImagePlanes planes
  58   set planes.Interpolation "0"
  59
  60 new Viewer3D viewer
  61
  62 new Viewer2D viewerUL
  63   set viewerUL.BoxProcessMode "Always"
  64   set viewerUL.Slice "0"
  65
  66 new Viewer2D viewerUR
  67   set viewerUR.BoxProcessMode "Always"
  68   set viewerUR.Slice "0"
  69
  70 new Viewer2D viewerDL
  71   set viewerDL.BoxProcessMode "Always"
  72   set viewerDL.Slice "0"
  73
  74 new ImagesChooserDialogBox Box10
  75
  76 new LayoutTab Box11
  77
  78 new ImageVtkPropertiesWidget Box12
  79
  80 new LayoutLine Box13
  81   set Box13.WinTitle "Save Image 2D"
  82
  83 new SaveMHD-Button Box14
  84
  85 new LayoutSplit Box15
  86   set Box15.Orientation "H"
  87   set Box15.Proportion "35"
  88   set Box15.WinTitle "Interactive Planes"
  89
  90 new SaveMHD-Button Box16
  91
  92 new SaveMHD-Button Box17
  93
  94 new OutputText Box18
  95   set Box18.In "X"
  96
  97 new LayoutLine Box19
  98   set Box19.Orientation "H"
  99
 100 new OutputText Box20
 101   set Box20.In "Y"
 102
 103 new LayoutLine Box21
 104   set Box21.Orientation "H"
 105
 106 new OutputText Box22
 107   set Box22.In "Z"
 108
 109 new LayoutLine Box23
 110   set Box23.Orientation "H"
 111
 112 new vtkImageDataPointerRelay Box24
 113
 114 new LayoutTab Box25
 115   set Box25.WinHeight "800"
 116   set Box25.WinWidth "1000"
 117
 118 new LayoutSplit Box26
 119   set Box26.Orientation "H"
 120   set Box26.Proportion "30"
 121   set Box26.WinTitle "3 Points plane definition"
 122
 123 new ViewerNV Box27
 124
 125 new ShowNPoints Box30
 126
 127 new LayoutSplit Box31
 128
 129 new Viewer2D Box32
 130
 131 new SaveMHD-Button Box35
 132
 133 new ImagePlanes Box36
 134   set Box36.Interpolation "0"
 135
 136 new LoadHola Box37
 137
 138 new LayoutTab Box38
 139
 140 new LayoutLine Box39
 141   set Box39.Orientation "H"
 142   set Box39.WinTitle "Select 3 points"
 143
 144 new RadioButton Box40
 145   set Box40.In "1"
 146   set Box40.In0 "Nearest"
 147   set Box40.In1 "Linear"
 148   set Box40.In2 "Cubic"
 149   set Box40.WinTitle "Interpolation"
 150
 151 new MultipleInputs Box42
 152
 153 new RadioButton Box43
 154   set Box43.In "1"
 155   set Box43.In0 "Nearest"
 156   set Box43.In1 "Linear"
 157   set Box43.In2 "Cubic"
 158   set Box43.WinTitle "Interpolation"
 159
 160
 161 connect upright.Widget main.Widget1
 162 connect upleft.Widget main.Widget2
 163 connect downleft.Widget main.Widget3
 164 connect planes.PlaneX viewer.Obs1
 165 connect planes.PlaneY viewer.Obs2
 166 connect planes.PlaneZ viewer.Obs3
 167 connect viewer.Widget main.Widget4
 168 connect viewerUL.Widget upleft.Widget1
 169 connect planes.BoxChange viewerUL.BoxExecute
 170 connect viewerUR.Widget upright.Widget1
 171 connect planes.BoxChange viewerUR.BoxExecute
 172 connect viewerDL.Widget downleft.Widget1
 173 connect planes.BoxChange viewerDL.BoxExecute
 174 connect Box13.Widget Box11.Widget1
 175 connect Box11.Widget Box15.Widget1
 176 connect main.Widget Box15.Widget2
 177 connect planes.ImageX Box14.In
 178 connect planes.ImageY Box16.In
 179 connect planes.ImageZ Box17.In
 180 connect Box14.Widget Box19.Widget1
 181 connect Box18.Widget Box19.Widget2
 182 connect Box20.Widget Box21.Widget2
 183 connect Box22.Widget Box23.Widget2
 184 connect Box16.Widget Box21.Widget1
 185 connect Box17.Widget Box23.Widget1
 186 connect Box24.Out Box12.in
 187 connect Box24.Out planes.In
 188 connect Box27.Widget Box26.Widget2
 189 connect Box27.Point Box30.In
 190 connect Box27.BoxChange Box30.BoxExecute
 191 connect Box27.Renderer1 Box30.Renderer
 192 connect Box24.Out Box27.In
 193 connect Box24.Out Box30.Image
 194 connect Box32.Widget Box31.Widget2
 195 connect Box30.lstPointsX Box36.PointsX
 196 connect Box30.lstPointsY Box36.PointsY
 197 connect Box30.lstPointsZ Box36.PointsZ
 198 connect Box24.Out Box36.In
 199 connect Box36.Image3Pts Box32.In
 200 connect Box36.Image3Pts Box35.In
 201 connect Box38.Widget Box31.Widget1
 202 connect Box30.Widget Box39.Widget1
 203 connect Box39.Widget Box38.Widget1
 204 connect Box35.Widget Box38.Widget2
 205 connect Box31.Widget Box26.Widget1
 206 connect Box12.widget Box25.Widget3
 207 connect Box40.Widget Box39.Widget2
 208 connect Box40.Out Box36.Interpolation
 209 connect Box40.BoxChange Box42.In1
 210 connect Box30.BoxChange Box42.In2
 211 connect Box42.Out Box36.BoxExecute
 212 connect Box42.Out Box32.BoxExecute
 213 connect Box19.Widget Box13.Widget2
 214 connect Box21.Widget Box13.Widget3
 215 connect Box23.Widget Box13.Widget4
 216 connect Box43.Widget Box13.Widget1
 217 connect Box43.Out planes.Interpolation
 218 connect Box43.BoxChange planes.BoxExecute
 219 connect Box10.Out Box24.In
 220 connect Box15.Widget Box25.Widget1
 221 connect Box26.Widget Box25.Widget2
 222 connect planes.ImageZ viewerDL.In
 223 connect planes.ImageY viewerUR.In
 224 connect planes.ImageX viewerUL.In
 225
 226 exec Box25