7d9e854b |
1 | puts "============" |
2 | puts "OCC25276" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # Visualization - Lighting is broken if some kinds of transformation applied to a shape |
7 | ####################################################################### |
8 | |
9 | pload ALL |
10 | vinit |
11 | box b1 1 6 1 |
12 | vsetdispmode 1 |
13 | vdisplay b1 |
14 | vconnectto b2 6 0 0 b1 |
15 | box b3 7 1 1 |
16 | vdisplay b3 |
1beb58d7 |
17 | vlocation b3 -translate 0 4 0 |
7d9e854b |
18 | vconnect z 0 0 0 b1 b2 b3 |
19 | |
20 | vconnect z1 0 0 0 z |
1beb58d7 |
21 | vlocation z1 -translate 10 0 0 |
7d9e854b |
22 | |
23 | vconnect z2 0 10 0 z |
1beb58d7 |
24 | vlocation z2 -rotate 0 0 0 1 0 0 90 |
7d9e854b |
25 | |
26 | vconnect z3 -10 0 0 z |
1beb58d7 |
27 | vlocation z3 -scale 0 0 0 0.5 |
7d9e854b |
28 | |
29 | vconnect z4 0 0 0 z |
1beb58d7 |
30 | vlocation z4 -copyFrom z3 |
7d9e854b |
31 | |
32 | psphere sp 3 |
33 | vdisplay sp |
1beb58d7 |
34 | vlocation sp -copyFrom z3 |
35 | vlocation sp -reset |
7d9e854b |
36 | |
1beb58d7 |
37 | vlocation z -mirror 0 -0.5 0 0 1 0 |
7d9e854b |
38 | vfit |
39 | |
40 | vdump $imagedir/${casename}.png |