bf02aa7d |
1 | puts "============" |
2 | puts "CR26617" |
3 | puts "============" |
4 | puts "" |
5 | |
6 | ########################################################################################## |
7 | # Visualization, Ray Tracing - adopt progressive rendering Path Tracing for rendering stereoscopic pair |
8 | ########################################################################################## |
9 | |
10 | # custom shapes |
11 | set aShape1 [locate_data_file occ/Top.brep] |
12 | set aShape2 [locate_data_file occ/Bottom.brep] |
13 | |
14 | # setup 3D viewer content |
15 | vinit name=View1 w=512 h=512 |
16 | vglinfo |
17 | |
18 | vvbo 0 |
19 | vsetdispmode 1 |
aaf8d6a9 |
20 | vbackground -gradient B4C8FF B4B4B4 -gradientMode VERTICAL |
bf02aa7d |
21 | restore $aShape1 s1 |
22 | restore $aShape2 s2 |
23 | vdisplay s1 s2 |
24 | vsetmaterial s1 Silver |
25 | vsetmaterial s2 Pewter |
26 | vsetlocation s1 0.0 0.1 0.0 |
992ed6b3 |
27 | vlight -change 0 -dir 0.577 -0.577 -0.577 |
bf02aa7d |
28 | |
29 | # activate ray-tracing |
30 | vrenderparams -raytrace |
31 | vtextureenv on 5 |
32 | vrenderparams -reflections -gi |
33 | |
34 | # activate stereo |
35 | vstereo on |
36 | vstereo -mode anaglyph |
37 | vcamera -iod 0.1 |
38 | vfit |