0031682: Visualization - Prs3d_ShadingAspect::SetTransparency() has no effect with...
[occt.git] / tests / v3d / glsl / phong_box
1 puts "========"
2 puts "Per-pixel lighting using GLSL program (Phong shading)"
3 puts "========"
4
5 # create box
6 box b 1 2 3
7
8 # draw box
9 vclear
10 vclose ALL
11 vinit View1
12 vsetdispmode 1
13 vaxo
14 vdisplay b
15 vfit
16 vrotate 0.2 0.0 0.0
17
18 # take snapshot with fixed pipeline
19 vdump $::imagedir/${::casename}_OFF.png
20 vshaderprog b phong
21 vdump $::imagedir/${::casename}_ph1.png
22
23 vclear
24 vdisplay b
25 vshaderprog b phong
26 vdump $::imagedir/${::casename}_ph2.png
27 vmoveto 250 250