#3100 creaVtk Feature New Normal - Vectors Visu refresh

[creaVtk.git] / bbtk_creaVtk_PKG / bbs / boxes / PlaneVectorVisu_Interface.bbs

diff --git a/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs b/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs
index 935067b6417bc0b65f7d334e8db8d6130a56aaa4..b9ceaf1118bbb7b7f489230ac0fea9a71f748fbb 100644 (file)
--- a/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs
+++ b/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs
@@ -1,6 +1,6 @@
 # ----------------------------------
 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
-# - /home/davila/Creatis/creaVtk/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs
+# - creaVtk/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs
 # ----------------------------------
 
 include std
@@ -15,79 +15,99 @@ description "Description ??"
 
 category "<VOID>"
 
-new Slider Box00
+new wx:Slider Box00
   set Box00.In "30"
   set Box00.Label "true"
   set Box00.Max "100"
   set Box00.Min "1"
-  set Box00.ReactiveOnTrack "true"
+  set Box00.ReactiveOnTrack "True"
   set Box00.Title "Plane Resolution"
 
-new CheckBox Box01
+new wx:CheckBox Box01
   set Box01.In "false"
   set Box01.ReactiveOnKeystroke "true"
   set Box01.Title "Plane control"
 
-new MultipleInputs Box02
-  set Box02.BoxProcessMode "Reactive"
-
-new LayoutLine Box03
+new wx:LayoutLine Box03
   set Box03.WinTitle "Plane flield"
 
-new LayoutTab Box04
+new wx:LayoutTab Box04
 
-new CheckBox Box05
+new wx:CheckBox Box05
   set Box05.ReactiveOnKeystroke "true"
   set Box05.Title "Active Vectors"
 
-new Slider Box06
+new wx:Slider Box06
   set Box06.In "100"
   set Box06.Label "true"
   set Box06.Max "100"
   set Box06.Min "0"
-  set Box06.ReactiveOnTrack "true"
+  set Box06.ReactiveOnTrack "True"
   set Box06.Title "Opacity"
 
-new Div Box07
+new std:Div Box07
   set Box07.In2 "100.0"
 
-new Slider Box08
+new wx:Slider Box08
   set Box08.ChangeResolution "true"
   set Box08.In "100"
   set Box08.Label "true"
   set Box08.Max "500000"
   set Box08.Min "1"
-  set Box08.ReactiveOnTrack "true"
+  set Box08.ReactiveOnTrack "True"
   set Box08.Title "Scale Factor"
 
-new Div Box09
+new std:Div Box09
   set Box09.In2 "100.0"
 
+new wx:LayoutLine Box10
+  set Box10.Orientation "H"
+
+new wx:LayoutLine Box11
+  set Box11.Orientation "H"
+
+new wx:ComboBox Box12
+  set Box12.In "A B C"
+  set Box12.Title "Form"
+
+new wx:LayoutLine Box13
+  set Box13.Orientation "H"
+
+new std:SharedMemory Box15
+
 
-connect Box00.BoxChange Box02.In1
-connect Box01.BoxChange Box02.In2
-connect Box01.Widget Box03.Widget1
-connect Box00.Widget Box03.Widget2
 connect Box03.Widget Box04.Widget1
-connect Box05.Widget Box03.Widget3
-connect Box05.BoxChange Box02.In3
-connect Box06.Widget Box03.Widget4
 connect Box06.Out Box07.In1
 connect Box08.Out Box09.In1
-connect Box06.BoxChange Box02.In4
-connect Box08.BoxChange Box02.In5
-connect Box08.Widget Box03.Widget5
+connect Box01.Widget Box10.Widget1
+connect Box05.Widget Box10.Widget2
+connect Box00.Widget Box11.Widget1
+connect Box06.Widget Box11.Widget2
+connect Box10.Widget Box03.Widget1
+connect Box11.Widget Box03.Widget2
+connect Box08.Widget Box13.Widget1
+connect Box12.Widget Box13.Widget2
+connect Box13.Widget Box03.Widget3
+connect Box00.BoxChange Box15.In
+connect Box01.BoxChange Box15.In1
+connect Box05.BoxChange Box15.In2
+connect Box06.BoxChange Box15.In3
+connect Box08.BoxChange Box15.In4
+connect Box12.BoxChange Box15.In5
+connect Box15.BoxChange Box04.BoxExecute
 
 # Complex input ports
+input typeFormsStr Box12.In " "
 
 # Complex output ports
-output boxChange Box02.BoxChange " "
 output widget Box04.Widget " "
 output ActivePlaneControl Box01.Out " "
 output AcitiveVector Box05.Out " "
 output Opacity Box07.Out " "
 output ScaleFactor Box09.Out " "
 output Ratio Box00.Out " "
+output typeForm Box12.Out " "
+output boxChange Box15.BoxChange " "
 
 
 endefine