vtkRenderWindow renWin
renWin SetSize 300 300
vtkRenderer ren2
ren2 SetViewport 0.0 0.0 1.0 1.0
ren2 SetBackground 0.1 0.2 0.4
renWin AddRenderer ren2
renWin Render

vtkSLCReader negReader
negReader SetFileName "neghip.slc"
vtkVolumeTextureMapper2D negMapper
negMapper SetInput  [negReader GetOutput]

vtkPiecewiseFunction negOpacity
negOpacity AddPoint 0 0.0
negOpacity AddPoint 255 0.2
vtkColorTransferFunction negColor
negColor AddRGBPoint 64 1.0 0.0 0.0
negColor AddRGBPoint 128 0.0 0.0 1.0
negColor AddRGBPoint 196 0.0 1.0 0.0

vtkVolumeProperty negProperty
negProperty SetColor negColor
negProperty SetScalarOpacity negOpacity
vtkVolume negVolume
negVolume SetMapper negMapper
negVolume SetProperty negProperty
ren2 AddProp negVolume
ren2 ResetCamera
renWin Render

vtkPolyDataReader posReader
posReader SetFileName "Skin.vtk"
vtkPolyDataMapper posMapper
posMapper SetInput [posReader GetOutput]
vtkActor posActor
posActor SetMapper posMapper

ren2 AddProp posActor
ren2 ResetCamera
renWin Render

vtkScalarBarActor scalarBar
scalarBar SetLookupTable negColor
scalarBar SetTitle "Density"
set sPC [scalarBar GetPositionCoordinate]
$sPC SetCoordinateSystemToNormalizedViewport
$sPC SetValue 0.8 0.1
ren2 AddProp scalarBar
renWin Render

set cam [ren2 GetActiveCamera]
$cam Azimuth 0.0
$cam Elevation 10.0
renWin Render

vtkRenderWindowInteractor iren
iren SetRenderWindow renWin
iren Initialize