# ----------------------------------
# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
# - /tmpEED/creaTools/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/boxes/SlicesImages3D.bbs
# ----------------------------------

include std
include itkvtk
include creaMaracasVisu
include std
include vtk
include creaVtk

define SlicesImages3D creaMiniTools

author "Author ??"
description "Description ??"

category "<VOID>"

new creaMaracasVisu:SliceImage Box00

new std:GetVectorIntElement Box03
  set Box03.I "2"

new creaMaracasVisu:ImageActor Box04

new vtk:Transform Box05

new std:ConcatStrings Box06
  set Box06.In1 "0 0 "

new vtk:ImageVtkProperties Box07

new std:GetVectorDoubleElement Box08
  set Box08.I "2"

new std:Mul Box09

new vtk:vtkImageDataPointerRelay Box12

new std:MagicBox Box14

new std:MagicBox Box15

new std:MagicBox Box16

new creaMaracasVisu:SliceImage Box17
  set Box17.TypeOrientation "1"

new std:GetVectorIntElement Box18
  set Box18.I "1"

new creaMaracasVisu:ImageActor Box19

new vtk:Transform Box20
  set Box20.RotateWXYZ "-90 1 0 0"

new std:ConcatStrings Box21
  set Box21.In1 "0 "
  set Box21.In3 " 0"

new std:GetVectorDoubleElement Box22
  set Box22.I "1"

new std:Mul Box23

new creaMaracasVisu:SliceImage Box24
  set Box24.TypeOrientation "2"

new std:GetVectorIntElement Box25
  set Box25.I "0"

new creaMaracasVisu:ImageActor Box26

new vtk:Transform Box27
  set Box27.RotateWXYZ "-90 1 0 0"

new std:ConcatStrings Box28
  set Box28.In3 " 0 0"

new std:GetVectorDoubleElement Box29
  set Box29.I "0"

new std:Mul Box30

new vtk:Transform Box31
  set Box31.RotateWXYZ "-90 0 1 0"

new creaVtk:ScalarsToColors Box32
  set Box32.Range "-1000 0"
  set Box32.Type "0"

new std:MagicBox Box33

new creaVtk:ImageCutByAxis Box34
  set Box34.Type "x-y-z+"
  set Box34.TypeOrientation "0"

new std:MagicBox Box35

new creaVtk:ImageCutByAxis Box36
  set Box36.Type "x-y-z+"
  set Box36.TypeOrientation "1"

new creaVtk:ImageCutByAxis Box37
  set Box37.Type "x-y-z+"
  set Box37.TypeOrientation "2"

new std:MagicBox Box38


connect Box03.Out Box00.Slice
connect Box05.Out Box04.Transform
connect Box06.Out Box05.Translate
connect Box07.Spacing Box08.In
connect Box08.Out Box09.In1
connect Box03.Out Box09.In2
connect Box09.Out Box06.In2
connect Box12.Out Box07.In
connect Box12.Out Box00.In
connect Box14.BoxChange Box04.BoxExecute
connect Box15.Out Box04.Renderer
connect Box16.Out Box03.In
connect Box18.Out Box17.Slice
connect Box20.Out Box19.Transform
connect Box21.Out Box20.Translate
connect Box22.Out Box23.In1
connect Box18.Out Box23.In2
connect Box23.Out Box21.In2
connect Box07.Spacing Box22.In
connect Box16.Out Box18.In
connect Box15.Out Box19.Renderer
connect Box14.BoxChange Box19.BoxExecute
connect Box12.Out Box17.In
connect Box25.Out Box24.Slice
connect Box29.Out Box30.In1
connect Box25.Out Box30.In2
connect Box30.Out Box28.In2
connect Box07.Spacing Box29.In
connect Box16.Out Box25.In
connect Box12.Out Box24.In
connect Box15.Out Box26.Renderer
connect Box14.BoxChange Box26.BoxExecute
connect Box27.Out Box31.In
connect Box31.Out Box26.Transform
connect Box28.Out Box27.Translate
connect Box32.LookupTable Box19.LookupTable
connect Box32.LookupTable Box26.LookupTable
connect Box32.LookupTable Box04.LookupTable
connect Box33.Out Box04.Opacity
connect Box33.Out Box19.Opacity
connect Box33.Out Box26.Opacity
connect Box34.Out Box04.In
connect Box00.Out Box34.In
connect Box16.Out Box34.Point
connect Box35.Out Box34.InsideVol
connect Box14.BoxChange Box34.BoxExecute
connect Box17.Out Box36.In
connect Box36.Out Box19.In
connect Box14.BoxChange Box36.BoxExecute
connect Box35.Out Box36.InsideVol
connect Box16.Out Box36.Point
connect Box24.Out Box37.In
connect Box37.Out Box26.In
connect Box16.Out Box37.Point
connect Box35.Out Box37.InsideVol
connect Box14.BoxChange Box37.BoxExecute
connect Box38.Out Box34.Type
connect Box38.Out Box36.Type
connect Box38.Out Box37.Type

# Complex input ports
input InputImage Box12.In " "
input point Box16.In " "
input render Box15.In " "
input boxExecute Box14.BoxExecute " "
input opacity Box33.In " "
input type Box32.Type " "
input range Box32.Range " "
input insidevol Box35.In " "
input TypeImageCutByAxis Box38.In " "

# Complex output ports


endefine