diff --git a/Units/MMLCore/colour_conv.pas b/Units/MMLCore/colour_conv.pas index ef54a80..2cbb3e3 100644 --- a/Units/MMLCore/colour_conv.pas +++ b/Units/MMLCore/colour_conv.pas @@ -116,15 +116,15 @@ begin; if Red > 0.04045 then Red := Power( ( Red + 0.055 ) / 1.055 , 2.4) * 100 else - Red := Red / 7.73994; + Red := Red * 7.73993808; if Green > 0.04045 then Green := Power( ( Green + 0.055 ) / 1.055 , 2.4) * 100 else - Green := Green / 7.73994; + Green := Green * 7.73993808; if Blue > 0.04045 then Blue := Power( ( Blue + 0.055 ) / 1.055 , 2.4) * 100 else - Blue := Blue / 7.73994; + Blue := Blue * 7.73993808; X := Red * 0.4124 + Green * 0.3576 + Blue * 0.1805; Y := Red * 0.2126 + Green * 0.7152 + Blue * 0.0722; Z := Red * 0.0193 + Green * 0.1192 + Blue * 0.9505;