# ---------------------------------- # - BBTKGEditor v 1.5 BBS BlackBox Script (Complex Box) # - /Users/davila/Creatis/C23/creatools_source/creaImageIO/bbtk_Transform3Ddicom_PKG/bbs/boxes/ViewerPlaneContourDicom3D.bbs # ---------------------------------- include std include itkvtk include Transform3Ddicom include creaImageIO include std include vtk include creaVtk include wx define ViewerPlaneContourDicom3D Transform3Ddicom author "Author ??" description "Description ??" category "" new Transform3Ddicom:SliceVectorImageDicom3D Box11 set Box11.OpacityPlane "0.2" new creaImageIO:ReadImages Box24 set Box24.DicomTags "D0020_0032 D0020_0037 D0018_1060" new std:FilesFromDirectory Box30 set Box30.FileEnd ".IMA" set Box30.In "/home/davila/CreatisWorks/tmpSIMR/results/creaSIMR-Visu/Genet/Original_Images_Dicom/test_01/p_0001/condition_01/cine_tfi_retro_p3_SA 9" new std:ReplaceString Box46 set Box46.Replace " " set Box46.Search "\ " new vtk:Transform Box73 set Box73.Scale "1 1 1" new creaVtk:ConcatTransform Box75 new std:GetVectorStringElement Box119 new wx:LayoutLine Box121 new wx:Slider Box124 set Box124.In "100" set Box124.Label "true" set Box124.Max "100" set Box124.Min "0" set Box124.ReactiveOnTrack "true" set Box124.Title "Plane Opacity" new std:Div Box125 set Box125.In2 "100" new wx:LayoutTab Box126 new std:MultipleInputs Box129 new vtk:PolyDataToActor Box130 set Box130.Colour "0 1 1" set Box130.LineWidth "2" set Box130.Opacity "1" set Box130.Representation "1" new creaVtk:Plane Box131 set Box131.Origin "0 0 35" new creaVtk:Cutter Box132 new vtk:Transform Box134 set Box134.Inverse "true" new creaVtk:ConcatTransform Box135 new creaVtk:ApplyTransformToPoint3D Box136 new std:MultipleInputs Box151 new creaVtk:ConcatTransform Box152 new vtk:Transform Box153 set Box153.Inverse "true" new vtk:PolyDataToActor Box154 set Box154.Colour "0 1 1" set Box154.LineWidth "2" set Box154.Opacity "1" set Box154.Representation "1" new vtk:Transform Box155 set Box155.Inverse "true" set Box155.Translate "0 0 35" new std:MagicBox Box145 new std:MagicBox Box146 new std:MagicBox Box147 new std:MagicBox Box148 new std:ConcatStrings Box150 set Box150.In1 "Plan" new std:ConcatStrings Box160 set Box160.In1 "0" new std:MagicBox Box161 new std:MagicBox Box53 new creaVtk:Cutter Box54 new vtk:PolyDataToActor Box57 set Box57.Colour "1 1 0" set Box57.LineWidth "2" set Box57.Opacity "1" set Box57.Representation "1" new vtk:PolyDataToActor Box58 set Box58.Colour "1 1 0" set Box58.LineWidth "2" set Box58.Opacity "1" set Box58.Representation "1" new wx:LayoutLine Box59 set Box59.Orientation "H" new wx:Slider Box60 set Box60.In "100" set Box60.Label "true" set Box60.Max "100" set Box60.Min "0" set Box60.ReactiveOnTrack "true" set Box60.Title "Int. Cont .Opacity" new std:Div Box61 set Box61.In2 "100" new wx:Slider Box62 set Box62.In "100" set Box62.Label "true" set Box62.Max "100" set Box62.Min "0" set Box62.ReactiveOnTrack "true" set Box62.Title "Ext. Cont .Opacity" new std:Div Box63 set Box63.In2 "100" new vtk:UpdateRender Box65 set Box65.Active "true" new std:MultipleInputs Box66 new std:MagicBox Box67 new vtk:UpdateRender Box51 set Box51.Active "true" new std:MultipleInputs Box52 new std:ConcatStrings Box68 set Box68.In2 "/translation.txt" new std:ReplaceCleanString Box69 set Box69.Replace "Original_Images_Translations" set Box69.Search "Original_Images_Dicom" new std:ReadLinesString Box70 new wx:ComboBox Box71 new std:SplitFilePathVector Box72 new std:MagicBox Box74 connect Box24.DicomInfo Box11.VecDicomMap connect Box24.OutImages Box11.VecImage connect Box30.Out Box46.In connect Box46.Out Box24.LstNameImages connect Box73.Out Box75.In1 connect Box124.Out Box125.In1 connect Box124.Widget Box121.Widget7 connect Box121.Widget Box126.Widget1 connect Box124.BoxChange Box129.In3 connect Box119.Out Box30.In connect Box125.Out Box11.OpacityPlane connect Box132.Out Box130.In connect Box136.Out Box131.Origin connect Box136.OutDirection Box131.Normal connect Box131.Out Box132.ImplicitFunction connect Box75.Out Box130.Transform connect Box134.Out Box135.In2 connect Box11.OutTransform Box135.In1 connect Box135.Out Box136.Transform connect Box130.BoxChange Box151.In3 connect Box75.Out Box152.In1 connect Box153.Out Box152.In2 connect Box11.OutTransform Box153.In connect Box132.Out Box154.In connect Box152.Out Box154.Transform connect Box154.BoxChange Box151.In6 connect Box11.renderer Box154.Renderer connect Box155.Out Box152.In3 connect Box145.Out Box119.In connect Box129.BoxChange Box11.boxExecute connect Box146.BoxChange Box129.In1 connect Box147.Out Box11.indexZ connect Box148.Out Box11.render connect Box148.Out Box130.Renderer connect Box150.Out Box121.WinTitle connect Box161.Out Box132.In connect Box53.Out Box54.In connect Box131.Out Box54.ImplicitFunction connect Box54.Out Box57.In connect Box54.Out Box58.In connect Box75.Out Box57.Transform connect Box152.Out Box58.Transform connect Box148.Out Box57.Renderer connect Box57.BoxChange Box151.In1 connect Box58.BoxChange Box151.In2 connect Box11.renderer Box58.Renderer connect Box59.Widget Box121.Widget8 connect Box60.Out Box61.In1 connect Box60.Widget Box59.Widget1 connect Box62.Out Box63.In1 connect Box61.Out Box57.Opacity connect Box61.Out Box58.Opacity connect Box63.Out Box130.Opacity connect Box63.Out Box154.Opacity connect Box62.Widget Box59.Widget3 connect Box11.renderer Box65.Renderer connect Box66.BoxChange Box65.BoxExecute connect Box60.BoxChange Box66.In1 connect Box62.BoxChange Box66.In3 connect Box67.Out Box134.In connect Box67.Out Box75.In2 connect Box73.Out Box135.In3 connect Box129.BoxChange Box151.In4 connect Box148.Out Box51.Renderer connect Box124.BoxChange Box52.In1 connect Box52.BoxChange Box51.BoxExecute connect Box66.BoxChange Box52.In4 connect Box119.Out Box68.In1 connect Box68.Out Box69.In connect Box69.Out Box70.FileName connect Box70.Out Box11.IPP_Correction connect Box145.Out Box72.In connect Box72.BaseName Box71.In connect Box71.Widget Box121.Widget1 connect Box74.Out Box30.FileEnd connect Box71.Out Box119.I connect Box71.BoxChange Box52.In3 connect Box71.BoxChange Box129.In4 connect Box160.Out Box71.Selection connect Box11.boxChange_ImageActor Box151.In5 # Complex input ports input lstDirInstans Box145.In " " input StartPlane Box160.In1 " " input TitleWidget Box150.In1 " " input boxchange Box146.In " " input iPlane Box147.In " " input render3D Box148.In " " input surfExternal Box161.In " " input surfInternal Box53.In " " input TransformRefForSurface Box67.In " " input dicomExtension Box74.In " " # Complex output ports output widgetControls Box126.Widget " " output widget2D Box11._widget " " output boxExecuteForRender Box151.BoxChange " " output boxchange_imageactor Box11.boxChange_ImageActor " " endefine