bbtk_creaVtk_PKG/bbs/boxes/CompareImagesByRGB-Widget.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
   3 # - /home/davila/Creatis/C8/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
  78 new wx:LayoutCenter Box28
  79
  80 new vtk:vtkImageDataPointerRelay Box29
  81
  82 new vtk:vtkImageDataPointerRelay Box30
  83
  84
  85 connect Box02.Out Box00.In
  86 connect Box10.LookupTable Box06.ScalarToColors
  87 connect Box05.Out Box19.In0
  88 connect Box13.Out Box19.In1
  89 connect Box18.Out Box20.In
  90 connect Box18.Out Box21.In
  91 connect Box18.Out Box22.In
  92 connect Box19.Out Box23.In
  93 connect Box20.Out Box23.I
  94 connect Box19.Out Box24.In
  95 connect Box19.Out Box25.In
  96 connect Box21.Out Box24.I
  97 connect Box22.Out Box25.I
  98 connect Box23.Out Box02.In0
  99 connect Box24.Out Box02.In1
 100 connect Box25.Out Box02.In2
 101 connect Box26.Out Box18.In
 102 connect Box00.Widget Box07.Widget1
 103 connect Box26.Widget Box28.Widget2
 104 connect Box28.Widget Box07.Widget2
 105 connect Box00.wxVtkBaseView1 Box06.BaseView1
 106 connect Box00.wxVtkBaseView2 Box06.BaseView2
 107 connect Box00.wxVtkBaseView3 Box06.BaseView3
 108 connect Box29.Out Box05.In
 109 connect Box30.Out Box13.In
 110 connect Box26.BoxChange Box06.BoxExecute
 111
 112 # Complex input ports
 113 input Image1 Box29.In " "
 114 input Image2 Box30.In " "
 115
 116 # Complex output ports
 117 output OutWidget Box07.Widget " "
 118
 119
 120 endefine