bbtk_creaVtk_PKG/bbs/boxes/CompareImagesByRGB-Widget.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.6 BBS BlackBox Script (Complex Box)
   3 # - /Users/davila/Creatis/C23/creatools_source/creaVtk/bbtk_creaVtk_PKG/bbs/boxes/CompareImagesByRGB-Widget.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include creaMaracasVisu
   9 include creaVtk
  10 include vtk
  11 include wx
  12 include std
  13 include PackRecalage
  14
  15 define CompareImagesByRGB-Widget creaVtk
  16
  17 author "Author ??"
  18 description "Description ??"
  19
  20 category "<VOID>"
  21
  22 new creaMaracasVisu:ViewerNV Box00
  23   set Box00.nTypeView "1  2 0"
  24
  25 new creaVtk:ImageAppendComponents Box02
  26
  27 new vtk:RescaleSlopeIntercept Box05
  28   set Box05.A "0"
  29   set Box05.B "255"
  30   set Box05.OutputFormat "VTK_UNSIGNED_CHAR"
  31   set Box05.Type "2"
  32
  33 new creaMaracasVisu:SetwxVtkBaseViewLookupTable Box06
  34
  35 new wx:LayoutSplit Box07
  36   set Box07.Proportion "90"
  37
  38 new creaVtk:ScalarsToColors Box10
  39   set Box10.Type "3"
  40
  41 new vtk:RescaleSlopeIntercept Box13
  42   set Box13.A "0"
  43   set Box13.B "255"
  44   set Box13.OutputFormat "VTK_UNSIGNED_CHAR"
  45   set Box13.Type "2"
  46
  47 new std:StringSelect Box18
  48   set Box18.In0 "1 1 1"
  49   set Box18.In1 "0 0 0"
  50   set Box18.In2 "1 0 0"
  51   set Box18.In3 "0 1 0"
  52   set Box18.In4 "0 0 1"
  53   set Box18.In5 "1 1 0"
  54   set Box18.In6 "1 0 1"
  55   set Box18.In7 "0 1 1"
  56
  57 new PackRecalage:AddImageToVector Box19
  58
  59 new std:GetVectorStringElement Box20
  60   set Box20.I "0"
  61
  62 new std:GetVectorStringElement Box21
  63   set Box21.I "1"
  64
  65 new std:GetVectorStringElement Box22
  66   set Box22.I "2"
  67
  68 new vtk:GetVectorVtkImageDataElement Box23
  69
  70 new vtk:GetVectorVtkImageDataElement Box24
  71
  72 new vtk:GetVectorVtkImageDataElement Box25
  73
  74 new wx:Slider Box26
  75   set Box26.Max "7"
  76   set Box26.Min "0"
  77   set Box26.ReactiveOnTrack "true"
  78
  79 new vtk:vtkImageDataPointerRelay Box29
  80
  81 new vtk:vtkImageDataPointerRelay Box30
  82
  83 new wx:LayoutLine Box31
  84   set Box31.Orientation "H"
  85
  86 new wx:CheckBox Box32
  87   set Box32.Title "Interpolation"
  88
  89 new std:MagicBox Box33
  90
  91 new std:MultipleInputs Box34
  92
  93
  94 connect Box02.Out Box00.In
  95 connect Box10.LookupTable Box06.ScalarToColors
  96 connect Box05.Out Box19.In0
  97 connect Box13.Out Box19.In1
  98 connect Box18.Out Box20.In
  99 connect Box18.Out Box21.In
 100 connect Box18.Out Box22.In
 101 connect Box19.Out Box23.In
 102 connect Box20.Out Box23.I
 103 connect Box19.Out Box24.In
 104 connect Box19.Out Box25.In
 105 connect Box21.Out Box24.I
 106 connect Box22.Out Box25.I
 107 connect Box23.Out Box02.In0
 108 connect Box24.Out Box02.In1
 109 connect Box25.Out Box02.In2
 110 connect Box26.Out Box18.In
 111 connect Box00.wxVtkBaseView1 Box06.BaseView1
 112 connect Box00.wxVtkBaseView2 Box06.BaseView2
 113 connect Box00.wxVtkBaseView3 Box06.BaseView3
 114 connect Box29.Out Box05.In
 115 connect Box30.Out Box13.In
 116 connect Box26.Widget Box31.Widget1
 117 connect Box32.Widget Box31.Widget2
 118 connect Box32.Out Box00.Interpolate
 119 connect Box32.BoxChange Box00.BoxExecute
 120 connect Box00.Widget Box07.Widget1
 121 connect Box31.Widget Box07.Widget2
 122 connect Box26.BoxChange Box34.In1
 123 connect Box34.BoxChange Box06.BoxExecute
 124 connect Box33.BoxChange Box34.In2
 125
 126 # Complex input ports
 127 input Image1 Box29.In " "
 128 input Image2 Box30.In " "
 129 input boxExecute Box33.BoxExecute " "
 130
 131 # Complex output ports
 132 output OutWidget Box07.Widget " "
 133
 134
 135 endefine