Friday, October 6, 2006
John Allison  Geant4 Workshop  Lisbon  October 2006
6
Animation commands
/control/verbose 2
/vis/verbose confirmations
/run/initialize
/vis/open OGLSX 600x600-0+0
/vis/drawVolume tube_phys
/vis/viewer/set/viewpointThetaPhi 30 30
/vis/viewer/set/style surface
/vis/geometry/set/visibility tube_L ! true
/vis/geometry/set/visibility divided_tube_L ! false
/vis/geometry/set/visibility sub_divided_tube_L ! false
/vis/geometry/set/colour daughter_box_L ! blue
/vis/viewer/addCutawayPlane -220 0 0 cm -1 0 0
/vis/viewer/addCutawayPlane 0 -24 0 cm 0 -1 0
/vis/viewer/addCutawayPlane 0 0 -1 cm 0 0 -1
#/vis/oglx/set/printEPS true
/control/verbose 0
/vis/verbose quiet
/control/loop cutaway.loop x -150 -250 -0.1

where cutaway.loop is

/vis/viewer/changeCutawayPlane 0 {x} 0 0 cm -1 0 0
/vis/viewer/zoom 1.001
/vis/viewer/update