mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
35 lines
797 B
Plaintext
35 lines
797 B
Plaintext
puts "=============================================================================================="
|
|
puts "CR33607: Visualization - Test occlusion query on two boxes using two orthographic projections"
|
|
puts "=============================================================================================="
|
|
|
|
pload MODELING VISUALIZATION
|
|
vclear
|
|
vclose ALL
|
|
|
|
box b 10 10 10
|
|
box c 12 0 0 10 10 10
|
|
|
|
# check left side
|
|
vinit name=View1
|
|
vsetdispmode 1
|
|
vdisplay c b
|
|
vright
|
|
vfit
|
|
vzoom 0.5
|
|
|
|
# check front side
|
|
vinit name=View2
|
|
vsetdispmode 1
|
|
vdisplay c b
|
|
vfront
|
|
vfit
|
|
|
|
#run occlusion query test for each view
|
|
if {[vnboccluded View1] != "1"} {
|
|
puts "ERROR: occluded objects in view 1 expected to be 1"
|
|
}
|
|
|
|
if {[vnboccluded View2] != "0"} {
|
|
puts "ERROR: occluded objects in view 2 expected to be 0"
|
|
}
|