0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug26357
CommitLineData
539d3a1b 1puts "============"
2puts "CR26357"
3puts "============"
4puts ""
5
6#########################################################################
7puts "Panning regression after fixing 0026082"
8#########################################################################
9
10box b 100 100 100
11
12vinit View1 w=400 h=400
13vinit View2 w=200 h=400
14vinit View3 w=400 h=200
15vclear
16vaxo
17
18vdisplay b
19
20# Test panning with aspect ratio 1:1
21vactivate View1
22vfit
23vpan 200 0
24vmoveto 399 200
25checkcolor 399 200 0 1 1
26vpan -200 0
27vmoveto 200 200
28checkcolor 200 200 0 1 1
29vdump ${imagedir}/${casename}_1.png
30
31# Test panning with aspect ratio 1:2
32vactivate View2
33vfit
34vpan 100 0
35vmoveto 199 100
36checkcolor 199 100 0 1 1
37vpan -100 0
38vmoveto 100 100
39checkcolor 100 100 0 1 1
40vdump ${imagedir}/${casename}_2.png
41
42# Test panning with aspect ratio 2:1
43vactivate View3
44vfit
45vpan 200 0
46vmoveto 399 100
47checkcolor 399 100 0 1 1
48vpan -200 0
49vmoveto 200 100
50checkcolor 200 100 0 1 1
51vdump ${imagedir}/${casename}_3.png