#3459 SliceImage-3DVisu box

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

diff --git a/bbtk/bbs/appli/exampleBars.bbs b/bbtk/bbs/appli/exampleBars.bbs
index 9f3bf52003dddf09745b59a1843d442a5e115df7..4a5e033f098a8d85bb2a0ce55ff06b52c112e60a 100644 (file)
--- a/bbtk/bbs/appli/exampleBars.bbs
+++ b/bbtk/bbs/appli/exampleBars.bbs
@@ -1,69 +1,86 @@
+# ----------------------------------
+# - BBTKGEditor v 1.4 BBS BlackBox Script
+# - /tmpEED/creaTools2/creatools_source/creaMaracasVisu/bbtk/bbs/appli/exampleBars.bbs
+# ----------------------------------
+
+# BBTK GEditor Script
+# ----------------------
+
+include std
+include itkvtk
+include wx
+include creaMaracasVisu
+
+author "eduardo.davila@creatis.insa-lyon.fr"
 description "creaMaracasVisu::ColorBar box example. "
 category "example"
-author "eduardo.davila@creatis.insa-lyon.fr"
 
-load std
-load wx
-load creaMaracasVisu
-
-new LayoutSplit s
-       set s.Orientation H
-new LayoutSplit ss
-       set ss.Orientation H
-
-new LayoutLine s1
-new LayoutLine s2
-
-set s1.Orientation V
-set ss.Orientation H
-set s2.Orientation V
-
-new SliderMinMax sliderMM_h
-set sliderMM_h.Orientation 1
-set sliderMM_h.InW 300
-set sliderMM_h.InH 90
-set sliderMM_h.InMax 350
-set sliderMM_h.InMin 0
-set sliderMM_h.ShowLabels 1
-
-new SliderMinMax sliderMM_v
-set sliderMM_v.Orientation 0
-set sliderMM_v.InW 300
-set sliderMM_v.InH 30
-set sliderMM_v.InMax 350
-set sliderMM_v.InMin 0
-set sliderMM_v.ShowLabels 1
-
-new ColorBar colorB_h
-set colorB_h.Orientation 1
-set colorB_h.InW 300
-set colorB_h.InH 50
-set colorB_h.InMax 350
-set colorB_h.InMin 0
-set colorB_h.Reds " 0 255 0 255 220 30"
-set colorB_h.Greens " 0 220 220 100 240 55"
-set colorB_h.Blues " 255 0 15 0 0 0"
-set colorB_h.Values " 0 30 70 130 250 310"
-
-
-new ColorBar colorB_v
-set colorB_v.Orientation 0
-set colorB_v.InW 300
-set colorB_v.InH 50
-set colorB_v.InMax 350
-set colorB_v.InMin 0
-set colorB_v.Reds " 0 255 0 255 220 30"
-set colorB_v.Greens " 0 220 220 100 240 55"
-set colorB_v.Blues " 255 0 15 0 0 0"
-set colorB_v.Values " 0 30 70 130 250 310"
-
-
-connect s1.Widget                              s.Widget1
-connect  s2.Widget                             s.Widget2
-connect sliderMM_h.Widget              s1.Widget1 
-connect colorB_h.Widget                        s1.Widget2 
-connect ss.Widget                              s2.Widget1 
-connect sliderMM_v.Widget              ss.Widget1 
-connect colorB_v.Widget                        ss.Widget2 
+new wx:LayoutSplit s
+  set s.Orientation "H"
+
+new wx:LayoutSplit ss
+  set ss.Orientation "H"
+
+new wx:LayoutLine s1
+  set s1.Orientation "V"
+
+new wx:LayoutLine s2
+  set s2.Orientation "V"
+
+new creaMaracasVisu:SliderMinMax sliderMM_h
+  set sliderMM_h.InH "90"
+  set sliderMM_h.InMax "350"
+  set sliderMM_h.InMin "0"
+  set sliderMM_h.InW "300"
+  set sliderMM_h.Orientation "1"
+  set sliderMM_h.ShowLabels "1"
+
+new creaMaracasVisu:SliderMinMax sliderMM_v
+  set sliderMM_v.InH "30"
+  set sliderMM_v.InMax "350"
+  set sliderMM_v.InMin "0"
+  set sliderMM_v.InW "300"
+  set sliderMM_v.Orientation "0"
+  set sliderMM_v.ShowLabels "1"
+
+new creaMaracasVisu:ColorBar colorB_h
+  set colorB_h.Blues " 255 0 15 0 0 0"
+  set colorB_h.Greens " 0 220 220 100 240 55"
+  set colorB_h.InH "50"
+  set colorB_h.InMax "350"
+  set colorB_h.InMin "0"
+  set colorB_h.InW "300"
+  set colorB_h.Orientation "1"
+  set colorB_h.Reds " 0 255 0 255 220 30"
+  set colorB_h.Values " 0 30 70 130 250 310"
+
+new creaMaracasVisu:ColorBar colorB_v
+  set colorB_v.Blues " 255 0 15 0 0 0"
+  set colorB_v.Greens " 0 220 220 100 240 55"
+  set colorB_v.InH "50"
+  set colorB_v.InMax "350"
+  set colorB_v.InMin "0"
+  set colorB_v.InW "300"
+  set colorB_v.Orientation "0"
+  set colorB_v.Reds " 0 255 0 255 220 30"
+  set colorB_v.Values " 0 30 70 130 250 310"
+
+
+connect s1.Widget s.Widget1
+
+connect s2.Widget s.Widget2
+
+connect sliderMM_h.Widget s1.Widget1
+
+connect colorB_h.Widget s1.Widget2
+
+connect ss.Widget s2.Widget1
+
+connect sliderMM_v.Widget ss.Widget1
+
+connect colorB_v.Widget ss.Widget2
+
+
 
+# Complex input ports
 exec s