# ---------------------------------- # - BBTKGEditor v 1.4 BBS BlackBox Script # - /tmpEED/creaTools/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/appli/PlaneViewer-MHD.bbs # ---------------------------------- # BBTK GEditor Script # ---------------------- include std include itkvtk include wx include creaMaracasVisu include creaVtk include std include vtk include creaMiniTools include PackRecalage author "Author ??" description "Description ??" category "" new wx:FileSelector Box00 set Box00.Message "mhd file" set Box00.Title "mhd file" new creaMaracasVisu:ViewerNV Box01 set Box01.nTypeView "-1" new creaVtk:ReadMHDPlane Box02 set Box02.Type "1" new wx:Slider Box03 set Box03.ReactiveOnTrack "true" new wx:LayoutSplit Box04 set Box04.Orientation "H" new wx:LayoutTab Box05 new std:ConcatStrings Box07 new creaVtk:MHDFileInfo Box08 new std:GetVectorIntElement Box09 set Box09.ErrorValue "-100" set Box09.I "2" new std:MathOperation Box10 set Box10.In2 "-1" new wx:LayoutLine Box16 set Box16.WinTitle "Image XY (.mhd)" new vtk:LoadHola Box20 new creaMiniTools:MHDFileInfo_widget Box21 new std:SharedMemory Box23 new PackRecalage:ImageSwitcherBox Box27 set Box27.Time "200" set Box27.Title "AA" new wx:CheckBox Box28 set Box28.Title "Loop" new std:MultipleInputs Box29 new wx:Slider Box30 set Box30.In "200" set Box30.Label "true" set Box30.Max "1500" set Box30.Min "100" set Box30.Orientation "H" set Box30.ReactiveOnTrack "true" set Box30.Title "Speed (milliseconds)" new wx:LayoutLine Box31 set Box31.Orientation "V" set Box31.WinTitle "Animation" new creaMaracasVisu:ColorLayerImageView Box32 set Box32.TypeControlsInterface "2" new wx:LayoutLine Box34 set Box34.Orientation "H" new wx:OutputText Box35 new wx:Slider Box36 set Box36.Label "true" set Box36.ReactiveOnTrack "true" set Box36.Title "Slice Z min" new wx:Slider Box37 set Box37.Label "true" set Box37.ReactiveOnTrack "true" set Box37.Title "Slice Z max" new wx:LayoutLine Box38 new std:MathOperation Box39 set Box39.In1 "0" set Box39.In2 "1" set Box39.Type "7" new std:MultipleInputs Box40 new wx:LayoutTab Box41 new wx:LayoutLine Box42 set Box42.WinTitle "Base Image" new wx:OutputText Box43 new wx:LayoutTab Box46 new wx:LayoutLine Box47 set Box47.WinTitle "Transparence Layer" new wx:LayoutLine Box48 set Box48.Orientation "V" new wx:OutputText Box49 set Box49.Title "Drop your file here ..." new wx:DropFiles Box51 new creaVtk:ReadMHDPlane Box54 set Box54.Type "1" new wx:DropFiles Box56 new std:GetVectorStringElement Box57 set Box57.ErrorValue "hola" set Box57.I "0" new wx:OutputText Box59 set Box59.In "Drop your file here ..." new wx:LayoutLine Box61 set Box61.Orientation "H" new creaVtk:OutputWindow Box62 new std:ConcatStrings Box66 set Box66.In2 " " new creaMaracasVisu:SliderMinMax-flexible Box68 set Box68.maxIn "255" set Box68.minIn "0" set Box68.showactual "false" new std:ConcatStrings Box65 set Box65.In2 " " new wx:CheckBox Box67 set Box67.In "true" set Box67.ReactiveOnKeystroke "true" set Box67.Title "Interpolate" connect Box02.Out Box01.In connect Box01.Widget Box04.Widget2 connect Box05.Widget Box04.Widget1 connect Box07.Out Box08.FileName connect Box08.DimSize Box09.In connect Box10.Out Box03.Max connect Box16.Widget Box05.Widget1 connect Box07.Out Box21.NameFile connect Box03.Out Box23.In connect Box23.Out Box02.Slice connect Box28.Out Box27.On connect Box29.BoxChange Box01.BoxExecute connect Box30.Out Box27.Time connect Box01.wxVtkBaseView1 Box32.WxVtkBaseView connect Box29.BoxChange Box32.BoxExecute connect Box28.Widget Box34.Widget1 connect Box35.Widget Box34.Widget2 connect Box23.Out Box35.In connect Box29.BoxChange Box35.BoxExecute connect Box36.Widget Box38.Widget1 connect Box37.Widget Box38.Widget2 connect Box10.Out Box36.Max connect Box10.Out Box37.Max connect Box36.Out Box39.In1 connect Box37.Out Box39.In2 connect Box39.Out Box23.In1 connect Box27.BoxChange Box29.In2 connect Box03.BoxChange Box29.In1 connect Box27.BoxChange Box40.In1 connect Box40.BoxChange Box39.BoxExecute connect Box36.BoxChange Box40.In2 connect Box37.BoxChange Box40.In3 connect Box10.Out Box37.In connect Box42.Widget Box41.Widget1 connect Box41.Widget Box16.Widget1 connect Box47.Widget Box46.Widget1 connect Box48.Widget Box31.Widget1 connect Box30.Widget Box31.Widget2 connect Box38.Widget Box31.Widget3 connect Box34.Widget Box48.Widget1 connect Box27.Widget Box48.Widget2 connect Box47.Widget Box51.Widget connect Box29.BoxChange Box49.BoxExecute connect Box51.BoxChange Box29.In3 connect Box51.LstPaths Box49.In connect Box54.Out Box32.In connect Box23.Out Box54.Slice connect Box51.LstPaths Box54.FileName connect Box07.Out Box02.FileName connect Box07.Out Box43.In connect Box09.Out Box10.In1 connect Box56.LstPaths Box57.In connect Box57.Out Box07.In1 connect Box43.Widget Box42.Widget2 connect Box59.Widget Box56.Widget connect Box56.BoxChange Box43.BoxExecute connect Box56.BoxChange Box29.In4 connect Box56.BoxChange Box21.boxExecute connect Box61.Widget Box42.Widget1 connect Box59.Widget Box61.Widget1 connect Box03.Widget Box61.Widget2 connect Box46.Widget Box16.Widget2 connect Box21.widget Box05.Widget3 connect Box31.Widget Box05.Widget2 connect Box00.Out Box57.ErrorValue connect Box66.Out Box32.lstRangeForColorBar connect Box68.outend Box66.In3 connect Box68.outstart Box66.In1 connect Box68.boxchange Box29.In5 connect Box68.widget Box47.Widget3 connect Box32.Widget Box47.Widget2 connect Box49.Widget Box47.Widget1 connect Box68.outstart Box65.In1 connect Box65.Out Box32.lstTransparenceBoundaries connect Box67.Widget Box42.Widget3 connect Box67.Out Box01.Interpolate connect Box67.BoxChange Box29.In6 # Complex input ports exec Box04 exec Box62