load vtk
load wxvtk
load creaMaracasVisu
load std
load wx

new FileSelector filselect0
	set filselect0.Message "Select image"
	set filselect0.Wildcard "*.mhd"
	#set filselect0.DefaultDir "C:\Creatis\creaAppli\Data\Images"		
new MetaImageReader gimm	
               	connect filselect0.Out gimm.In
new ImageCastToUShort image
	connect gimm.Out image.In	

new VolumeRendering volrend
                connect image.Out volrend.In1
new SurfaceRendering surrend	
              # connect image.Out surrend.In0

new ViewerNV view1
set view1.nTypeView 6
                connect gimm.Out view1.In
	
new CutModule2 cut
	connect view1.Interactor1 cut.Interactor
	connect view1.Renderer1 cut.Renderer
	connect image.Out cut.In
	
new ViewerNV view2
	set view2.nTypeView 6
	connect image.Out view2.In

connect view1.BoxChange cut.BoxExecute	

new LayoutSplit layoutsplit1
                set layoutsplit1.Orientation V
                connect volrend.Widget layoutsplit1.Widget1
                connect surrend.Widget layoutsplit1.Widget2

                new LayoutSplit layoutsplit2
               	                set layoutsplit2.Orientation H
                                connect layoutsplit1.Widget layoutsplit2.Widget1
                                #connect view1.Widget layoutsplit2.Widget2

                new LayoutTab laytab
                                connect laytab.Widget layoutsplit2.Widget2 
                                connect view1.Widget laytab.Widget2
	                connect view2.Widget laytab.Widget1   

new LayoutLine layoutline1	
	connect cut.Widget layoutline1.Widget1	
	
new LayoutSplit layoutsplit3
	set layoutsplit3.Orientation H
	set layoutsplit3.Proportion 80
                set layoutsplit3.WinTitle "Cutting Tool"
	connect layoutline1.Widget layoutsplit3.Widget2 
	connect layoutsplit2.Widget layoutsplit3.Widget1
	
exec layoutsplit3

set cut.BoxExecute 1
exec cut

connect view2.Renderer1 volrend.Renderer
connect view2.Renderer1 surrend.Renderer

exec volrend
exec surrend

#connect cut.BoxChange volrend.BoxExecute
#connect cut.BoxChange volrend.BoxExecute