bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
   3 # - /home/davila/Creatis/creaTools/creatools_source/creaVtk/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include wx
   9 include std
  10
  11 define PlaneVectorViso_Interface creaVtk
  12
  13 author "Author ??"
  14 description "Description ??"
  15
  16 category "<VOID>"
  17
  18 new Slider Box00
  19   set Box00.In "30"
  20   set Box00.Label "true"
  21   set Box00.Max "100"
  22   set Box00.Min "1"
  23   set Box00.ReactiveOnTrack "True"
  24   set Box00.Title "Plane Resolution"
  25
  26 new CheckBox Box01
  27   set Box01.In "false"
  28   set Box01.ReactiveOnKeystroke "true"
  29   set Box01.Title "Plane control"
  30
  31 new MultipleInputs Box02
  32   set Box02.BoxProcessMode "Reactive"
  33
  34 new LayoutLine Box03
  35   set Box03.WinTitle "Plane flield"
  36
  37 new LayoutTab Box04
  38
  39 new CheckBox Box05
  40   set Box05.ReactiveOnKeystroke "true"
  41   set Box05.Title "Active Vectors"
  42
  43 new Slider Box06
  44   set Box06.In "100"
  45   set Box06.Label "true"
  46   set Box06.Max "100"
  47   set Box06.Min "0"
  48   set Box06.ReactiveOnTrack "True"
  49   set Box06.Title "Opacity"
  50
  51 new Div Box07
  52   set Box07.In2 "100.0"
  53
  54 new Slider Box08
  55   set Box08.ChangeResolution "true"
  56   set Box08.In "100"
  57   set Box08.Label "true"
  58   set Box08.Max "500000"
  59   set Box08.Min "1"
  60   set Box08.ReactiveOnTrack "True"
  61   set Box08.Title "Scale Factor"
  62
  63 new Div Box09
  64   set Box09.In2 "100.0"
  65
  66 new LayoutLine Box10
  67   set Box10.Orientation "H"
  68
  69 new LayoutLine Box11
  70   set Box11.Orientation "H"
  71
  72 new ComboBox Box12
  73   set Box12.In "A B C"
  74   set Box12.Title "Form"
  75
  76 new LayoutLine Box13
  77   set Box13.Orientation "H"
  78
  79 new ExecSystemCommand Box14
  80   set Box14.In "echo mmmmmmmmm"
  81
  82 new SharedMemory Box15
  83
  84 new ExecSystemCommand Box16
  85   set Box16.In "echo m2m2m2m2m2m2m2m2m"
  86
  87
  88 connect Box00.BoxChange Box02.In1
  89 connect Box01.BoxChange Box02.In2
  90 connect Box03.Widget Box04.Widget1
  91 connect Box05.BoxChange Box02.In3
  92 connect Box06.Out Box07.In1
  93 connect Box08.Out Box09.In1
  94 connect Box06.BoxChange Box02.In4
  95 connect Box08.BoxChange Box02.In5
  96 connect Box01.Widget Box10.Widget1
  97 connect Box05.Widget Box10.Widget2
  98 connect Box00.Widget Box11.Widget1
  99 connect Box06.Widget Box11.Widget2
 100 connect Box10.Widget Box03.Widget1
 101 connect Box11.Widget Box03.Widget2
 102 connect Box08.Widget Box13.Widget1
 103 connect Box12.Widget Box13.Widget2
 104 connect Box13.Widget Box03.Widget3
 105 connect Box12.BoxChange Box02.In6
 106 connect Box02.Out Box14.BoxExecute
 107 connect Box15.Out Box16.BoxExecute
 108 connect Box00.BoxChange Box15.In
 109 connect Box01.BoxChange Box15.In1
 110 connect Box05.BoxChange Box15.In2
 111 connect Box06.BoxChange Box15.In3
 112 connect Box08.BoxChange Box15.In4
 113 connect Box12.BoxChange Box15.In5
 114 connect Box15.BoxChange Box04.BoxExecute
 115
 116 # Complex input ports
 117 input typeFormsStr Box12.In " "
 118
 119 # Complex output ports
 120 output widget Box04.Widget " "
 121 output ActivePlaneControl Box01.Out " "
 122 output AcitiveVector Box05.Out " "
 123 output Opacity Box07.Out " "
 124 output ScaleFactor Box09.Out " "
 125 output Ratio Box00.Out " "
 126 output typeForm Box12.Out " "
 127 output boxChange Box15.BoxChange " "
 128
 129
 130 endefine