7f917335 |
1 | puts "============" |
2 | puts "CR25540" |
3 | puts "Check that the discretization of local selection," |
4 | puts "wireframe and shaded presentation of shape is identical." |
5 | puts "============" |
6 | puts "" |
7 | |
8 | vinit View1 w=912 h=912 |
9 | vclear |
10 | |
11 | # Create object in shaded mode |
12 | vsetdispmode 1 |
13 | pcylinder p 1 100 |
14 | vdisplay p |
15 | vfit |
16 | |
17 | # Setup field of view |
18 | vrotate 1 1.5 0 |
19 | vfit |
20 | vtranslateview 24 18.5 0 |
21 | vzoom 32 |
22 | vtranslateview -0.1 -0.6 0 |
23 | vzoom 2 |
24 | |
25 | vdump $imagedir/${casename}_shaded_pres.png |
26 | |
27 | vmoveto 100 100 |
28 | vdump $imagedir/${casename}_h_pres.png |
29 | |
30 | # Activate the local selection by edges and hilight small circle edge. |
31 | # It's discretization should coincide with discretization of whole shape hiligting. |
32 | vsetam 2 |
33 | vmoveto 130 80 |
34 | vdump $imagedir/${casename}_local_h_pres.png |
35 | |
36 | vunsetam |
37 | |
38 | # Explode object on faces |
39 | explode p F |
40 | # Create colored shape: set another color to one face |
41 | vaspects p -subshapes p_3 -setcolor RED |
42 | |
43 | vsetam 0 |
44 | vmoveto 100 100 |
45 | vdump $imagedir/${casename}_h_sub_pres.png |
46 | |
47 | vsetam 2 |
48 | vmoveto 130 80 |
49 | vdump $imagedir/${casename}_local_h_sub_pres.png |