*** empty log message ***

[bbtk.git] / packages / wxvtk / bbs / appli / exampleIsoSurfaceWithControls.bbs

diff --git a/packages/wxvtk/bbs/appli/exampleIsoSurfaceWithControls.bbs b/packages/wxvtk/bbs/appli/exampleIsoSurfaceWithControls.bbs
index b5c85967bf34a3882f6c3892c749407f2b4c1f65..6ff4bcf617ffc2793cb375378825fa97104f4118 100644 (file)
--- a/packages/wxvtk/bbs/appli/exampleIsoSurfaceWithControls.bbs
+++ b/packages/wxvtk/bbs/appli/exampleIsoSurfaceWithControls.bbs
@@ -10,36 +10,42 @@ new IsoSurfaceWithControls surface2
 
 load wxvtk
 new Viewer3D viewer
 
 load wxvtk
 new Viewer3D viewer

-new LoadHola image
+#bad trick, waiting for a bug fix... : load twice the image :-(
+new LoadHola image1
+//new LoadHola image2
+
+connect image1.Out surface1.In
+//connect image2.Out surface2.In
+connect image1.Out surface2.In
+
+set surface1.Isovalue 100
+set surface1.Opacity 100
+set surface1.Colour "0.5 0 0"
+set surface1.Title "Iso-surface 1"
+
+set surface2.Isovalue 200
+set surface2.Opacity 20
+set surface2.Title "Iso-surface 2"
+

 
 

-connect image.Out surface1.In
-connect image.Out surface2.In

 connect surface1.Out viewer.In1
 connect surface2.Out viewer.In2
 new MultipleInputs refresh
 connect surface1.BoxChange refresh.In1
 connect surface2.BoxChange refresh.In2
 connect surface1.Out viewer.In1
 connect surface2.Out viewer.In2
 new MultipleInputs refresh
 connect surface1.BoxChange refresh.In1
 connect surface2.BoxChange refresh.In2

-connect refresh.Out viewer.BoxExecute

 
 

-new LayoutSplit main
+new LayoutLine main

 new LayoutLine controls
 connect viewer.Widget main.Widget1
 connect controls.Widget main.Widget2 
 connect surface1.Widget controls.Widget1 
 connect surface2.Widget controls.Widget2
 
 new LayoutLine controls
 connect viewer.Widget main.Widget1
 connect controls.Widget main.Widget2 
 connect surface1.Widget controls.Widget1 
 connect surface2.Widget controls.Widget2
 

+set main.WinWidth 800
+set main.WinHeight  800

 
 

-set surface1.Isovalue 100
-set surface1.Opacity 100
-set surface1.Colour "0.5 0 0"
-set surface1.Title "Iso-surface 1"
-
-set surface2.Isovalue 200
-set surface2.Opacity 20
-set surface2.Title "Iso-surface 2"
-
-set main.WinWidth 1200
-set main.WinHide  1000
-
-#message All 9

 exec main
 exec main

+
+# BUG in pipeline update : have to plug forced execution of viewer 
+# after creation of all windows
+connect refresh.Out viewer.BoxExecute