packages/wxvtk/bbs/appli/exampleIsoSurfaceWidget.bbs

   1 description "Example of IsoSurfaceWidget."
   2 author "laurent.guigues at creatis.insa-lyon.fr"
   3 category "example"
   4
   5 include wxvtk
   6
   7 include wxvtk/boxes/bbIsoSurfaceWidget
   8 include vtk/boxes/bbLoadHola
   9
  10 new IsoSurfaceWidget surface1
  11 new IsoSurfaceWidget surface2
  12
  13 //load wxvtk
  14 new Viewer3D viewer
  15 new LoadHola reader1
  16
  17 connect reader1.Out surface1.In
  18 connect reader1.Out surface2.In
  19
  20 set surface1.Isovalue 100
  21 set surface1.Opacity 100
  22 set surface1.Colour "0.5 0 0"
  23 set surface1.Title "Iso-surface 1"
  24
  25 set surface2.Isovalue 200
  26 set surface2.Opacity 20
  27 set surface2.Title "Iso-surface 2"
  28
  29
  30 connect surface1.Out viewer.In1
  31 connect surface2.Out viewer.In2
  32 new MultipleInputs refresh
  33 connect surface1.BoxChange refresh.In1
  34 connect surface2.BoxChange refresh.In2
  35
  36 new LayoutLine main
  37 new LayoutLine controls
  38 connect viewer.Widget main.Widget1
  39 connect controls.Widget main.Widget2
  40 connect surface1.Widget controls.Widget1
  41 connect surface2.Widget controls.Widget2
  42
  43 set main.WinWidth 800
  44 set main.WinHeight  800
  45
  46 exec main
  47
  48 # BUG in pipeline update : have to plug forced execution of viewer
  49 # after creation of all windows
  50 connect refresh.Out viewer.BoxExecute