1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
occt/tests/bugs/vis/bug23225
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

29 lines
641 B
Plaintext
Executable File

puts "============"
puts "OCC23363"
puts "============"
puts ""
####################################################################################
# ZBufer trihedron drawn without shading
####################################################################################
vinit
vzbufftrihedron
pcylinder p 100 200
vdisplay p
vsetdispmode p 1
vsetinteriorstyle p 1
set x_coord 59
set y_coord 380
checkcolor $x_coord $y_coord 0.54 0 0
set x_coord 50
set y_coord 362
checkcolor $x_coord $y_coord 0 0.77 0
set x_coord 41
set y_coord 354
checkcolor $x_coord $y_coord 0 0 0.62
checkview -screenshot -3d -path ${imagedir}/${test_image}.png