1 puts "================"
3 puts "================"
5 #######################################################################################
6 # Detection gives incorrect results
7 ######################################################################################
19 stepread [locate_data_file OCC23012-Sample_3.stp] a *
20 stepread [locate_data_file OCC23012-Sample_9.stp] b *
27 set ColorBefore [QAGetPixelColor ${x1} ${y1}]
28 set R1 [lindex ${ColorBefore} 2]
29 set G1 [lindex ${ColorBefore} 5]
30 set B1 [lindex ${ColorBefore} 8]
34 set ColorAfter [QAGetPixelColor ${x1} ${y1}]
35 set R2 [lindex ${ColorAfter} 2]
36 set G2 [lindex ${ColorAfter} 5]
37 set B2 [lindex ${ColorAfter} 8]
40 if { ${R1} == ${R2} && ${G1} == ${G2} && ${B1} == ${B2} } {
48 if { ${check_color} != 0} {
49 puts "Faulty ${BugNumber}"
51 puts "OK ${BugNumber}"