packages/wxvtk/bbs/appli/exampleIsoSurfaceWithControls.bbs

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