package require vtk
vtkSphereSource sphere
sphere SetRadius 1.0
sphere SetPhiResolution 100
sphere SetThetaResolution 50
vtkPolyDataWriter writer
writer SetInput [sphere GetOutput]
writer SetFileName sphere1.vtk
writer Write
sphere Delete
writer Delete
MacPortsでvtk5をインストール．デフォルトは，Cocoa．X11ではコンパイルに失敗した．まずは，お手軽にTclで球を描いてファイルに保存．次のスクリプトを適当な名前（例えばsphere1.tcl）で保存して，実行（vtk sphere1.tcl）．
0 件のコメント:
コメントを投稿