bbtk_package_creaMiniTools/bbs/boxes/ImageFillByPlane2_Viewer.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.6 BBS BlackBox Script (Complex Box)
   3 # - /Users/davila/Creatis/C23/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/boxes/ImageFillByPlane2_Viewer.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include creaVtk
   9 include vtk
  10 include creaMaracasVisu
  11 include std
  12 include creaMiniTools
  13 include wx
  14
  15 define ImageFillByPlane2_Viewer creaMiniTools
  16
  17 author "Author ??"
  18 description "Description ??"
  19
  20 category "<VOID>"
  21
  22 new creaVtk:MHDFileInfo Box00
  23
  24 new vtk:CreateImage Box01
  25
  26 new vtk:AddImageToVector Box02
  27
  28 new vtk:CreateImage Box03
  29   set Box03.Dimensions "250 250 250"
  30
  31 new vtk:GetVectorVtkImageDataElement Box04
  32   set Box04.I "0"
  33
  34 new creaMaracasVisu:ViewerNV Box05
  35   set Box05.nTypeView "6 1 2 0"
  36
  37 new std:ConcatStrings Box06
  38
  39 new creaMiniTools:ImageFillByPlane2 Box07
  40   set Box07._typeReadMHDPlane "0"
  41
  42 new wx:Slider Box08
  43   set Box08.In "1"
  44   set Box08.Label "true"
  45   set Box08.Max "15"
  46   set Box08.Min "1"
  47   set Box08.Title "Speed"
  48
  49 new wx:InputText Box09
  50   set Box09.In "-100 1000"
  51   set Box09.Title "Range ex: -100 1000   ex: 0 1"
  52
  53 new wx:LayoutLine Box10
  54   set Box10.Orientation "H"
  55
  56 new std:GetVectorStringElement Box11
  57   set Box11.I "0"
  58
  59 new std:GetVectorStringElement Box12
  60   set Box12.I "1"
  61
  62 new wx:OutputText Box13
  63
  64 new wx:OutputText Box14
  65
  66 new wx:LayoutSplit Box15
  67   set Box15.Proportion "90"
  68
  69
  70 connect Box00.DimSize Box01.Dimensions
  71 connect Box00.ElementSpacing Box01.Spacing
  72 connect Box00.ElementType Box01.OutputFormat
  73 connect Box01.Out Box02.In0
  74 connect Box02.Out Box04.In
  75 connect Box03.Out Box04.ErrorValue
  76 connect Box04.Out Box05.In
  77 connect Box06.Out Box00.FileName
  78 connect Box08.Out Box07._widthSlice
  79 connect Box05.BoxChange Box07._boxexecute
  80 connect Box00.DimSize Box07._dimsize
  81 connect Box06.Out Box07._fillename
  82 connect Box04.Out Box07._image
  83 connect Box05.Point Box07._point
  84 connect Box09.Out Box11.In
  85 connect Box09.Out Box12.In
  86 connect Box11.Out Box05.ColorLevel
  87 connect Box12.Out Box05.WindowLevel
  88 connect Box09.Widget Box10.Widget5
  89 connect Box08.Widget Box10.Widget3
  90 connect Box13.Widget Box10.Widget1
  91 connect Box14.Widget Box10.Widget9
  92 connect Box05.Widget Box15.Widget1
  93 connect Box10.Widget Box15.Widget2
  94
  95 # Complex input ports
  96 input fileName Box06.In1 " "
  97
  98 # Complex output ports
  99 output wxbaseviewer2 Box05.wxVtkBaseView2 " "
 100 output wxbaseviewer3 Box05.wxVtkBaseView3 " "
 101 output wxbaseviewer4 Box05.wxVtkBaseView4 " "
 102 output widgetOut Box15.Widget " "
 103 output withslice Box08.Out " "
 104 output boxchange Box05.BoxChange " "
 105 output point Box05.Point " "
 106
 107
 108 endefine