mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
aaf8d6a98d
The table of named colors has been compressed and moved out from Quantity_Color.cxx into Quantity_ColorTable.pxx. Quantity_NameOfColor - grayscale enumeration values have been re-ordered to fix discontinuity. Duplicating colors has been merged within enumeration: CHARTREUSE=CHARTREUSE1, GOLD=GOLD1, GREEN=GREEN1, ORANGE=ORANGE1, ORANGERED=ORANGERED1, RED=RED1, TOMATO=TOMATO1, YELLOW=YELLOW1. Added aliases to several other common colors: BLUE=BLUE1, CYAN=CYAN1, LIGHTCYAN=LIGHTCYAN1, MAGENTA=MAGENTA1. Quantity_Color class definition has been cleaned to follow OCCT coding style. Quantity_Color now stores NCollection_Vec3<float> as class field instead of separate components. Removed unused class Quantity_ColorDefinitionError. New methods Quantity_Color::Convert_LinearRGB_To_sRGB() and Quantity_Color::Convert_sRGB_To_LinearRGB() converting RGB components from linear to non-linear sRGB colorspace and vice versa. Image_PixMap::PixelColor() and Image_PixMap::SetPixelColor() methods have been extended with an optional argument for performing linearization/delinearization of 8-bit sRGB pixel formats. Draw Harness command AISColor has been corrected to take color name instead of enumeration index.
80 lines
2.1 KiB
Plaintext
80 lines
2.1 KiB
Plaintext
puts "==========="
|
|
puts "OCC27530"
|
|
puts "==========="
|
|
puts ""
|
|
##########################################################################
|
|
# Visualization - AIS_InteractiveContext::HilightNextDetected() doesn't work in Neutral Point
|
|
##########################################################################
|
|
|
|
proc check_highlighting { theHiBoxIdx theCoords } {
|
|
set aNext [expr ($theHiBoxIdx + 1) % 3]
|
|
set aNextNext [expr ($theHiBoxIdx + 2) % 3]
|
|
set hiColor [vreadpixel [lindex $theCoords [expr $theHiBoxIdx * 2] ] [lindex $theCoords [expr $theHiBoxIdx * 2 + 1] ] name]
|
|
set nextColor [vreadpixel [lindex $theCoords [expr $aNext * 2] ] [lindex $theCoords [expr $aNext * 2 + 1] ] name]
|
|
set nextNextColor [vreadpixel [lindex $theCoords [expr $aNextNext * 2] ] [lindex $theCoords [expr $aNextNext * 2 + 1] ] name]
|
|
|
|
if {$hiColor == "CYAN 1" && $nextColor == "YELLOW 1" && $nextNextColor == "YELLOW 1"} {
|
|
return true
|
|
} else {
|
|
return false
|
|
}
|
|
}
|
|
|
|
pload VISUALIZATION MODELING
|
|
|
|
box b0 3 3 3
|
|
box b1 1 1 1 3 2 1
|
|
box b2 1.5 1.5 1.5 4 4 4
|
|
|
|
set coords { }
|
|
# b0_x, b0_y
|
|
lappend coords 355
|
|
lappend coords 186
|
|
# b1_x, b1_y
|
|
lappend coords 266
|
|
lappend coords 333
|
|
# b2_x, b2_y
|
|
lappend coords 177
|
|
lappend coords 2
|
|
|
|
vinit
|
|
vclear
|
|
vdisplay b0 b1 b2
|
|
vleft
|
|
vfit
|
|
|
|
# MoveTo in area that is common for all boxes
|
|
vmoveto 210 280
|
|
|
|
if { ![check_highlighting 0 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b0"
|
|
}
|
|
|
|
# check vselnext
|
|
vselnext
|
|
if { ![check_highlighting 1 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b1 after vselnext call"
|
|
}
|
|
vselnext
|
|
if { ![check_highlighting 2 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b2 after vselnext call"
|
|
}
|
|
vselnext
|
|
if { ![check_highlighting 0 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b0 after vselnext call"
|
|
}
|
|
|
|
# check vselprev
|
|
vselprev
|
|
if { ![check_highlighting 2 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b2 after vselprev call"
|
|
}
|
|
vselprev
|
|
if { ![check_highlighting 1 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b1 after vselprev call"
|
|
}
|
|
vselprev
|
|
if { ![check_highlighting 0 $coords] } {
|
|
puts "ERROR: incorrect highlighting of box b0 after vselprev call"
|
|
}
|