You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
73 lines
2.1 KiB
73 lines
2.1 KiB
package require vtk
|
|
|
|
set prefix "$VTK_DATA_ROOT/Data/headsq/quarter"
|
|
|
|
vtkRenderWindow imgWin
|
|
|
|
# Image pipeline
|
|
vtkImageReader reader
|
|
reader SetDataExtent 0 63 0 63 1 93
|
|
reader SetFilePrefix $prefix
|
|
reader SetDataByteOrderToLittleEndian
|
|
reader SetDataMask 0x7fff
|
|
|
|
set factor 4
|
|
set magFactor 8
|
|
|
|
set ops "Minimum Maximum Mean Median"
|
|
foreach operator $ops {
|
|
vtkImageShrink3D shrink${operator}
|
|
shrink${operator} SetMean 0
|
|
shrink${operator} ${operator}On
|
|
eval shrink${operator} SetShrinkFactors $factor $factor $factor
|
|
shrink${operator} SetInputConnection [reader GetOutputPort];
|
|
vtkImageMagnify mag${operator}
|
|
mag${operator} SetMagnificationFactors $magFactor $magFactor $magFactor;
|
|
mag${operator} InterpolateOff
|
|
mag${operator} SetInputConnection [shrink${operator} GetOutputPort]
|
|
vtkImageMapper mapper${operator}
|
|
mapper${operator} SetInputConnection [mag${operator} GetOutputPort]
|
|
mapper${operator} SetColorWindow 2000
|
|
mapper${operator} SetColorLevel 1000
|
|
mapper${operator} SetZSlice 45
|
|
vtkActor2D actor${operator}
|
|
actor${operator} SetMapper mapper${operator}
|
|
vtkRenderer imager${operator}
|
|
imager${operator} AddActor2D actor${operator}
|
|
imgWin AddRenderer imager${operator}
|
|
}
|
|
|
|
vtkImageShrink3D shrink
|
|
shrink SetMean 0
|
|
eval shrink SetShrinkFactors $factor $factor $factor
|
|
shrink SetInputConnection [reader GetOutputPort];
|
|
vtkImageMagnify mag
|
|
mag SetMagnificationFactors $magFactor $magFactor $magFactor;
|
|
mag InterpolateOff
|
|
mag SetInputConnection [shrink GetOutputPort]
|
|
vtkImageMapper mapper
|
|
mapper SetInputConnection [mag GetOutputPort]
|
|
mapper SetColorWindow 2000
|
|
mapper SetColorLevel 1000
|
|
mapper SetZSlice 45
|
|
vtkActor2D actor
|
|
actor SetMapper mapper
|
|
vtkRenderer imager
|
|
imager AddActor2D actor
|
|
imgWin AddRenderer imager
|
|
|
|
#shrinkMinimum Update
|
|
#shrinkMaximum Update
|
|
#shrinkMean Update
|
|
#shrinkMedian Update
|
|
|
|
imagerMinimum SetViewport 0 0 .5 .33
|
|
imagerMaximum SetViewport 0 .33 .5 .667
|
|
imagerMean SetViewport .5 0 1 .33
|
|
imagerMedian SetViewport .5 .33 1 .667
|
|
imager SetViewport 0 .667 1 1
|
|
|
|
imgWin SetSize 256 384
|
|
imgWin Render
|
|
|
|
wm withdraw .
|
|
|