#3008 BBTK Feature New Normal - Active option in box vtk::IsoSurfaceExtractor

[bbtk.git] / packages / wxvtk / bbs / boxes / bbIsoSurfaceWidget.bbs

diff --git a/packages/wxvtk/bbs/boxes/bbIsoSurfaceWidget.bbs b/packages/wxvtk/bbs/boxes/bbIsoSurfaceWidget.bbs
index 6c25ef9740ff50f7d0eda1b1087a3c77b928532b..79599779d0737130b85ebdf1b43510097fd280a6 100644 (file)
--- a/packages/wxvtk/bbs/boxes/bbIsoSurfaceWidget.bbs
+++ b/packages/wxvtk/bbs/boxes/bbIsoSurfaceWidget.bbs
@@ -1,6 +1,6 @@
 # ----------------------------------
 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
 # ----------------------------------
 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)

-# - /home/davila/Creatis/creaTools/creatools_install/bin/../share/bbtk/bbs/wxvtk/boxes/bbIsoSurfaceWidget.bbs
+# - /tmpEED/creaTools/creatools_source/bbtk/packages/wxvtk/bbs/boxes/bbIsoSurfaceWidget.bbs

 # ----------------------------------
 
 include std
 # ----------------------------------
 
 include std


@@ -16,51 +16,60 @@ description "Image iso-surface extractor (vtk"
 
 category "image;mesh;widget;viewer"
 
 
 category "image;mesh;widget;viewer"
 

-new LayoutLine controls
+new wx:LayoutLine controls

   set controls.Orientation "HORIZONTAL"
 
   set controls.Orientation "HORIZONTAL"
 

-new IsoSurfaceExtractor surface
+new vtk:IsoSurfaceExtractor Asurface

 
 

-new Slider isovalue
+new wx:Slider isovalue

   set isovalue.ChangeResolution "true"
   set isovalue.Max "5000"
   set isovalue.Title "Isovalue"
 
   set isovalue.ChangeResolution "true"
   set isovalue.Max "5000"
   set isovalue.Title "Isovalue"
 

-new Slider opacity
+new wx:Slider opacity

   set opacity.In "100"
   set opacity.Max "100"
   set opacity.Min "0"
   set opacity.ReactiveOnTrack "true"
   set opacity.Title "Opacity"
 
   set opacity.In "100"
   set opacity.Max "100"
   set opacity.Min "0"
   set opacity.ReactiveOnTrack "true"
   set opacity.Title "Opacity"
 

-new ColourSelectorButton colour
+new wx:ColourSelectorButton colour

 
 

-new MultipleInputs refresh
+new std:MultipleInputs refresh

 
 

-new Div div
-  set div.In2 "100"
+new std:Div Adiv
+  set Adiv.In2 "100"

 
 

-new UpdateRender Box08
+new vtk:UpdateRender Box08

   set Box08.Active "true"
 
   set Box08.Active "true"
 

-new MagicBox Box09
+new std:MagicBox Box09

 
 

+new wx:CheckBox Box10
+  set Box10.In "false"
+  set Box10.ReactiveOnKeystroke "true"
+  set Box10.Title "Active"

 
 

-connect isovalue.Out surface.Isovalue
-connect opacity.Out div.In1
-connect div.Out surface.Opacity
-connect colour.Out surface.Colour
+
+connect isovalue.Out Asurface.Isovalue
+connect opacity.Out Adiv.In1
+connect Adiv.Out Asurface.Opacity
+connect colour.Out Asurface.Colour

 connect isovalue.BoxChange refresh.In1
 connect opacity.BoxChange refresh.In2
 connect isovalue.BoxChange refresh.In1
 connect opacity.BoxChange refresh.In2

-connect colour.BoxChange refresh.In3
-connect colour.Widget controls.Widget3
-connect isovalue.Widget controls.Widget1
-connect opacity.Widget controls.Widget2
-connect Box09.Out surface.Renderer
+connect Box09.Out Asurface.Renderer

 connect Box09.Out Box08.Renderer
 connect Box09.Out Box08.Renderer

-connect refresh.Out Box08.BoxExecute
-connect refresh.Out surface.BoxExecute

 connect opacity.BoxChange refresh.BoxExecute
 connect opacity.BoxChange refresh.BoxExecute

+connect refresh.BoxChange Asurface.BoxExecute
+connect refresh.BoxChange Box08.BoxExecute
+connect refresh.BoxChange Adiv.BoxExecute
+connect colour.BoxChange refresh.In3
+connect Box10.BoxChange refresh.In5
+connect Box10.Out Asurface.active
+connect colour.Widget controls.Widget4
+connect opacity.Widget controls.Widget3
+connect isovalue.Widget controls.Widget2
+connect Box10.Widget controls.Widget1

 
 # Complex input ports
 input Title controls.WinTitle " "
 
 # Complex input ports
 input Title controls.WinTitle " "


@@ -69,14 +78,15 @@ input Isovalue isovalue.In " "
 input Colour colour.In " "
 input Vertical controls.Orientation " "
 input BoxExecute refresh.In4 " "
 input Colour colour.In " "
 input Vertical controls.Orientation " "
 input BoxExecute refresh.In4 " "

-input In surface.In " "
+input In Asurface.In " "

 input maxIsovalue isovalue.Max " "
 input vtkRenderer Box09.In " "
 
 # Complex output ports
 input maxIsovalue isovalue.Max " "
 input vtkRenderer Box09.In " "
 
 # Complex output ports

-output Out surface.Out " "
+output Out Asurface.Out " "

 output Widget controls.Widget " "
 output Widget controls.Widget " "

-output BoxChange refresh.Out " "
+output BoxChange refresh.BoxChange " "

 
 

+message    

 
 endefine
 
 endefine