*** empty log message ***

[bbtk.git] / packages / vtk / bbs / appli / ExampleGaussianSmooth_02.bbs

diff --git a/packages/vtk/bbs/appli/ExampleGaussianSmooth_02.bbs b/packages/vtk/bbs/appli/ExampleGaussianSmooth_02.bbs
new file mode 100644 (file)
index 0000000..9d587b0
--- /dev/null
+++ b/packages/vtk/bbs/appli/ExampleGaussianSmooth_02.bbs
@@ -0,0 +1,63 @@
+print "=== GaussianSmooth_02 box example ==="
+description "GaussianSmooth Save box.  Screenshot : <img src=ExampleGaussianSmooth_02.jpg></img>"
+author "eduardo.davila at creatis.insa-lyon.fr"
+category "example"
+
+include wx
+include itk
+include vtk
+include wxvtk
+include itkvtk
+
+new FileSelector fileselectoropen
+  set fileselectoropen.OpenSave "Open" 
+  
+new ImageReader imagereader
+  connect fileselectoropen.Out imagereader.Filename
+
+new Viewer2D viewerleft
+  connect imagereader.Out viewerleft.In
+  
+new Slider slidersmooth
+  set slidersmooth.In 1
+  set slidersmooth.Max 10
+  set slidersmooth.Title "Gaussian smooth "
+    
+new ImageGaussianSmooth smooth
+  connect imagereader.Out smooth.In
+  connect slidersmooth.Out smooth.StdDevX
+  connect slidersmooth.Out smooth.StdDevY
+  connect slidersmooth.Out smooth.StdDevZ
+  connect slidersmooth.BoxChange smooth.BoxExecute
+  
+new Viewer2D viewerright
+  connect smooth.Out viewerright.In
+  connect slidersmooth.BoxChange viewerright.BoxExecute
+  
+new LayoutLine layoutlineviwer
+   set layoutlineviwer.Orientation H
+   connect viewerleft.Widget layoutlineviwer.Widget1
+   connect viewerright.Widget layoutlineviwer.Widget2
+
+new FileSelector fileselectorsave
+  set fileselectorsave.OpenSave "Save" 
+   
+new ImageWriter imagewrite
+    connect smooth.Out imagewrite.In   
+    connect fileselectorsave.Out imagewrite.Filename   
+       
+new CommandButton btnSave
+   set btnSave.Label "Save smooth"   
+   connect btnSave.BoxChange fileselectorsave.BoxExecute 
+   connect btnSave.BoxChange imagewrite.BoxExecute 
+
+new LayoutLine layoutline
+   connect slidersmooth.Widget layoutline.Widget1
+   connect btnSave.Widget layoutline.Widget2
+   
+new LayoutSplit main   
+   connect layoutlineviwer.Widget main.Widget1
+   connect layoutline.Widget main.Widget2
+   
+   
+exec main   
\ No newline at end of file