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.
68 lines
1.8 KiB
68 lines
1.8 KiB
2 years ago
|
package require vtk
|
||
|
package require vtkinteraction
|
||
|
|
||
|
# Example demonstrates how to generate a 3D tetrahedra mesh from a volume. This example
|
||
|
# differs from clipVolume.tcl in that the mesh is generated within a range of contour values.
|
||
|
#
|
||
|
|
||
|
# Quadric definition
|
||
|
vtkQuadric quadric
|
||
|
quadric SetCoefficients .5 1 .2 0 .1 0 0 .2 0 0
|
||
|
|
||
|
vtkSampleFunction sample
|
||
|
sample SetSampleDimensions 20 20 20
|
||
|
sample SetImplicitFunction quadric
|
||
|
sample ComputeNormalsOff
|
||
|
|
||
|
# Program a bandpass filter to clip a range of data. What we do is transform the
|
||
|
# scalars so that values lying betweeen (minRange,maxRange) are >= 0.0; all
|
||
|
# others are < 0.0,
|
||
|
vtkImplicitDataSet dataset
|
||
|
dataset SetDataSet [sample GetOutput]
|
||
|
vtkImplicitWindowFunction window
|
||
|
window SetImplicitFunction dataset
|
||
|
window SetWindowRange 0.5 1.0
|
||
|
|
||
|
# Generate tetrahedral mesh
|
||
|
vtkClipVolume clip
|
||
|
clip SetInputConnection [sample GetOutputPort]
|
||
|
clip SetClipFunction window
|
||
|
clip SetValue 0.0
|
||
|
clip GenerateClippedOutputOff
|
||
|
|
||
|
vtkDataSetMapper clipMapper
|
||
|
clipMapper SetInputConnection [clip GetOutputPort]
|
||
|
clipMapper ScalarVisibilityOff
|
||
|
|
||
|
vtkActor clipActor
|
||
|
clipActor SetMapper clipMapper
|
||
|
[clipActor GetProperty] SetColor .8 .4 .4
|
||
|
|
||
|
# Create outline
|
||
|
vtkOutlineFilter outline
|
||
|
outline SetInput [clip GetInput]
|
||
|
|
||
|
vtkPolyDataMapper outlineMapper
|
||
|
outlineMapper SetInputConnection [outline GetOutputPort]
|
||
|
|
||
|
vtkActor outlineActor
|
||
|
outlineActor SetMapper outlineMapper
|
||
|
eval [outlineActor GetProperty] SetColor 0 0 0
|
||
|
|
||
|
# Define graphics objects
|
||
|
vtkRenderer ren1
|
||
|
vtkRenderWindow renWin
|
||
|
renWin AddRenderer ren1
|
||
|
vtkRenderWindowInteractor iren
|
||
|
iren SetRenderWindow renWin
|
||
|
|
||
|
ren1 SetBackground 1 1 1
|
||
|
ren1 AddActor clipActor
|
||
|
ren1 AddActor outlineActor
|
||
|
|
||
|
iren AddObserver UserEvent {wm deiconify .vtkInteract}
|
||
|
iren Initialize
|
||
|
|
||
|
|
||
|
wm withdraw .
|