mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
33 lines
719 B
Plaintext
33 lines
719 B
Plaintext
puts "========"
|
|
puts "Ray Tracing - check lighting on Plastic material"
|
|
puts "========"
|
|
|
|
# create box
|
|
box b 1 2 3
|
|
|
|
# draw box
|
|
vinit View1
|
|
vclear
|
|
vsetdispmode 1
|
|
vaxo
|
|
vdisplay b
|
|
vsetmaterial b PLASTIC
|
|
vsetcolor b GREEN
|
|
vfit
|
|
vrotate 0.2 0.0 0.0
|
|
|
|
# take snapshot with fixed pipeline
|
|
vdump $::imagedir/${::casename}_OFF.png
|
|
set aColorL [vreadpixel 150 250 rgb name]
|
|
set aColorR [vreadpixel 250 250 rgb name]
|
|
if { "$aColorL" != "GREEN3" || "$aColorR" != "GREEN4" } {
|
|
puts "Error: wrong color (fixed pipeline)!"
|
|
}
|
|
|
|
vraytrace 1
|
|
set aColorL [vreadpixel 150 250 rgb name]
|
|
set aColorR [vreadpixel 250 250 rgb name]
|
|
#if { "$aColorL" != "GREEN3" || "$aColorR" != "GREEN4" } {
|
|
# puts "Error: wrong color (Ray Tracing)!"
|
|
#}
|