load std
load vtk
load maracasvisu
load wx
load Utilities

#Reading the image
new MetaImageReader mir 
	set mir.In "C:\CAT08\TestData\testing\dataset13\image13.mhd"
	
#Viewer for the image and render
new ViewerNV mpr 
	set mpr.nTypeView "2"

new CatPoints catpV0
	set catpV0.DSDirectory "C:\CAT08\TestData\testing\dataset13"
	set catpV0.Vessel 0
	
new CatPoints catpV1
	set catpV1.DSDirectory "C:\CAT08\TestData\testing\dataset13"
	set  catpV1.Vessel 1

new CatPoints catpV2
	set catpV2.DSDirectory "C:\CAT08\TestData\testing\dataset13"
	set  catpV2.Vessel 2
	
new CatPoints catpV3
	set catpV3.DSDirectory "C:\CAT08\TestData\testing\dataset13"
    set  catpV3.Vessel 3	

#convert the points in an actor to be displayed in the render
new DrawAxis axisV0
set axisV0.FileNameAxisPoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel0\result.txt"
set axisV0.FileNamePoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel0\NOEXISTE.txt"
set axisV0.Color "1.0 0.0 0.0"

new DrawAxis axisV1
set axisV1.FileNameAxisPoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel1\result.txt"
set axisV1.FileNamePoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel1\NOEXISTE.txt"
set axisV1.Color "0.0 1.0 0.0"

new DrawAxis axisV2
set axisV2.FileNameAxisPoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel2\result.txt"
set axisV2.FileNamePoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel2\NOEXISTE.txt"
set axisV2.Color "0.0 0.0 1.0"

new DrawAxis axisV3 
set axisV3.FileNameAxisPoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel3\result.txt"
set axisV3.FileNamePoints "C:\CAT08\TestData\testing\Testing_13_17\dataset13\vessel3\NOEXISTE.txt"
set axisV3.Color "1.0 1.0 1.0"


#CONNECTING THE BOXES
#MIReader to mpr
connect mir.Out mpr.In

#MIR WITH AXIS
connect mir.Out axisV0.Image
connect mir.Out axisV1.Image
connect mir.Out axisV2.Image
connect mir.Out axisV3.Image

#RENDER WITH AXIS
connect mpr.Renderer1 axisV0.InRenderer
connect mpr.Renderer1 axisV1.InRenderer
connect mpr.Renderer1 axisV2.InRenderer
connect mpr.Renderer1 axisV3.InRenderer

#DRAW POINTS
connect  mpr.Renderer1 catpV0.InRenderer
connect  mpr.Renderer1 catpV1.InRenderer
connect  mpr.Renderer1 catpV2.InRenderer
connect  mpr.Renderer1 catpV3.InRenderer


#Botones
new CommandButton commandButton0   
	#set commandButton0.In "exec catpV0; exec catpV1 ;exec catpV2 ;exec catpV3; exec axisV0;exec axisV1; exec axisV2; exec axisV3" 
	set commandButton0.In "exec catpV2 ; exec axisV2" 
	set commandButton0.Label "ViewAxis"
	
#Interface
#Splits de interfaz
new LayoutSplit mainSplit  
	set mainSplit.Orientation H 
new LayoutLine layLine
	connect layLine.Widget mainSplit.Widget1
new LayoutLine layLine1
	connect layLine1.Widget mainSplit.Widget2

	
#Conecta botones y slider al wiget de LayoutLine
connect commandButton0.Widget layLine.Widget1

#Conecta el mpr al main
connect mpr.Widget layLine1.Widget1	

exec mainSplit