0031673: Draw Harness, ViewerTest - command vlocation applies transformation in oppos...
[occt.git] / tests / bugs / vis / bug25276
1 puts "============"
2 puts "0025276: Visualization - Lighting is broken if some kinds of transformation applied to a shape"
3 puts "============"
4 puts ""
5
6 pload MODELING VISUALIZATION
7 vinit
8 box b1 1 6 1
9 vsetdispmode 1
10 vdisplay b1
11 vconnectto b2 6 0 0 b1
12 box b3 7 1 1
13 vdisplay b3
14 vlocation b3 -translate 0 4 0
15 vconnect z 0 0 0 b1 b2 b3
16
17 vconnect z1 0 0 0 z
18 vlocation z1 -translate 10 0 0
19
20 vconnect z2 0 10 0 z
21 vlocation z2 -prerotate 0 0 0 1 0 0 90
22
23 vconnect z3 -10 0 0 z
24 vlocation z3 -prescale 0 0 0 0.5
25
26 vconnect z4 0 0 0 z
27 vlocation z4 -copyFrom z3
28
29 psphere sp 3
30 vdisplay sp
31 vlocation sp -copyFrom z3
32 vlocation sp -reset
33
34 vlocation z -mirror 0 -0.5 0 0 1 0
35 vfit
36
37 vdump $imagedir/${casename}.png