bbtk/bbs/boxes/SliceImage-3DVisu.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.5 BBS BlackBox Script (Complex Box)
   3 # - /Users/davila/Creatis/C11/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/SliceImage-3DVisu.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include creaMaracasVisu
   9 include vtk
  10 include std
  11 include creaVtk
  12 include wx
  13
  14 define SliceImage-3DVisu creaMaracasVisu
  15
  16 author "InfoDev"
  17 description "Description ??"
  18
  19 category "<VOID>"
  20
  21 new creaMaracasVisu:SliceImage Box00
  22   set Box00.TypeOrientation "1"
  23
  24 new creaMaracasVisu:ImageActor Box04
  25
  26 new vtk:Transform Box17
  27
  28 new std:ConcatStrings Box18
  29   set Box18.In1 "0  "
  30   set Box18.In2 "0  "
  31
  32 new vtk:ImageVtkProperties Box20
  33
  34 new creaVtk:ScalarsToColors Box22
  35   set Box22.Type "101"
  36
  37 new vtk:Transform Box32
  38
  39 new creaMaracasVisu:DrawAxisTree3D Box26
  40   set Box26.Colour "0 0 0"
  41   set Box26.iAxis "0"
  42   set Box26.lstIndexs "5"
  43   set Box26.lstPointX "0   50  50      0      0"
  44   set Box26.lstPointY "0     0   50    50      0"
  45   set Box26.lstPointZ "0     0     0      0      0"
  46
  47 new std:CreateArithmeticSuiteVector Box33
  48   set Box33.Delta "0"
  49   set Box33.Size "5"
  50
  51 new std:GetVectorDoubleElement Box34
  52   set Box34.I "0"
  53
  54 new std:MathOperationVector Box35
  55   set Box35.In1 "0 1 1 0 0 "
  56   set Box35.Type "2"
  57
  58 new std:CreateArithmeticSuiteVector Box36
  59   set Box36.Delta "0"
  60   set Box36.Size "5"
  61
  62 new std:MathOperationVector Box37
  63   set Box37.In1 "0 0 1 1 0 "
  64   set Box37.Type "2"
  65
  66 new vtk:vtkImageDataPointerRelay Box38
  67
  68 new std:ConcatStrings Box40
  69   set Box40.In1 "0"
  70
  71 new std:StringSelect Box41
  72   set Box41.In0 "0 1 0 0"
  73   set Box41.In1 "90 1 0 0"
  74   set Box41.In2 "-90 0 1 0"
  75
  76 new std:GetVectorDoubleElement Box44
  77   set Box44.I "1"
  78
  79 new std:StringSelect Box45
  80   set Box45.In0 "0"
  81   set Box45.In1 "0"
  82   set Box45.In2 "2"
  83
  84 new std:StringSelect Box46
  85   set Box46.In0 "1"
  86   set Box46.In1 "2"
  87   set Box46.In2 "1"
  88
  89 new vtk:Transform Box52
  90
  91 new std:StringSelect Box55
  92   set Box55.In0 "1"
  93   set Box55.In1 "-1"
  94   set Box55.In2 "-1"
  95
  96 new std:ConcatStrings Box57
  97   set Box57.In2 "  "
  98
  99 new std:ConcatStrings Box60
 100   set Box60.BoxProcessMode "Reactive"
 101
 102 new std:MagicBox Box61
 103
 104 new std:ConcatStrings Box62
 105   set Box62.In1 "1 1 0"
 106
 107 new std:GetVectorDoubleElement Box64
 108   set Box64.I "0"
 109
 110 new std:ConcatStrings Box65
 111
 112 new std:Div Box66
 113   set Box66.In2 "2"
 114
 115 new std:Add Box67
 116
 117 new std:GetVectorDoubleElement Box68
 118   set Box68.I "1"
 119
 120 new std:Mul Box69
 121   set Box69.In2 "-1"
 122
 123 new std:Add Box70
 124
 125 new std:MathOperation Box72
 126   set Box72.In1 "1"
 127   set Box72.Type "2"
 128
 129 new std:MathOperation Box73
 130   set Box73.Type "2"
 131
 132 new std:StringSelect Box74
 133   set Box74.In0 "2"
 134   set Box74.In1 "0"
 135   set Box74.In2 "1"
 136
 137 new std:GetVectorDoubleElement Box75
 138
 139 new vtk:Transform Box79
 140   set Box79.Scale "1 1 1"
 141
 142 new creaMaracasVisu:ImageChangeInformation Box80
 143   set Box80.NewSpacing "1 1 1"
 144
 145 new std:StringSelect Box81
 146   set Box81.In0 "0"
 147   set Box81.In1 "-1"
 148   set Box81.In2 "-2"
 149
 150 new std:MathOperationVector Box82
 151   set Box82.In1 "-1    -1   -1"
 152   set Box82.Type "0"
 153
 154 new std:MagicBox Box83
 155
 156 new std:MagicBox Box78
 157
 158 new std:MagicBox Box84
 159
 160 new std:MagicBox Box85
 161
 162 new wx:OutputText Box86
 163
 164 new wx:OutputText Box87
 165
 166 new wx:LayoutLine Box88
 167
 168 new std:MagicBox Box89
 169
 170
 171 connect Box22.LookupTable Box04.LookupTable
 172 connect Box32.Out Box04.Transform
 173 connect Box26.BoxChange Box04.BoxExecute
 174 connect Box34.Out Box33.FirstValue
 175 connect Box33.ArithmeticSuiteVector Box35.In0
 176 connect Box35.Out Box26.lstPointX
 177 connect Box36.ArithmeticSuiteVector Box37.In0
 178 connect Box37.Out Box26.lstPointY
 179 connect Box38.Out Box00.In
 180 connect Box38.Out Box20.In
 181 connect Box40.Out Box41.In
 182 connect Box44.Out Box36.FirstValue
 183 connect Box40.Out Box45.In
 184 connect Box40.Out Box46.In
 185 connect Box45.Out Box34.I
 186 connect Box46.Out Box44.I
 187 connect Box17.Out Box32.In
 188 connect Box52.Out Box17.In
 189 connect Box40.Out Box55.In
 190 connect Box57.Out Box22.Range
 191 connect Box60.Out Box00.Slice
 192 connect Box61.Out Box26.Renderer
 193 connect Box61.Out Box04.Renderer
 194 connect Box62.Out Box26.Colour
 195 connect Box00.BoxChange Box26.BoxExecute
 196 connect Box65.Out Box64.In
 197 connect Box64.Out Box66.In1
 198 connect Box65.Out Box68.In
 199 connect Box66.Out Box69.In1
 200 connect Box68.Out Box67.In1
 201 connect Box69.Out Box67.In2
 202 connect Box67.Out Box57.In1
 203 connect Box66.Out Box70.In1
 204 connect Box68.Out Box70.In2
 205 connect Box70.Out Box57.In3
 206 connect Box60.Out Box72.In2
 207 connect Box72.Out Box73.In1
 208 connect Box55.Out Box73.In2
 209 connect Box18.Out Box32.Translate
 210 connect Box73.Out Box18.In3
 211 connect Box40.Out Box74.In
 212 connect Box20.Spacing Box75.In
 213 connect Box74.Out Box75.I
 214 connect Box79.Out Box52.In
 215 connect Box00.Out Box80.In
 216 connect Box80.Out Box04.In
 217 connect Box20.Spacing Box79.Scale
 218 connect Box41.Out Box17.RotateWXYZ
 219 connect Box40.Out Box81.In
 220 connect Box81.Out Box00.TypeOrientation
 221 connect Box20.Size Box82.In0
 222 connect Box82.Out Box34.In
 223 connect Box82.Out Box44.In
 224 connect Box83.Out Box26.Active
 225 connect Box78.Out Box04.InterpolationMode
 226 connect Box84.Out Box22.Type
 227 connect Box85.Out Box22.BelowAboveRangeTransparence
 228 connect Box35.Out Box86.In
 229 connect Box37.Out Box87.In
 230 connect Box86.Widget Box88.Widget1
 231 connect Box87.Widget Box88.Widget2
 232 connect Box32.Out Box26.Transform
 233 connect Box89.Out Box04.Opacity
 234 connect Box89.Out Box26.Opacity
 235
 236 # Complex input ports
 237 input Direction Box40.In1 " "
 238 input ColorBorder Box62.In1 " "
 239 input Image Box38.In " "
 240 input SliceDeep Box60.In1 " "
 241 input Render Box61.In " "
 242 input WindowColorLevel Box65.In1 " "
 243 input BorderActive Box83.In " "
 244 input Interpolation_mode Box78.In " "
 245 input TypeTransparence Box84.In " "
 246 input transparenceBeforeAboveRange Box85.In " "
 247 input SliceOpacity Box89.In " "
 248
 249 # Complex output ports
 250 output BoxChangeImageSlice Box04.BoxChange " "
 251
 252
 253 endefine