1package require vtk 2package require vtkinteraction 3 4# Create the RenderWindow, Renderer and both Actors 5# 6vtkRenderer ren1 7vtkRenderWindow renWin 8 renWin AddRenderer ren1 9vtkRenderWindowInteractor iren 10 iren SetRenderWindow renWin 11 12# read data 13# 14vtkMultiBlockPLOT3DReader pl3d 15 pl3d SetXYZFileName "$VTK_DATA_ROOT/Data/combxyz.bin" 16 pl3d SetQFileName "$VTK_DATA_ROOT/Data/combq.bin" 17 pl3d SetScalarFunctionNumber 100 18 pl3d SetVectorFunctionNumber 202 19 pl3d Update 20 set output [[pl3d GetOutput] GetBlock 0] 21 22# planes to connect 23vtkStructuredGridGeometryFilter plane1 24 plane1 SetInputData $output 25 plane1 SetExtent 20 20 0 100 0 100 26vtkPolyDataConnectivityFilter conn 27 conn SetInputConnection [plane1 GetOutputPort] 28 conn ScalarConnectivityOn 29 conn SetScalarRange 0.19 0.25 30 conn Update 31 conn Print 32 33vtkPolyDataMapper plane1Map 34 plane1Map SetInputConnection [conn GetOutputPort] 35 eval plane1Map SetScalarRange [$output GetScalarRange] 36vtkActor plane1Actor 37 plane1Actor SetMapper plane1Map 38 [plane1Actor GetProperty] SetOpacity 0.999 39 40# outline 41vtkStructuredGridOutlineFilter outline 42 outline SetInputData $output 43vtkPolyDataMapper outlineMapper 44 outlineMapper SetInputConnection [outline GetOutputPort] 45vtkActor outlineActor 46 outlineActor SetMapper outlineMapper 47 set outlineProp [outlineActor GetProperty] 48 eval $outlineProp SetColor 0 0 0 49 50# Add the actors to the renderer, set the background and size 51# 52ren1 AddActor outlineActor 53ren1 AddActor plane1Actor 54ren1 SetBackground 1 1 1 55renWin SetSize 300 300 56 57vtkCamera cam1 58 cam1 SetClippingRange 14.29 63.53 59 cam1 SetFocalPoint 8.58522 1.58266 30.6486 60 cam1 SetPosition 37.6808 -20.1298 35.4016 61 cam1 SetViewAngle 30 62 cam1 SetViewUp -0.0566235 0.140504 0.98846 63ren1 SetActiveCamera cam1 64 65iren Initialize 66 67# render the image 68# 69iren AddObserver UserEvent {wm deiconify .vtkInteract} 70 71# prevent the tk window from showing up then start the event loop 72wm withdraw . 73 74 75 76