load wx 
load std 
load vtk 
load maracasvisu 
load AxisExtraction
load Utilities

new MetaImageReader mir
#set mir.In "C:\CAT08\Desarrollo\Utilidades\imagenesBinarias\image00_SC_LC.mhd"
  set mir.In "C:\CAT08\Desarrollo\Utilidades\imagenesBinarias\image00_SC_AND_V0_1076.mhd"
#set mir.In "C:\CAT08\TrainingImageData\dataset00\image00.mhd"
#set mir.In "D:\CAT08\TrainingData\C-Fontaine-Carotide\image.maracas.mhd"
#set mir.In "D:\CAT08\TrainingData\dataset00\AND\ImageBin_RC_D00_S00.mhd"
#set mir.In "C:\CAT08\ImagenesMariaAlejandra\test-artery_USHORT.mhd"


new ViewerNV mpr
set mpr.nTypeView "5"
connect mir.Out mpr.In

new MarchingCubes marcub
new PolyDataRender polren

#TEST AXES
#convert the points in an actor to be displayed in the render
new DrawAxis axisV0
set axisV0.FileNameAxisPoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_V0.txt"
set axisV0.FileNamePoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_P0.txt"
set axisV0.Color "1.0 0.0 0.0"

new DrawAxis axisV1
set axisV1.FileNameAxisPoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_V1.txt"
set axisV1.FileNamePoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_P1.txt"
set axisV1.Color "0.0 1.0 0.0"

new DrawAxis axisV2
set axisV2.FileNameAxisPoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_V2.txt"
set axisV2.FileNamePoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_P2.txt"
set axisV2.Color "0.0 0.0 1.0"

new DrawAxis axisV3 
set axisV3.FileNameAxisPoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_V3.txt"
set axisV3.FileNamePoints "C:\CAT08\Desarrollo\Utilidades\Utilities\data\TR_D00_P3.txt"
set axisV3.Color "1.0 1.0 1.0"

new CommandButton commandButton   
	set commandButton.Label "RUN" 

new Slider isoValue
set isoValue.Title "Slider"
set isoValue.Max 4000
set isoValue.Min 1070
set isoValue.In  1076
	
#Caja de marchingCubes
connect mir.Out marcub.In
connect isoValue.Out marcub.Value



#Connect marching to polyrender
connect marcub.Out polren.PolyData
connect mpr.Renderer1 polren.InRenderer

#CONNECTIONS TEST AXES
#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

#Interface

#Displaying the point
new OutputText ot
  connect mpr.Point ot.In
  connect mpr.BoxChange ot.BoxExecute

	
new LayoutSplit mainSplit  
	set mainSplit.Orientation H 
new LayoutLine layLine
	connect layLine.Widget mainSplit.Widget1
new LayoutLine layLine1
	connect layLine1.Widget mainSplit.Widget2
	
#Left of the interface where controls are to be placed
connect commandButton.Widget layLine.Widget1
connect ot.Widget layLine.Widget2
connect isoValue.Widget layLine.Widget3
#Right where the viewers are to be placed
connect mpr.Widget layLine1.Widget1
#Refreshing
#Button
#connect commandButton.BoxChange  mpr.BoxExecute
connect commandButton.BoxChange  axisV0.BoxExecute
connect commandButton.BoxChange  axisV1.BoxExecute
connect commandButton.BoxChange  axisV2.BoxExecute
connect commandButton.BoxChange  axisV3.BoxExecute
#Marching cubes
new MultipleInputs refresh
#connect commandButton.BoxChange  refresh.In1
#connect isoValue.BoxChange refresh.In2
#connect refresh.Out polren.BoxExecute
connect isoValue.BoxChange polren.BoxExecute

exec mainSplit