1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script
3 # - /Users/davila/Creatis/C11/creatools_source/creaMiniTools/appli/template_creaPatientsSystem/scripts/00100_InsertDataA.bbs
4 # ----------------------------------
7 # ----------------------
11 include creaMaracasVisu
20 description "Description ??"
23 new creaMaracasVisu:ViewerNV Box00
25 new wx:LayoutLine Box02
27 new creaVtk:OutputWindow Box03
29 new wx:LayoutSplit Box04
30 set Box04.Orientation "H"
32 new wx:CommandButton Box06
33 set Box06.Label "Read Camera Image RGB (*.PNG)"
35 new creaImageIO:ReadImages Box07
37 new wx:FileSelector Box09
39 new wx:LayoutSplit Box11
40 set Box11.Proportion "90"
41 set Box11.WinTitle "00100_InsertDataA.bbg"
43 new wx:LayoutLine Box12
44 set Box12.Orientation "H"
46 new wx:InputText Box14
48 set Box14.ReactiveOnKeystroke "2"
51 new wx:CommandButton Box15
52 set Box15.Label "Save and Close"
54 new std:ConcatStrings Box16
56 new std:ConcatStrings Box17
58 new std:ReplaceCleanString Box18
62 new std:ConcatStrings Box19
63 set Box19.In2 "/image.mha"
65 new std:ConcatStrings Box21
66 set Box21.In1 "mkdir -p "
68 new vtk:MetaImageWriter Box22
69 set Box22.Compression "true"
71 new vtk:vtkImageDataPointerRelay Box23
73 new std:ExecSystemCommand Box24
75 new std:ConcatStrings Box25
76 set Box25.In1 "/results/<CORE>/davila/00100_OriginalImages/Test_01/<PATIENT_ID>/Condition_01"
78 new std:ReplaceCleanString Box26
79 set Box26.Search "<PATIENT_ID>"
81 new wx:OutputText Box27
82 set Box27.Title "File Name"
84 new wx:LayoutLine Box28
89 set Box30.In "VOID Study_A Study_B Study_C"
91 new std:ReplaceCleanString Box31
92 set Box31.Search "<CORE>"
94 new std:MultipleInputs Box32
96 new std:MultipleInputs Box33
98 new wx:OutputText Box34
100 new wx:InputText Box35
102 set Box35.Title "Parameter01"
104 new std:GetVectorStringElement Box36
105 set Box36.ErrorValue "VOID"
108 new std:StringWriter Box37
110 new std:ConcatStrings Box38
111 set Box38.In1 "Parameter01"
114 new std:ConcatStrings Box40
115 set Box40.In2 "/Parameters.txt"
117 new std:MagicBox Box41
119 new creaMiniTools:WriteStatePatientSystem Box42
120 set Box42.State "Finish"
122 new std:ConcatStrings Box43
123 set Box43.In2 "/Step01_Insert_Data.txt"
126 connect Box00.Widget Box04.Widget2
128 connect Box02.Widget Box04.Widget1
130 connect Box06.Widget Box02.Widget1
132 connect Box09.Out Box07.LstNameImages
134 connect Box06.BoxChange Box09.BoxExecute
136 connect Box09.BoxChange Box07.BoxExecute
138 connect Box07.BoxChange Box00.BoxExecute
140 connect Box04.Widget Box11.Widget1
143 connect Box16.Out Box17.In1
145 connect Box14.Out Box18.In
147 connect Box17.Out Box19.In1
149 connect Box19.Out Box22.Filename
151 connect Box07.Out Box23.In
153 connect Box23.Out Box00.In
155 connect Box23.Out Box22.In
157 connect Box25.Out Box26.In
159 connect Box18.Out Box26.Replace
161 connect Box19.Out Box27.In
163 connect Box12.Widget Box28.Widget1
165 connect Box27.Widget Box28.Widget2
167 connect Box17.Out Box21.In2
169 connect Box21.Out Box24.In
171 connect Box28.Widget Box11.Widget2
173 connect Box15.Widget Box12.Widget6
175 connect Box30.Widget Box12.Widget1
177 connect Box14.Widget Box12.Widget3
179 connect Box30.OutString Box31.Replace
181 connect Box26.Out Box31.In
183 connect Box31.Out Box17.In2
185 connect Box30.BoxChange Box32.In1
187 connect Box14.BoxChange Box32.In2
189 connect Box32.BoxChange Box27.BoxExecute
191 connect Box15.BoxChange Box33.BoxExecute
193 connect Box24.BoxChange Box33.In1
195 connect Box22.BoxChange Box33.In3
197 connect Box34.Widget Box02.Widget3
199 connect Box09.Out Box34.In
201 connect Box09.BoxChange Box34.BoxExecute
203 connect Box35.Widget Box12.Widget2
205 connect Box35.Out Box36.In
207 connect Box38.Out Box37.In0
209 connect Box17.Out Box40.In1
211 connect Box37.BoxChange Box33.In2
213 connect Box40.Out Box37.FileName
215 connect Box36.Out Box38.In3
218 connect Box42.boxChange Box33.In4
220 connect Box29.BoxChange Box33.In9
222 connect Box17.Out Box43.In1
224 connect Box41.Out Box42.User
226 connect Box43.Out Box42.Filename
230 # Complex input ports
231 input ProjectDir Box16.In1 " "
232 input creaUser Box41.In " "