mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
55 lines
1.1 KiB
Plaintext
Executable File
55 lines
1.1 KiB
Plaintext
Executable File
puts "================"
|
|
puts "OCC23012"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################################
|
|
# Detection gives incorrect results
|
|
######################################################################################
|
|
|
|
set BugNumber OCC23012
|
|
|
|
catch {pload XDE}
|
|
|
|
set x1 210
|
|
set y1 184
|
|
|
|
set x2 205
|
|
set y2 180
|
|
|
|
stepread [locate_data_file OCC23012-Sample_3.stp] a *
|
|
stepread [locate_data_file OCC23012-Sample_9.stp] b *
|
|
vdisplay a_1 b_1
|
|
vsetdispmode a_1 1
|
|
vsetdispmode b_1 1
|
|
vselprecision
|
|
vselprecision 1 0.1
|
|
|
|
set ColorBefore [QAGetPixelColor ${x1} ${y1}]
|
|
set R1 [lindex ${ColorBefore} 2]
|
|
set G1 [lindex ${ColorBefore} 5]
|
|
set B1 [lindex ${ColorBefore} 8]
|
|
|
|
vmoveto ${x2} ${y2}
|
|
|
|
set ColorAfter [QAGetPixelColor ${x1} ${y1}]
|
|
set R2 [lindex ${ColorAfter} 2]
|
|
set G2 [lindex ${ColorAfter} 5]
|
|
set B2 [lindex ${ColorAfter} 8]
|
|
|
|
set check_color 0
|
|
if { ${R1} == ${R2} && ${G1} == ${G2} && ${B1} == ${B2} } {
|
|
set check_color 0
|
|
} else {
|
|
set check_color 1
|
|
}
|
|
|
|
# Resume
|
|
puts ""
|
|
if { ${check_color} != 0} {
|
|
puts "Faulty ${BugNumber}"
|
|
} else {
|
|
puts "OK ${BugNumber}"
|
|
}
|
|
vfit
|
|
set only_screen 1
|