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