1 # ----------------------------------
2 # - BBTKGEditor v 1.5 BBS BlackBox Script (Complex Box)
3 # - /Users/davila/Creatis/C23/creatools_source/creaImageIO/bbtk_Transform3Ddicom_PKG/bbs/boxes/SliceVectorImageDicom3D.bbs
4 # ----------------------------------
11 include Transform3Ddicom
13 include creaMaracasVisu
16 define SliceVectorImageDicom3D Transform3Ddicom
19 description "Description ??"
23 new creaImageIO:GetDicomAttributesFromMaps Box02
24 set Box02.KeyDicom "D0020_0032"
26 new std:GetVectorStringElement Box04
27 set Box04.ErrorValue "1000 1000 1000 "
29 new creaImageIO:GetDicomAttributesFromMaps Box09
30 set Box09.KeyDicom "D0020_0037"
32 new std:GetVectorStringElement Box10
33 set Box10.ErrorValue "1 0 0 0 0 1"
35 new vtk:GetVectorVtkImageDataElement Box12
37 new Transform3Ddicom:ImageActorDicom Box14
38 set Box14.IPP "-143.58 -59.34 -24.34"
39 set Box14.OPP "0.97 -0.19 -0.11 0.21 0.68 0.69"
40 set Box14.PixelSpacing "1 1 1"
43 new vtk:ImageVtkProperties Box15
45 new std:ReplaceString Box16
49 new std:ReplaceString Box17
53 new std:MagicBox Box19
55 new std:MagicBox Box20
57 new std:MagicBox Box21
59 new std:MagicBox Box22
61 new wx:LayoutTab Box23
63 new creaMaracasVisu:ViewerNV Box24
64 set Box24.nTypeView "-1"
66 new toolsbbtk:ImageVtkPropertiesWidget Box25
68 new wx:LayoutLine Box26
69 set Box26.WinTitle "DicomInfo"
71 new wx:OutputText Box28
72 set Box28.Title "Orientation"
74 new wx:OutputText Box29
75 set Box29.Title "Spacing"
77 new std:MagicBox Box30
79 new std:ConcatStrings Box31
80 set Box31.In2 " 1.17188"
82 new vtk:RescaleSlopeIntercept Box35
85 new creaImageIO:GetDicomAttributesFromMaps Box36
86 set Box36.KeyDicom "D0018_1060"
88 new std:GetVectorStringElement Box37
89 set Box37.ErrorValue "1000 1000 1000 "
91 new wx:OutputText Box38
92 set Box38.Title "Trigger Time"
94 new creaImageIO:GetDicomAttributesFromMaps Box39
95 set Box39.KeyDicom "D0020_1041"
97 new std:GetVectorStringElement Box40
98 set Box40.ErrorValue "-9999"
100 new wx:OutputText Box41
101 set Box41.Title "Slice Location"
103 new std:MagicBox Box42
105 new wx:LayoutLine Box43
106 set Box43.WinTitle "Image"
108 new std:MathOperationVector Box45
111 new wx:OutputText Box46
112 set Box46.Title "Position"
114 new std:ConcatStrings Box47
116 new std:ConcatStrings Box51
118 new wx:OutputText Box52
119 set Box52.Title "Position Correction"
122 connect Box02.Out Box04.In
123 connect Box09.Out Box10.In
124 connect Box12.Out Box15.In
125 connect Box04.Out Box16.In
126 connect Box10.Out Box17.In
127 connect Box17.Out Box14.OPP
128 connect Box19.Out Box12.In
129 connect Box20.Out Box14.Renderer
130 connect Box21.Out Box02.In
131 connect Box21.Out Box09.In
132 connect Box22.Out Box04.I
133 connect Box22.Out Box10.I
134 connect Box22.Out Box12.I
135 connect Box12.Out Box24.In
136 connect Box25.widget Box23.Widget2
137 connect Box12.Out Box25.in
138 connect Box26.Widget Box23.Widget3
139 connect Box30.Out Box14.boxexecute
140 connect Box30.Out Box28.BoxExecute
141 connect Box30.Out Box29.BoxExecute
142 connect Box17.Out Box28.In
143 connect Box15.Spacing Box31.In1
144 connect Box31.Out Box29.In
145 connect Box30.Out Box24.BoxExecute
146 connect Box12.Out Box35.In
147 connect Box35.Out Box14.Image
148 connect Box36.Out Box37.In
149 connect Box21.Out Box36.In
150 connect Box37.Out Box38.In
151 connect Box30.Out Box38.BoxExecute
152 connect Box22.Out Box37.I
153 connect Box39.Out Box40.In
154 connect Box21.Out Box39.In
155 connect Box22.Out Box40.I
156 connect Box40.Out Box41.In
157 connect Box14.widget Box23.Widget4
158 connect Box42.Out Box14.opacity
159 connect Box24.Widget Box43.Widget1
160 connect Box43.Widget Box23.Widget1
161 connect Box45.Out Box14.IPP
162 connect Box16.Out Box46.In
163 connect Box46.Widget Box26.Widget1
164 connect Box30.Out Box46.BoxExecute
165 connect Box47.Out Box45.In1
166 connect Box16.Out Box51.In1
167 connect Box51.Out Box45.In0
168 connect Box47.Out Box52.In
169 connect Box38.Widget Box26.Widget8
170 connect Box29.Widget Box26.Widget6
171 connect Box28.Widget Box26.Widget4
172 connect Box52.Widget Box26.Widget2
173 connect Box30.Out Box52.BoxExecute
175 # Complex input ports
176 input VecImage Box19.In " "
177 input render Box20.In " "
178 input VecDicomMap Box21.In " "
179 input indexZ Box22.In " "
180 input boxExecute Box30.In " "
181 input OpacityPlane Box42.In " "
182 input IPP_Correction Box47.In1 " "
184 # Complex output ports
185 output image Box12.Out " "
186 output _widget Box23.Widget " "
187 output OutTransform Box14.outTransform " "
188 output renderer Box24.Renderer1 " "
189 output boxChange_ImageActor Box14.boxChangeImageActor " "