1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
3 # - /tmpEED/creaTools/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/ViewerByPlane.bbs
4 # ----------------------------------
8 include creaMaracasVisu
14 define ViewerByPlane creaMaracasVisu
17 description "Description ??"
21 new creaMaracasVisu:ViewerNV Box01
22 set Box01.ColorLevel "900"
23 set Box01.WindowLevel "2000"
24 set Box01.nTypeView "6 1 2 0"
26 new vtk:CreateImage Box02
27 set Box02.InitialValue "500"
29 new creaVtk:MHDFileInfo Box03
31 new std:ConcatStrings Box04
33 new creaVtk:ReadMHDPlane Box05
34 set Box05.DirectionPlane "XY"
37 new std:GetVectorIntElement Box06
40 new std:ConcatStrings Box07
43 new vtk:InversCrop Box08
46 new creaVtk:ReadMHDPlane Box12
47 set Box12.DirectionPlane "ZX"
50 new std:GetVectorIntElement Box13
53 new vtk:InversCrop Box14
56 new std:ConcatStrings Box15
60 new creaVtk:ReadMHDPlane Box18
61 set Box18.DirectionPlane "YZ"
64 new std:GetVectorIntElement Box19
67 new vtk:InversCrop Box20
70 new std:ConcatStrings Box21
73 new std:MagicBox Box22
75 new std:MagicBox Box23
81 connect Box02.Out Box01.In
82 connect Box03.DimSize Box02.Dimensions
83 connect Box03.ElementSpacing Box02.Spacing
84 connect Box03.ElementType Box02.OutputFormat
85 connect Box04.Out Box03.FileName
86 connect Box04.Out Box05.FileName
87 connect Box01.Point Box06.In
88 connect Box06.Out Box07.In2
89 connect Box07.Out Box08.Origin
90 connect Box02.Out Box08.ImageFix
91 connect Box05.Out Box08.ImageMove
92 connect Box01.BoxChange Box08.BoxExecute
93 connect Box06.Out Box05.Slice
94 connect Box04.Out Box12.FileName
95 connect Box01.Point Box13.In
96 connect Box13.Out Box12.Slice
97 connect Box01.BoxChange Box14.BoxExecute
98 connect Box02.Out Box14.ImageFix
99 connect Box15.Out Box14.Origin
100 connect Box13.Out Box15.In2
101 connect Box12.Out2 Box14.ImageMove
102 connect Box19.Out Box18.Slice
103 connect Box21.Out Box20.Origin
104 connect Box19.Out Box21.In2
105 connect Box04.Out Box18.FileName
106 connect Box01.Point Box19.In
107 connect Box01.BoxChange Box20.BoxExecute
108 connect Box02.Out Box20.ImageFix
109 connect Box18.Out2 Box20.ImageMove
110 connect Box22.Out Box05.Type
111 connect Box22.Out Box12.Type
112 connect Box22.Out Box18.Type
113 connect Box27.OutString Box22.In
115 # Complex input ports
116 input FileNale Box04.In1 " "
117 input typeMHDorSeek Box23.In " "
119 # Complex output ports
120 output widget Box01.Widget " "
121 output wxvtkbaseview1 Box01.wxVtkBaseView1 " "
122 output render1 Box01.Renderer1 " "