0031087: Configuration - make FreeType dependency optional [part 2]
[occt.git] / tests / v3d / anim / scale
CommitLineData
1beb58d7 1puts "=================================="
2puts "Viewer animation - scale the view camera"
3puts "=================================="
4
5pload MODELING VISUALIZATION
6
7vclear
8vinit View1
9vaxo
10vzbufftrihedron
11
12box b1 -50 -50 0 100 100 100
13vdisplay -noupdate -dispMode 1 b1
14vfit -noupdate
15vzoom 0.2
16
17vanimation anim -clear
18vanimation anim/zoom -view -scale1 1.2 -scale2 4.8 -duration 2
19
20vanimation anim -play 0.0 0.0
ba00aab7 21if {[vreadpixel 230 220 rgb name] != "DARKGOLDENROD" || [vreadpixel 250 220 rgb name] != "BLACK"} { puts "Error: Camera scale result is wrong!" }
1beb58d7 22vdump $imagedir/${casename}_0.png
23
24vanimation anim -play 1.0 0.0
ba00aab7 25if {[vreadpixel 250 220 rgb name] != "DARKGOLDENROD" || [vreadpixel 270 220 rgb name] != "BLACK"} { puts "Error: Camera scale result is wrong!" }
1beb58d7 26vdump $imagedir/${casename}_1.png
27
28vanimation anim -play 2.0 0.0
ba00aab7 29if {[vreadpixel 334 220 rgb name] != "DARKGOLDENROD" || [vreadpixel 350 220 rgb name] != "BLACK"} { puts "Error: Camera scale result is wrong!" }
1beb58d7 30vdump $imagedir/${casename}_2.png
31
32puts "Put the following command to start interactive animation:"
33puts " vanimation anim -play"