1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
|
package require vtk
# Doubles the The number of images (x dimension).
# Image pipeline
vtkImageReader reader
reader ReleaseDataFlagOff
reader SetDataByteOrderToLittleEndian
reader SetDataExtent 0 63 0 63 1 93
reader SetDataSpacing 3.2 3.2 1.5
reader SetFilePrefix "$VTK_DATA_ROOT/Data/headsq/quarter"
reader SetDataMask 0x7fff
vtkImageResample magnify
magnify SetDimensionality 3
magnify SetInputConnection [reader GetOutputPort]
magnify SetAxisOutputSpacing 0 0.52
magnify SetAxisOutputSpacing 1 2.2
magnify SetAxisOutputSpacing 2 0.8
magnify ReleaseDataFlagOff
vtkImageViewer viewer
viewer SetInputConnection [magnify GetOutputPort]
viewer SetZSlice 30
viewer SetColorWindow 2000
viewer SetColorLevel 1000
viewer Render
|