# ----------------------------------
# - BBTKGEditor v 1.6 BBS BlackBox Script (Complex Box)
# - /Users/davila/Creatis/C23/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/boxes/ImageFillByPlane2_Viewer.bbs
# ----------------------------------

include std
include itkvtk
include creaVtk
include vtk
include creaMaracasVisu
include std
include creaMiniTools
include wx

define ImageFillByPlane2_Viewer creaMiniTools

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

category "<VOID>"

new creaVtk:MHDFileInfo Box00

new vtk:CreateImage Box01

new vtk:AddImageToVector Box02

new vtk:CreateImage Box03
  set Box03.Dimensions "250 250 250"

new vtk:GetVectorVtkImageDataElement Box04
  set Box04.I "0"

new creaMaracasVisu:ViewerNV Box05
  set Box05.nTypeView "6 1 2 0"

new std:ConcatStrings Box06

new creaMiniTools:ImageFillByPlane2 Box07
  set Box07._typeReadMHDPlane "0"

new wx:Slider Box08
  set Box08.In "1"
  set Box08.Label "true"
  set Box08.Max "15"
  set Box08.Min "1"
  set Box08.Title "Speed"

new wx:InputText Box09
  set Box09.In "-100 1000"
  set Box09.Title "Range ex: -100 1000   ex: 0 1"

new wx:LayoutLine Box10
  set Box10.Orientation "H"

new std:GetVectorStringElement Box11
  set Box11.I "0"

new std:GetVectorStringElement Box12
  set Box12.I "1"

new wx:OutputText Box13

new wx:OutputText Box14

new wx:LayoutSplit Box15
  set Box15.Proportion "90"


connect Box00.DimSize Box01.Dimensions
connect Box00.ElementSpacing Box01.Spacing
connect Box00.ElementType Box01.OutputFormat
connect Box01.Out Box02.In0
connect Box02.Out Box04.In
connect Box03.Out Box04.ErrorValue
connect Box04.Out Box05.In
connect Box06.Out Box00.FileName
connect Box08.Out Box07._widthSlice
connect Box05.BoxChange Box07._boxexecute
connect Box00.DimSize Box07._dimsize
connect Box06.Out Box07._fillename
connect Box04.Out Box07._image
connect Box05.Point Box07._point
connect Box09.Out Box11.In
connect Box09.Out Box12.In
connect Box11.Out Box05.ColorLevel
connect Box12.Out Box05.WindowLevel
connect Box09.Widget Box10.Widget5
connect Box08.Widget Box10.Widget3
connect Box13.Widget Box10.Widget1
connect Box14.Widget Box10.Widget9
connect Box05.Widget Box15.Widget1
connect Box10.Widget Box15.Widget2

# Complex input ports
input fileName Box06.In1 " "

# Complex output ports
output wxbaseviewer2 Box05.wxVtkBaseView2 " "
output wxbaseviewer3 Box05.wxVtkBaseView3 " "
output wxbaseviewer4 Box05.wxVtkBaseView4 " "
output widgetOut Box15.Widget " "
output withslice Box08.Out " "
output boxchange Box05.BoxChange " "
output point Box05.Point " "


endefine