packages/wxvtk/bbs/appli/wxvtkTour.bbs

   1 description "A tour of wxvtk boxes"
   2 author "laurent.guigues@creatis.insa-lyon.fr"
   3 category "demo"
   4
   5 # put all include before or will be within echo 2 and generate many messages...
   6 include wxvtk
   7 include vtk
   8 include std
   9
  10 # To avoid getting textual help
  11 message Help 0
  12
  13 #==================================================================
  14 print " "
  15 print "====================================="
  16 print "A simple 2D viewer"
  17 print "====================================="
  18 help Viewer2D
  19 message echo 2
  20
  21 new LoadHola image
  22 new Viewer2D viewer
  23 connect image.Out viewer.In
  24 set viewer.Slice 20
  25 set viewer.WinDialog true
  26 exec viewer
  27
  28 message echo 0
  29 clear
  30 print " "
  31 print "====================================="
  32 print "A simple 2D slicer"
  33 print "====================================="
  34 help SimpleSlicer
  35 message echo 2
  36
  37 new LoadHola image
  38 new SimpleSlicer viewer
  39 connect image.Out viewer.In
  40 set viewer.WinDialog true
  41 exec viewer
  42
  43 message echo 0
  44 clear
  45 print " "
  46 print "====================================="
  47 print "A double 2D slicer"
  48 print "====================================="
  49 help DoubleSlicer
  50 message echo 2
  51
  52 new LoadHola image
  53 new DoubleSlicer viewer
  54 connect image.Out viewer.In1
  55 connect image.Out viewer.In2
  56 set viewer.WinDialog true
  57 exec viewer
  58
  59 message echo 0
  60 clear
  61 print " "
  62 print "====================================="
  63 print "Slicing an image in 3D"
  64 print "====================================="
  65 help ImagePlanes
  66 message echo 2
  67
  68
  69 new LoadHola image
  70 new ImagePlanes planes
  71 new Viewer3D viewer
  72 connect image.Out planes.In
  73 connect planes.PlaneX viewer.Obs1
  74 connect planes.PlaneY viewer.Obs2
  75 connect planes.PlaneZ viewer.Obs3
  76 set viewer.WinDialog true
  77 exec viewer
  78
  79 message echo 0
  80 clear
  81 print " "
  82 print "====================================="
  83 print "Viewing an iso-surface of an image in 3D"
  84 print "====================================="
  85 help SimpleIsoSurfaceViewer
  86 message echo 2
  87
  88 new LoadHola image
  89 new SimpleIsoSurfaceViewer viewer
  90 connect image.Out viewer.In
  91 set viewer.WinDialog true
  92 exec viewer
  93
  94 message echo 0
  95 clear
  96 print " "
  97 print "====================================="
  98 print "Viewing both 3 slices and an iso-surface of an image in 3D"
  99 print "====================================="
 100 help IsoSurfaceWithControls
 101 message echo 2
 102
 103 new LoadHola image
 104 new Viewer3D viewer
 105 new ImagePlanes planes
 106 connect image.Out planes.In
 107 connect planes.PlaneX viewer.Obs1
 108 connect planes.PlaneY viewer.Obs2
 109 connect planes.PlaneZ viewer.Obs3
 110 new IsoSurfaceWithControls isosurface
 111 connect image.Out isosurface.In
 112 connect isosurface.Out viewer.In1
 113 connect isosurface.BoxChange viewer.BoxExecute
 114
 115 new LayoutSplit main
 116 connect viewer.Widget main.Widget1
 117 connect isosurface.Widget main.Widget2
 118 set main.Proportion 70
 119 set main.WinDialog true
 120 exec main
 121
 122 message echo 0
 123 clear
 124 print " "
 125 print "====================================="
 126 print "A simple MIP"
 127 print "====================================="
 128 help MIPWithControls
 129 message echo 2
 130
 131 new LoadHola image
 132 new Viewer3D viewer
 133 new MIPWithControls MIP
 134
 135 connect image.Out MIP.In
 136 connect MIP.Out viewer.In1
 137 connect MIP.BoxChange viewer.BoxExecute
 138
 139 new LayoutSplit main
 140 connect viewer.Widget main.Widget1
 141 connect MIP.Widget main.Widget2
 142 set main.Proportion 70
 143 set main.WinDialog true
 144 exec main
 145
 146 message echo 0
 147 message Help 1
 148 clear
 149 print " "
 150 print "====================================="
 151 print " END OF TOUR"
 152 print "====================================="