0717ddc1 |
1 | puts "============" |
2 | puts "CR25103" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # Visualization - Regression in interactive detection |
7 | ####################################################################### |
8 | |
9 | vinit |
10 | vsetdispmode 1 |
11 | |
12 | box wall1 1 8 8 |
13 | box wall2 1 8 8 |
14 | box wall3 16 8 1 |
15 | |
16 | vdisplay wall1 |
17 | vdisplay wall2 |
18 | vdisplay wall3 |
19 | |
20 | vsetlocation wall1 -10 0 0 |
21 | vsetlocation wall2 5 0 0 |
22 | vsetlocation wall3 -10 0 -1 |
23 | |
24 | vsetmaterial wall1 stone |
25 | vsetmaterial wall2 stone |
26 | vsetmaterial wall3 pewter |
27 | |
28 | vsetcolor wall1 red |
29 | vsetcolor wall2 green |
30 | |
27af3052 |
31 | vfront |
0717ddc1 |
32 | vturnview 0 -0.3 0 |
33 | vfit |
34 | |
35 | set anImage ${imagedir}/${casename}_1.png |
36 | vdump ${anImage} |
37 | |
38 | # The next line should highlight the green box (wall2) but it does not |
39 | vmoveto 394 205 |
40 | |
41 | set anImage ${imagedir}/${casename}_2.png |
42 | vdump ${anImage} |
43 | |
44 | # The next line should not hit any object but it highlights the green box |
45 | vmoveto 264 205 |
46 | |
47 | set anImage ${imagedir}/${casename}_3.png |
48 | vdump ${anImage} |