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.
33 lines
763 B
33 lines
763 B
2 years ago
|
package require vtk
|
||
|
|
|
||
|
|
# This script shows how to use vtkImageEuclideanDistance
|
||
|
|
|
||
|
|
# Image pipeline
|
||
|
|
|
||
|
|
vtkPNGReader reader
|
||
|
|
reader SetFileName "$VTK_DATA_ROOT/Data/fullhead15.png"
|
||
|
|
|
||
|
|
vtkImageCast cast
|
||
|
|
cast SetOutputScalarTypeToShort
|
||
|
|
cast SetInputConnection [reader GetOutputPort]
|
||
|
|
|
||
|
|
vtkImageThreshold thresh
|
||
|
|
thresh SetInputConnection [cast GetOutputPort]
|
||
|
|
thresh ThresholdByUpper 2000.0
|
||
|
|
thresh SetInValue 0
|
||
|
|
thresh SetOutValue 200
|
||
|
|
thresh ReleaseDataFlagOff
|
||
|
|
|
||
|
|
vtkImageEuclideanDistance dist
|
||
|
|
dist SetInputConnection [thresh GetOutputPort]
|
||
|
|
dist SetAlgorithmToSaitoCached
|
||
|
|
|
||
|
|
vtkImageViewer viewer
|
||
|
|
viewer SetInputConnection [dist GetOutputPort]
|
||
|
|
viewer SetColorWindow 117
|
||
|
|
viewer SetColorLevel 43
|
||
|
|
|
||
|
|
viewer Render
|
||
|
|
|
||
|
|
source [file join [file dirname [info script]] WindowLevelInterface.tcl]
|