#3219 creaMaracasVisu Feature New Normal - vtk8itk4wx3-mingw64

[creaMaracasVisu.git] / bbtk / bbs / appli / exampleCutModule2.bbs

diff --git a/bbtk/bbs/appli/exampleCutModule2.bbs b/bbtk/bbs/appli/exampleCutModule2.bbs
index f56e729a1cc6c51663a5d0172dee22308f79c717..6fa9ab103aa222168b86aa047696791e6137377d 100644 (file)
--- a/bbtk/bbs/appli/exampleCutModule2.bbs
+++ b/bbtk/bbs/appli/exampleCutModule2.bbs
@@ -1,73 +1,99 @@
-load vtk
-load wxvtk
-load creaMaracasVisu
-load std
-load wx
-
-new FileSelector filselect0
-       set filselect0.Message "Select image"
-       set filselect0.Wildcard "*.mhd"
-       #set filselect0.DefaultDir "C:\Creatis\creaAppli\Data\Images"           
-new MetaImageReader gimm       
-                       connect filselect0.Out gimm.In
-new ImageCastToUShort image
-       connect gimm.Out image.In       
-
-new VolumeRendering volrend
-                connect image.Out volrend.In1
-new SurfaceRendering surrend   
-              # connect image.Out surrend.In0
-
-new ViewerNV view1
-set view1.nTypeView 6
-                connect gimm.Out view1.In
-       
-new CutModule2 cut
-       connect view1.Interactor1 cut.Interactor
-       connect view1.Renderer1 cut.Renderer
-       connect image.Out cut.In
-       
-new ViewerNV view2
-       set view2.nTypeView 6
-       connect image.Out view2.In
-
-connect view1.BoxChange cut.BoxExecute 
-
-new LayoutSplit layoutsplit1
-                set layoutsplit1.Orientation V
-                connect volrend.Widget layoutsplit1.Widget1
-                connect surrend.Widget layoutsplit1.Widget2
-
-                new LayoutSplit layoutsplit2
-                                       set layoutsplit2.Orientation H
-                                connect layoutsplit1.Widget layoutsplit2.Widget1
-                                #connect view1.Widget layoutsplit2.Widget2
-
-                new LayoutTab laytab
-                                connect laytab.Widget layoutsplit2.Widget2 
-                                connect view1.Widget laytab.Widget2
-                       connect view2.Widget laytab.Widget1   
-
-new LayoutLine layoutline1     
-       connect cut.Widget layoutline1.Widget1  
-       
-new LayoutSplit layoutsplit3
-       set layoutsplit3.Orientation H
-       set layoutsplit3.Proportion 80
-                set layoutsplit3.WinTitle "Cutting Tool"
-       connect layoutline1.Widget layoutsplit3.Widget2 
-       connect layoutsplit2.Widget layoutsplit3.Widget1
-       
-exec layoutsplit3
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script
+# - /tmpEED/creaTools2/creatools_source/creaMaracasVisu/bbtk/bbs/appli/exampleCutModule2.bbs
+# ----------------------------------
+
+# BBTK GEditor Script
+# ----------------------
+
+include std
+include itkvtk
+include wx
+include vtk
+include creaMaracasVisu
+
+author "Author ??"
+description "Description ??"
+category "<VOID>"
+
+new wx:FileSelector filselect0
+  set filselect0.Message "Select image"
+  set filselect0.Wildcard "*.mhd"
+
+new vtk:MetaImageReader gimm
+
+new vtk:ImageCastToUShort image
+
+new creaMaracasVisu:VolumeRendering volrend
+
+new creaMaracasVisu:SurfaceRendering surrend
+
+new creaMaracasVisu:ViewerNV view1
+  set view1.nTypeView "6"
+
+new creaMaracasVisu:CutModule2 cut
+  set cut.BoxExecute "1"
+
+new creaMaracasVisu:ViewerNV view2
+  set view2.nTypeView "6"
+
+new wx:LayoutSplit layoutsplit1
+  set layoutsplit1.Orientation "V"
+
+new wx:LayoutSplit layoutsplit2
+  set layoutsplit2.Orientation "H"
+
+new wx:LayoutTab laytab
+
+new wx:LayoutLine layoutline1
+
+new wx:LayoutSplit layoutsplit3
+  set layoutsplit3.Orientation "H"
+  set layoutsplit3.Proportion "80"
+  set layoutsplit3.WinTitle "Cutting Tool"
+
+
+connect filselect0.Out gimm.In
 
-set cut.BoxExecute 1
-exec cut
+connect gimm.Out image.In
+
+connect image.Out volrend.In1
+
+connect gimm.Out view1.In
+
+connect view1.Interactor1 cut.Interactor
+
+connect view1.Renderer1 cut.Renderer
+
+connect image.Out cut.In
+
+connect image.Out view2.In
+
+connect view1.BoxChange cut.BoxExecute
+
+connect volrend.Widget layoutsplit1.Widget1
+
+connect surrend.Widget layoutsplit1.Widget2
+
+connect layoutsplit1.Widget layoutsplit2.Widget1
+
+connect laytab.Widget layoutsplit2.Widget2
+
+connect view1.Widget laytab.Widget2
+
+connect view2.Widget laytab.Widget1
+
+connect cut.Widget layoutline1.Widget1
+
+connect layoutline1.Widget layoutsplit3.Widget2
+
+connect layoutsplit2.Widget layoutsplit3.Widget1
 
 connect view2.Renderer1 volrend.Renderer
+
 connect view2.Renderer1 surrend.Renderer
 
-exec volrend
-exec surrend
 
-#connect cut.BoxChange volrend.BoxExecute
-#connect cut.BoxChange volrend.BoxExecute
\ No newline at end of file
+
+# Complex input ports
+exec layoutsplit3