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 MultipleInputs mi2
  68
  69 new LayoutLine Box13
  70
  71 new Add Box14
  72   set Box14.In2 -1
  73
  74 new Add Box15
  75   set Box15.In2 -1
  76
  77 new Add Box16
  78   set Box16.In2 -1
  79
  80
  81 connect mc.Size gveX.In
  82 connect mc.Size gveY.In
  83 connect mc.Size gveZ.In
  84 connect gveX.Out xMin.Max
  85 connect mb.Out xMin.ReactiveOnTrack
  86 connect mb.Out xMax.ReactiveOnTrack
  87 connect gveY.Out yMin.Max
  88 connect mb.Out yMin.ReactiveOnTrack
  89 connect mb.Out yMax.ReactiveOnTrack
  90 connect mb.Out zMin.ReactiveOnTrack
  91 connect mi1.BoxChange mi2.In1
  92 connect xMin.BoxChange mi1.In1
  93 connect xMax.BoxChange mi1.In2
  94 connect yMin.BoxChange mi1.In3
  95 connect yMax.BoxChange mi1.In4
  96 connect zMin.BoxChange mi1.In5
  97 connect zMax.BoxChange mi2.In2
  98 connect gveZ.Out zMin.Max
  99 connect xMin.Widget Box13.Widget1
 100 connect xMax.Widget Box13.Widget2
 101 connect yMin.Widget Box13.Widget3
 102 connect yMax.Widget Box13.Widget4
 103 connect zMin.Widget Box13.Widget5
 104 connect zMax.Widget Box13.Widget6
 105 connect mb.Out zMax.ReactiveOnTrack
 106 connect gveX.Out Box16.In1
 107 connect Box15.Out yMax.Max
 108 connect gveY.Out Box15.In1
 109 connect gveZ.Out Box14.In1
 110 connect Box15.Out yMax.In
 111 connect Box16.Out xMax.In
 112 connect Box16.Out xMax.Max
 113 connect Box14.Out zMax.In
 114 connect Box14.Out zMax.Max
 115
 116
 117 # Complex input ports
 118 input In mc.In " "
 119 input ReactiveOnTrack mb.In " "
 120
 121 # Complex output ports
 122 output XMin xMin.Out " "
 123 output XMax xMax.Out " "
 124 output YMin yMin.Out " "
 125 output YMax yMax.Out " "
 126 output ZMin zMin.Out " "
 127 output ZMax zMax.Out " "
 128 output BoxChange mi2.BoxChange " "
 129 output Wigdet Box13.Widget " "
 130
 131 endefine