mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
77 lines
1.6 KiB
Plaintext
77 lines
1.6 KiB
Plaintext
puts "================"
|
|
puts "OCC25335"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################################
|
|
# Visualization - add test command for V3d_View::FitAll by view area
|
|
#######################################################################################
|
|
|
|
set check1_x 2
|
|
set check1_y 2
|
|
|
|
set check2_x 407
|
|
set check2_y 2
|
|
|
|
set check3_x 2
|
|
set check3_y 407
|
|
|
|
set check4_x 407
|
|
set check4_y 407
|
|
|
|
set check5_x 204
|
|
set check5_y 204
|
|
|
|
vinit View1
|
|
vtop
|
|
|
|
# 2D view area
|
|
vpoint p1 5.0 5.0 0.0
|
|
vpoint p2 15.0 5.0 0.0
|
|
vpoint p3 15.0 15.0 0.0
|
|
vpoint p4 5.0 15.0 0.0
|
|
vpoint p5 10.0 10.0 0.0
|
|
|
|
vfitarea 4.999 4.999 15.001 15.001
|
|
|
|
# Check area by 1st point
|
|
vmoveto ${check1_x} ${check1_y}
|
|
checkcolor ${check1_x} ${check1_y} 0 1 1
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : Fit all by view area is broken."
|
|
}
|
|
|
|
# Check area by 2nd point
|
|
vmoveto ${check2_x} ${check2_y}
|
|
checkcolor ${check2_x} ${check2_y} 0 1 1
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : Fit all by view area is broken."
|
|
}
|
|
|
|
# Check area by 3rd point
|
|
vmoveto ${check3_x} ${check3_y}
|
|
checkcolor ${check3_x} ${check3_y} 0 1 1
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : Fit all by view area is broken."
|
|
}
|
|
|
|
# Check area by 4th point
|
|
vmoveto ${check4_x} ${check4_y}
|
|
checkcolor ${check4_x} ${check4_y} 0 1 1
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : Fit all by view area is broken."
|
|
}
|
|
|
|
# Check area by 5th point
|
|
vmoveto ${check5_x} ${check5_y}
|
|
checkcolor ${check5_x} ${check5_y} 0 1 1
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : Fit all by view area is broken."
|
|
}
|
|
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|