File: gouraud_dir2

package info (click to toggle)
opencascade 7.3.0%2Bdfsg1-5
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 278,376 kB
  • sloc: cpp: 1,136,010; ansic: 81,569; tcl: 14,864; cs: 5,173; java: 1,522; xml: 468; sh: 375; perl: 37; makefile: 25
file content (27 lines) | stat: -rw-r--r-- 671 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
puts "========"
puts "Per-vertex lighting using built-in GLSL program, two directional light sources."
puts "Visual comparison with the reference snapshot should be performed for this test case."
puts "========"

# setup viewervclear
vclear
vclose ALL
vinit View1
vcaps -ffp 0
vrenderparams -shadingModel vert
vlight delete 0
vlight delete 0
vlight delete 0
vlight delete 0
vlight delete 0
vlight add ambient                color WHITE
vlight add directional dir  1 0 0 color GREEN headlight 1
vlight add directional dir -1 0 0 color RED1  headlight 1

# display shape
restore [locate_data_file occ/fuse.brep] f
vaxo
vdisplay f -dispmode 1
vfit
vrotate -0.5 0.0 0.0
vfit