]> Creatis software - creaMaracasVisu.git/blob - bbtk/bbs/boxes/FreePlane.bbs
#3558 ShowNPoints_Tools::LoadCollection
[creaMaracasVisu.git] / bbtk / bbs / boxes / FreePlane.bbs
1 # ----------------------------------
2 # - BBTKGEditor v 1.6 BBS BlackBox Script (Complex Box)
3 # - /Users/davila/Creatis/C23/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/FreePlane.bbs
4 # ----------------------------------
5
6 include std
7 include itkvtk
8 include vtk
9 include wx
10 include creaMaracasVisu
11 include creaVtk
12 include std
13
14 define FreePlane creaMaracasVisu
15
16 author "Author ??"
17 description "Description ??"
18
19 category "<VOID>"
20
21 new vtk:ImageVtkProperties Box00
22
23 new wx:LayoutLine Box01
24   set Box01.Orientation "V"
25   set Box01.WinTitle "Free plane"
26
27 new creaMaracasVisu:SliceImage Box02
28   set Box02.InterpolationMode "1"
29   set Box02.Slice "0"
30   set Box02.TypeOrientation "3"
31   set Box02.Z "0"
32
33 new creaVtk:TransformVector Box03
34   set Box03.InX "1   0  0"
35   set Box03.InY "0  1   0"
36   set Box03.InZ "0  0   1"
37
38 new creaMaracasVisu:ImageActor Box04
39   set Box04.InterpolationMode "1"
40   set Box04.Opacity "1"
41
42 new vtk:Transform Box06
43
44 new creaVtk:ConcatTransform Box07
45
46 new std:ConcatStrings Box08
47
48 new std:ConcatStrings Box09
49   set Box09.In2 "  "
50   set Box09.In4 "  "
51
52 new creaVtk:ScalarsToColors Box10
53   set Box10.BelowAboveRangeTransparence "false"
54   set Box10.Type "101"
55
56 new vtk:vtkImageDataPointerRelay Box11
57
58 new std:MagicBox Box12
59
60 new creaMaracasVisu:wxVtkBaseView_Info Box13
61   set Box13.InteractionType "12"
62
63 new wx:CheckBox Box14
64   set Box14.Title "Pivot plane"
65
66 new creaMaracasVisu:DrawAxisTree3D Box15
67   set Box15.Colour "1 0 0    1 1 0    0 0 1"
68   set Box15.ColourLaw "2"
69   set Box15.LineWidth "2"
70   set Box15.lstIndexs "2 2 2"
71   set Box15.lstPointX "0 20       0 0            0 0"
72   set Box15.lstPointY "0 0         0  160       0 0"
73   set Box15.lstPointZ "0 0         0  0           0 20"
74
75 new creaMaracasVisu:TransformWidget2 Box16
76   set Box16.Type "1"
77
78 new std:MathOperationVector Box17
79   set Box17.Type "2"
80
81 new vtk:UpdateRender Box19
82   set Box19.Active "true"
83
84 new std:MultipleInputs Box20
85
86 new vtk:UpdateRender Box21
87   set Box21.Active "true"
88
89
90 connect Box02.Out Box04.In
91 connect Box08.Out Box02.AxisOrigin
92 connect Box06.Out Box07.In3
93 connect Box07.Out Box04.Transform
94 connect Box03.OutX Box09.In1
95 connect Box03.OutY Box09.In3
96 connect Box03.OutZ Box09.In5
97 connect Box09.Out Box02.ResliceAxesDirectionCosines
98 connect Box10.LookupTable Box04.LookupTable
99 connect Box11.Out Box02.In
100 connect Box11.Out Box00.In
101 connect Box12.Out Box04.Renderer
102 connect Box13.WindowColorLevel Box10.WindowColorLevel
103 connect Box13.BoxChange Box10.BoxExecute
104 connect Box07.Out Box15.Transform
105 connect Box12.Out Box15.Renderer
106 connect Box16.Out Box03.Transform
107 connect Box16.Out Box07.In1
108 connect Box16.Widget Box01.Widget2
109 connect Box08.Out Box17.In0
110 connect Box00.Spacing Box17.In1
111 connect Box17.Out Box06.Translate
112 connect Box16.ActualPoint Box08.In1
113 connect Box14.Out Box15.Active
114 connect Box16.BoxChange Box15.BoxExecute
115 connect Box13.Image Box11.In
116 connect Box14.Out Box04.Active
117 connect Box12.Out Box19.Renderer
118 connect Box14.Widget Box01.Widget1
119 connect Box04.BoxChange Box20.In1
120 connect Box15.BoxChange Box20.In2
121 connect Box20.BoxChange Box19.BoxExecute
122 connect Box14.BoxChange Box20.In4
123 connect Box14.Out Box19.Active
124 connect Box14.BoxChange Box21.BoxExecute
125 connect Box12.Out Box21.Renderer
126 connect Box14.BoxChange Box04.BoxExecute
127
128 # Complex input ports
129 input possiblePoint Box16.PossiblePoint " "
130 input wxvtkbaseview1 Box13.wxVtkBaseView " "
131 input wxvtkbaseview2 Box13.wxVtkBaseView2 " "
132 input render Box12.In " "
133 input wxvtkbaseview3 Box13.wxVtkBaseView3 " "
134
135 # Complex output ports
136 output widgetOut Box01.Widget " "
137 output transform Box16.Out " "
138 output actualPoint Box08.Out " "
139 output boxChange Box16.BoxChange " "
140 output box_TransformWidget2 Box16.Box_TransformWidget2 " "
141
142
143 endefine