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/boxes/bbIsoSurfaceWidget
   6 include vtk/boxes/bbLoadHola
   7
   8 new IsoSurfaceWidget surface1
   9 new IsoSurfaceWidget surface2
  10
  11 load wxvtk
  12 new Viewer3D viewer
  13 #bad trick, waiting for a bug fix... : load twice the image :-(
  14 new LoadHola image1
  15 //new LoadHola image2
  16
  17 connect image1.Out surface1.In
  18 //connect image2.Out surface2.In
  19 connect image1.Out surface2.In
  20
  21 set surface1.Isovalue 100
  22 set surface1.Opacity 100
  23 set surface1.Colour "0.5 0 0"
  24 set surface1.Title "Iso-surface 1"
  25
  26 set surface2.Isovalue 200
  27 set surface2.Opacity 20
  28 set surface2.Title "Iso-surface 2"
  29
  30
  31 connect surface1.Out viewer.In1
  32 connect surface2.Out viewer.In2
  33 new MultipleInputs refresh
  34 connect surface1.BoxChange refresh.In1
  35 connect surface2.BoxChange refresh.In2
  36
  37 new LayoutLine main
  38 new LayoutLine controls
  39 connect viewer.Widget main.Widget1
  40 connect controls.Widget main.Widget2
  41 connect surface1.Widget controls.Widget1
  42 connect surface2.Widget controls.Widget2
  43
  44 set main.WinWidth 800
  45 set main.WinHeight  800
  46
  47 exec main
  48
  49 # BUG in pipeline update : have to plug forced execution of viewer
  50 # after creation of all windows
  51 connect refresh.Out viewer.BoxExecute