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.
49 lines
1.3 KiB
49 lines
1.3 KiB
package require vtk
|
|
package require vtkinteraction
|
|
|
|
# create a rendering window and renderer
|
|
vtkRenderer ren1
|
|
vtkRenderWindow renWin
|
|
renWin AddRenderer ren1
|
|
renWin StereoCapableWindowOn
|
|
vtkRenderWindowInteractor iren
|
|
iren SetRenderWindow renWin
|
|
|
|
vtkGenericEnSightReader reader
|
|
reader SetCaseFileName "$VTK_DATA_ROOT/Data/EnSight/elements.case"
|
|
reader Update
|
|
|
|
vtkGeometryFilter geom0
|
|
geom0 SetInputConnection [reader GetOutputPort]
|
|
vtkGeometryFilter geom1
|
|
geom1 SetInput [reader GetOutput 1]
|
|
|
|
vtkPolyDataMapper mapper0
|
|
mapper0 SetInputConnection [geom0 GetOutputPort]
|
|
mapper0 SetColorModeToMapScalars
|
|
mapper0 SetScalarModeToUsePointFieldData
|
|
mapper0 ColorByArrayComponent "pointScalars" 0
|
|
mapper0 SetScalarRange 0 112
|
|
vtkPolyDataMapper mapper1
|
|
mapper1 SetInputConnection [geom1 GetOutputPort]
|
|
mapper1 SetColorModeToMapScalars
|
|
mapper1 SetScalarModeToUsePointFieldData
|
|
mapper1 ColorByArrayComponent "pointScalars" 0
|
|
mapper1 SetScalarRange 0 112
|
|
|
|
vtkActor actor0
|
|
actor0 SetMapper mapper0
|
|
vtkActor actor1
|
|
actor1 SetMapper mapper1
|
|
|
|
# assign our actor to the renderer
|
|
ren1 AddActor actor0
|
|
ren1 AddActor actor1
|
|
|
|
# enable user interface interactor
|
|
iren AddObserver UserEvent {wm deiconify .vtkInteract}
|
|
iren Initialize
|
|
|
|
# prevent the tk window from showing up then start the event loop
|
|
wm withdraw .
|
|
|
|
|