load std
load vtk
load maracasvisu
load wx
load Utilities

#Reading the image
new MetaImageReader mir 
	set mir.In "D:\CAT08\TrainingData\dataset04\image04.mhd"
	#set mir.In "D:\CAT08\TrainingData\dataset04\AND\image04_resize.mhd"
	
#Viewer for the image and render
new ViewerNV mpr 
	set mpr.nTypeView "5"

new CatPoints catpV0
	set catpV0.DSDirectory "D:\CAT08\TrainingData"
	set catpV0.Vessel 0
	
new CatPoints catpV1
	set catpV1.DSDirectory "D:\CAT08\TrainingData"
	set  catpV1.Vessel 1

new CatPoints catpV2
	set catpV2.DSDirectory "D:\CAT08\TrainingData"
	set  catpV2.Vessel 2
	
new CatPoints catpV3
	set catpV3.DSDirectory "D:\CAT08\TrainingData"
    set  catpV3.Vessel 3	

#convert the points in an actor to be displayed in the render
new DrawAxis axisV0
set axisV0.FileNameAxisPoints "D:\CAT08\TrainingData\dataset04\vessel0\result.txt"
set axisV0.FileNamePoints "D:\CAT08\TrainingData\vessel0\NOEXISTE.txt"
set axisV0.Color "0.0 0.0 1.0"

new DrawAxis axisV1
set axisV1.FileNameAxisPoints "D:\CAT08\TrainingData\dataset04\vessel1\result.txt"
set axisV1.FileNamePoints "D:\CAT08\TrainingData\vessel1\NOEXISTE.txt"
set axisV1.Color "0.0 0.0 1.0"

new DrawAxis axisV2
set axisV2.FileNameAxisPoints "D:\CAT08\TrainingData\dataset04\vessel2\result.txt"
set axisV2.FileNamePoints "D:\CAT08\TrainingData\vessel2\NOEXISTE.txt"
set axisV2.Color "0.0 0.0 1.0"

new DrawAxis axisV3 
set axisV3.FileNameAxisPoints "D:\CAT08\TrainingData\dataset04\vessel3\result.txt"
set axisV3.FileNamePoints "D:\CAT08\TrainingData\vessel3\NOEXISTE.txt"
set axisV3.Color "0.0 0.0 1.0"

new DrawAxis axisV4
set axisV4.FileNameAxisPoints "D:\CAT08\Desarrollo\Utilities\data\TR_D04_V0.txt"
set axisV4.FileNamePoints "D:\CAT08\TrainingData\vessel0\NOEXISTE.txt"
set axisV4.Color "1.0 1.0 1.0"

new DrawAxis axisV5
set axisV5.FileNameAxisPoints "D:\CAT08\Desarrollo\Utilities\data\TR_D04_V1.txt"
set axisV5.FileNamePoints "D:\CAT08\TrainingData\vessel1\NOEXISTE.txt"
set axisV5.Color "1.0 1.0 0.0"

new DrawAxis axisV6
set axisV6.FileNameAxisPoints "D:\CAT08\Desarrollo\Utilities\data\TR_D04_V2.txt"
set axisV6.FileNamePoints "D:\CAT08\TrainingData\vessel2\NOEXISTE.txt"
set axisV6.Color "0.0 1.0 0.0"

new DrawAxis axisV7
set axisV7.FileNameAxisPoints "D:\CAT08\Desarrollo\Utilities\data\TR_D04_V3.txt"
set axisV7.FileNamePoints "D:\CAT08\TrainingData\vessel3\NOEXISTE.txt"
set axisV7.Color "1.0 0.0 0.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
connect mir.Out axisV4.Image
connect mir.Out axisV5.Image
connect mir.Out axisV6.Image
connect mir.Out axisV7.Image

#RENDER WITH AXIS
connect mpr.Renderer1 axisV0.InRenderer
connect mpr.Renderer1 axisV1.InRenderer
connect mpr.Renderer1 axisV2.InRenderer
connect mpr.Renderer1 axisV3.InRenderer
connect mpr.Renderer1 axisV4.InRenderer
connect mpr.Renderer1 axisV5.InRenderer
connect mpr.Renderer1 axisV6.InRenderer
connect mpr.Renderer1 axisV7.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 axisV0;exec axisV1; exec axisV2; exec axisV3;exec axisV4;exec axisV5; exec axisV6; exec axisV7" 
	#set commandButton0.In "exec catpV1 ; exec axisV1" 
	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