]> Creatis software - creaMaracasVisu.git/blob - bbtk/bbs/boxes/SliderMinMax-flexible.bbs
7ca223f6e1c97a4b45961731913ed90db9ca6136
[creaMaracasVisu.git] / bbtk / bbs / boxes / SliderMinMax-flexible.bbs
1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
3 # - /tmpEED/creaTools/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/SliderMinMax-flexible.bbs
4 # ----------------------------------
5
6 include std
7 include itkvtk
8 include creaMaracasVisu
9 include wx
10 include std
11
12 define SliderMinMax-flexible creaMaracasVisu
13
14 author "Author ??"
15 description "Description ??"
16
17 category "<VOID>"
18
19 new creaMaracasVisu:SliderMinMax Box02
20   set Box02.InMax "2000"
21   set Box02.InMaxShow "2000"
22   set Box02.ShowActual "false"
23   set Box02.ShowLabels "1"
24
25 new wx:LayoutLine Box04
26   set Box04.Orientation "H"
27   set Box04.WinTitle "integer"
28
29 new wx:InputText Box05
30   set Box05.In "0"
31   set Box05.Title "Min"
32
33 new wx:InputText Box06
34   set Box06.In "2000"
35   set Box06.Title "Max"
36
37 new std:MultipleInputs Box09
38
39 new std:SharedMemory Box10
40   set Box10.In "2000"
41
42 new wx:LayoutTab Box11
43
44 new wx:LayoutLine Box12
45   set Box12.Orientation "H"
46   set Box12.WinTitle "float"
47
48 new wx:InputText Box13
49   set Box13.In "0.0"
50   set Box13.Title "Min"
51
52 new wx:InputText Box14
53   set Box14.In "1.0"
54   set Box14.Title "Max"
55
56 new std:MultipleInputs Box15
57
58 new std:MagicBox Box16
59
60 new std:MagicBox Box17
61
62 new std:SharedMemory Box18
63
64
65 connect Box02.Widget Box04.Widget2
66 connect Box06.Widget Box04.Widget3
67 connect Box05.Widget Box04.Widget1
68 connect Box05.Out Box02.InMin
69 connect Box09.BoxChange Box02.BoxExecute
70 connect Box06.BoxChange Box09.In2
71 connect Box05.BoxChange Box09.In1
72 connect Box02.OutEnd Box10.In1
73 connect Box05.Out Box02.InMinShow
74 connect Box04.Widget Box11.Widget1
75 connect Box13.Widget Box12.Widget1
76 connect Box14.Widget Box12.Widget2
77 connect Box12.Widget Box11.Widget2
78 connect Box13.BoxChange Box15.In1
79 connect Box14.BoxChange Box15.In2
80 connect Box02.BoxChange Box15.In3
81 connect Box06.Out Box02.InMax
82 connect Box06.Out Box02.InMaxShow
83 connect Box06.Out Box10.In2
84 connect Box14.Out Box10.In3
85 connect Box16.Out Box05.In
86 connect Box17.Out Box06.In
87 connect Box17.Out Box10.In
88 connect Box16.Out Box18.In
89 connect Box02.OutStart Box18.In1
90 connect Box05.Out Box18.In2
91 connect Box13.Out Box18.In3
92
93 # Complex input ports
94 input showactual Box02.ShowActual " "
95 input minIn Box16.In " "
96 input maxIn Box17.In " "
97
98 # Complex output ports
99 output outactual Box02.OutActual " "
100 output outend Box10.Out " "
101 output widget Box11.Widget " "
102 output boxchange Box15.BoxChange " "
103 output outstart Box18.Out " "
104
105 message    
106
107 endefine