packages/toolsbbtk/bbs/boxes/bbSlidersForSize.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.2 BBS BlackBox Script (Complex Box)
   3 # - /home/jpr/Creatis/All/creatools_source/bbtk/packages/toolsbbtk/bbs/boxes/bbSlidersForSize.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include itk
   9 include std
  10 include wx
  11
  12 define SlidersForSize toolsbbtk
  13
  14 author "jean-pierre.roux@creatis.univ-lyon1.fr"
  15 description "Display 6 sliders for sizes of 3D image"
  16
  17 category "complex box, widget"
  18
  19 new ImageProperties mc
  20
  21 new GetVectorIntElement gveX
  22   set gveX.I "0"
  23
  24 new GetVectorIntElement gveY
  25   set gveY.I "1"
  26
  27 new GetVectorIntElement gveZ
  28   set gveZ.I "2"
  29
  30 new MagicBox mb
  31
  32 new Slider xMin
  33   set xMin.In 0
  34   set xMin.Label "1"
  35   set xMin.Min "0"
  36   set xMin.Title "XMin"
  37
  38 new Slider xMax
  39   set xMax.Label "1"
  40   set xMax.Min "0"
  41   set xMax.Title "XMax"
  42
  43 new Slider yMin
  44   set yMin.In 0
  45   set yMin.Label "1"
  46   set yMin.Min "0"
  47   set yMin.Title "YMin"
  48
  49 new Slider yMax
  50   set yMax.Label "1"
  51   set yMax.Min "0"
  52   set yMax.Title "YMax"
  53
  54 new Slider zMin
  55   set zMin.In 0
  56   set zMin.Label "1"
  57   set zMin.Min "0"
  58   set zMin.Title "ZMin"
  59
  60 new Slider zMax
  61   set zMax.Label "1"
  62   set zMax.Min "0"
  63   set zMax.Title "ZMax"
  64
  65 new MultipleInputs mi1
  66
  67 new LayoutLine Box13
  68
  69 new Add Box14
  70   set Box14.In2 -1
  71
  72 new Add Box15
  73   set Box15.In2 -1
  74
  75 new Add Box16
  76   set Box16.In2 -1
  77
  78
  79 connect mc.Size gveX.In
  80 connect mc.Size gveY.In
  81 connect mc.Size gveZ.In
  82 connect gveX.Out xMin.Max
  83 connect mb.Out xMin.ReactiveOnTrack
  84 connect mb.Out xMax.ReactiveOnTrack
  85 connect gveY.Out yMin.Max
  86 connect mb.Out yMin.ReactiveOnTrack
  87 connect mb.Out yMax.ReactiveOnTrack
  88 connect mb.Out zMin.ReactiveOnTrack
  89 connect xMin.BoxChange mi1.In1
  90 connect xMax.BoxChange mi1.In2
  91 connect yMin.BoxChange mi1.In3
  92 connect yMax.BoxChange mi1.In4
  93 connect zMin.BoxChange mi1.In5
  94 connect gveZ.Out zMin.Max
  95 connect xMin.Widget Box13.Widget1
  96 connect xMax.Widget Box13.Widget2
  97 connect yMin.Widget Box13.Widget3
  98 connect yMax.Widget Box13.Widget4
  99 connect zMin.Widget Box13.Widget5
 100 connect zMax.Widget Box13.Widget6
 101 connect mb.Out zMax.ReactiveOnTrack
 102 connect gveX.Out Box16.In1
 103 connect Box15.Out yMax.Max
 104 connect gveY.Out Box15.In1
 105 connect gveZ.Out Box14.In1
 106 connect Box15.Out yMax.In
 107 connect Box16.Out xMax.In
 108 connect Box16.Out xMax.Max
 109 connect Box14.Out zMax.In
 110 connect Box14.Out zMax.Max
 111 connect zMax.BoxChange mi1.In6
 112
 113
 114 # Complex input ports
 115 input In mc.In " "
 116 input ReactiveOnTrack mb.In " "
 117
 118 # Complex output ports
 119 output XMin xMin.Out " "
 120 output XMax xMax.Out " "
 121 output YMin yMin.Out " "
 122 output YMax yMax.Out " "
 123 output ZMin zMin.Out " "
 124 output ZMax zMax.Out " "
 125 output Wigdet Box13.Widget " "
 126 output BoxChange mi1.BoxChange " "
 127
 128 endefine