# ---------------------------------- # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box) # - /tmpEED/creaTools/creatools_source/creaVtk/bbtk_creaVtk_PKG/bbs/boxes/PlaneVectorVisu_Interface.bbs # ---------------------------------- include std include itkvtk include wx include std define PlaneVectorViso_Interface creaVtk author "Author ??" description "Description ??" category "" new wx:Slider Box00 set Box00.In "30" set Box00.Label "true" set Box00.Max "100" set Box00.Min "1" set Box00.ReactiveOnTrack "True" set Box00.Title "Plane Resolution" new wx:CheckBox Box01 set Box01.In "false" set Box01.ReactiveOnKeystroke "true" set Box01.Title "Plane control" new wx:LayoutLine Box03 set Box03.WinTitle "Plane flield" new wx:LayoutTab Box04 new wx:CheckBox Box05 set Box05.ReactiveOnKeystroke "true" set Box05.Title "Active Vectors" new wx:Slider Box06 set Box06.In "100" set Box06.Label "true" set Box06.Max "100" set Box06.Min "0" set Box06.ReactiveOnTrack "True" set Box06.Title "Opacity" new std:Div Box07 set Box07.In2 "100.0" new wx:Slider Box08 set Box08.ChangeResolution "true" set Box08.In "100" set Box08.Label "true" set Box08.Max "5000" set Box08.Min "1" set Box08.ReactiveOnTrack "True" set Box08.Title "Scale Factor" new std:Div Box09 set Box09.In2 "100.0" new wx:LayoutLine Box10 set Box10.Orientation "H" new wx:LayoutLine Box11 set Box11.Orientation "H" new wx:ComboBox Box12 set Box12.In "A B C" set Box12.Title "Form" new wx:LayoutLine Box13 set Box13.Orientation "H" new std:SharedMemory Box15 connect Box03.Widget Box04.Widget1 connect Box06.Out Box07.In1 connect Box08.Out Box09.In1 connect Box01.Widget Box10.Widget1 connect Box05.Widget Box10.Widget2 connect Box00.Widget Box11.Widget1 connect Box06.Widget Box11.Widget2 connect Box10.Widget Box03.Widget1 connect Box11.Widget Box03.Widget2 connect Box08.Widget Box13.Widget1 connect Box12.Widget Box13.Widget2 connect Box13.Widget Box03.Widget3 connect Box00.BoxChange Box15.In connect Box01.BoxChange Box15.In1 connect Box05.BoxChange Box15.In2 connect Box06.BoxChange Box15.In3 connect Box08.BoxChange Box15.In4 connect Box12.BoxChange Box15.In5 connect Box15.BoxChange Box04.BoxExecute # Complex input ports input typeFormsStr Box12.In " " # Complex output ports output widget Box04.Widget " " output ActivePlaneControl Box01.Out " " output AcitiveVector Box05.Out " " output Opacity Box07.Out " " output ScaleFactor Box09.Out " " output Ratio Box00.Out " " output typeForm Box12.Out " " output boxChange Box15.BoxChange " " endefine