1 | # $Id: vis.mac,v 1.4 2006/11/06 11:58:46 allison Exp $ |
---|
2 | |
---|
3 | # Set verbosity |
---|
4 | /control/verbose 2 |
---|
5 | #/vis/verbose confirmations |
---|
6 | |
---|
7 | # Set sleep pause |
---|
8 | /control/alias pause 2 |
---|
9 | |
---|
10 | # See tree |
---|
11 | /vis/ASCIITree/verbose 2 |
---|
12 | /vis/drawTree worlds |
---|
13 | /control/shell sleep {pause} |
---|
14 | |
---|
15 | # Open viewer |
---|
16 | /vis/open OGLSX 600x600-0+0 |
---|
17 | /vis/viewer/set/viewpointThetaPhi 30 30 |
---|
18 | |
---|
19 | # Draw material world |
---|
20 | /vis/drawVolume |
---|
21 | /control/shell sleep {pause} |
---|
22 | |
---|
23 | # Draw parallel world |
---|
24 | /vis/drawVolume ParallelScoringWorld |
---|
25 | /control/shell sleep {pause} |
---|
26 | |
---|
27 | # Draw specific sub volume from material world |
---|
28 | /vis/drawVolume PhantomLayerPhysical 15 |
---|
29 | /control/shell sleep {pause} |
---|
30 | |
---|
31 | # Draw specific sub volume from parallel world |
---|
32 | /vis/drawVolume GhostLayerPhysical 25 |
---|
33 | /control/shell sleep {pause} |
---|
34 | |
---|
35 | # Draw both together |
---|
36 | /vis/drawVolume PhantomLayerPhysical 16 |
---|
37 | /vis/scene/add/volume GhostLayerPhysical 25 |
---|
38 | /control/shell sleep {pause} |
---|
39 | |
---|
40 | # Draw all worlds |
---|
41 | /vis/drawVolume worlds |
---|
42 | /control/shell sleep {pause} |
---|
43 | |
---|
44 | # Reduce verbosity from here on |
---|
45 | /vis/verbose warnings |
---|
46 | |
---|
47 | # Make replica container invisible |
---|
48 | /vis/geometry/set/visibility phantomLogical ! false |
---|
49 | /vis/geometry/set/visibility GhostLogical ! false |
---|
50 | |
---|
51 | # Set specific colur for identification |
---|
52 | /vis/geometry/set/colour GhostLayerLogical ! red |
---|
53 | /control/shell sleep {pause} |
---|
54 | |
---|
55 | # Restore |
---|
56 | /vis/geometry/restore |
---|
57 | /control/shell sleep {pause} |
---|
58 | |
---|
59 | # Adjust a few viewer parameters |
---|
60 | # Take advantage of transparency redering in OpenGL |
---|
61 | /vis/ogl/set/transparency true |
---|
62 | /vis/viewer/set/hiddenMarker true |
---|
63 | |
---|
64 | # Force real world to be solid and transparent |
---|
65 | /vis/geometry/set/forceSolid phantomLogical -1 true |
---|
66 | /vis/geometry/set/colour phantomLogical -1 .1 .1 .1 .1 |
---|
67 | /control/shell sleep {pause} |
---|
68 | |
---|
69 | # Set up a run |
---|
70 | /vis/scene/add/trajectories |
---|
71 | /vis/modeling/trajectories/create/drawByCharge |
---|
72 | /vis/modeling/trajectories/drawByCharge-0/default/setDrawStepPts true |
---|
73 | /vis/modeling/trajectories/drawByCharge-0/default/setStepPtsSize 2 |
---|
74 | /vis/scene/add/hits |
---|
75 | /run/beamOn |
---|
76 | /control/shell sleep {pause} |
---|
77 | |
---|
78 | # Now ready to run/beamOn or /control/execute test.mac |
---|
79 | # Restore and make clean scene |
---|
80 | # /vis/geometry/restore |
---|
81 | # /vis/drawVolume worlds |
---|