mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
28 lines
651 B
Plaintext
28 lines
651 B
Plaintext
puts "==========="
|
|
puts "OCC21753"
|
|
puts "==========="
|
|
puts "=================================="
|
|
puts "Poor display of shading on cones due to Gouraud shading limitations"
|
|
puts "=================================="
|
|
|
|
# set rough meshing parameters
|
|
vinit
|
|
vdefaults absDefl=10 devCoeff=0.1
|
|
|
|
puts "Displaying two equal cones, one with Phong shader"
|
|
pcone p_gouraud 10 100 100
|
|
trotate p_gouraud 0 0 0 0 1 0 -90
|
|
vdisplay p_gouraud
|
|
vsetdispmode p_gouraud 1
|
|
#vsetmaterial p_gouraud bronze
|
|
|
|
tcopy p_gouraud p_phong
|
|
ttranslate p_phong 200 0 0
|
|
vdisplay p_phong
|
|
vsetdispmode p_phong 1
|
|
#vsetmaterial p_phong bronze
|
|
vshaderprog p_phong phong
|
|
|
|
vfit
|
|
set only_screen 1
|