0027286: Visualization, TKOpenGl - avoid using light index within built-in GLSL progr...
[occt.git] / tests / v3d / glsl / gouraud_dir2
1 puts "========"
2 puts "Per-vertex lighting using built-in GLSL program, two directional light sources."
3 puts "Visual comparison with the reference snapshot should be performed for this test case."
4 puts "========"
5
6 # setup viewer
7 vcaps -ffp 0
8 vrenderparams -shadingModel vert
9 vlight delete 0
10 vlight delete 0
11 vlight delete 0
12 vlight delete 0
13 vlight delete 0
14 vlight add ambient                color WHITE
15 vlight add directional dir  1 0 0 color GREEN headlight 1
16 vlight add directional dir -1 0 0 color RED1  headlight 1
17
18 # display shape
19 restore [locate_data_file occ/fuse.brep] f
20 vaxo
21 vdisplay f -dispmode 1
22 vfit
23 vrotate -0.5 0.0 0.0
24 vfit