dbc8becf |
1 | puts "============" |
2 | puts "0031673: Draw Harness, ViewerTest - vlocation -rotate is applied in opposite order" |
3 | puts "============" |
4 | puts "" |
5 | |
6 | pload MODELING VISUALIZATION |
7 | box b -1 -1 -1 2 2 2 |
8 | explode b F |
9 | vclear |
10 | vinit View1 |
11 | vdisplay -dispMode 0 b_1 b_3 b_4 b_6 |
12 | vdisplay -dispMode 1 b_2 b_5 |
13 | vfit |
14 | vzoom 0.4 |
15 | vlocation b_2 -reset |
16 | vlocation b_5 -reset |
17 | vlocation b_2 -rotate 1 -1 -1 0 1 0 90 |
18 | vlocation b_2 -rotate -1 -1 -1 0 1 0 90 |
19 | vlocation b_5 -rotate -1 -1 -1 0 1 0 90 |
20 | if { [vreadpixel 170 380 -rgb -name] == "BLACK" } { puts "Error: wrong rotation" } |
21 | |
22 | vdump ${imagedir}/${casename}.png |