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

33 lines
646 B
Plaintext
Executable File

puts "================"
puts "OCC22900"
puts "================"
puts ""
#######################################################################################
# Problem with shape displaying in shading mode
######################################################################################
set BugNumber OCC22900
set x1 204
set y1 202
vertex v1 0 0 0
vertex v2 0 0 30
edge e1 v1 v2
pcone con1 5 0 10
ttranslate con1 0 0 30
compound con1 e1 c1
don c1
fit
vinit
vdisplay c1
vfit
vsetcolor c1 RED
vsetcolor c1 GREEN
vsetdispmode 1
vsetcolor c1 RED
checkcolor ${x1} ${y1} 1 0 0
checkview -screenshot -3d -path ${imagedir}/${test_image}.png