Difference between revisions of "RGBToHSL"

From SCAR Divi Manual
Jump to: navigation, search
 
Line 1: Line 1:
 
==Definition==
 
==Definition==
 
<source lang="scar" lines="false">
 
<source lang="scar" lines="false">
procedure RGBtoHSL(R, G, B: Integer; var H, S, L: Extended);
+
procedure RGBToHSL(R, G, B: Integer; var H, S, L: Extended);
 
</source>
 
</source>
  
Line 16: Line 16:
  
 
begin
 
begin
   RGBtoHSL(0, 255, 0, H, S, L);
+
   RGBToHSL(0, 255, 0, H, S, L);
 
   WriteLn(FloatToStr(H) + ';' + FloatToStr(S) + ';' + FloatToStr(L));
 
   WriteLn(FloatToStr(H) + ';' + FloatToStr(S) + ';' + FloatToStr(L));
 
end.
 
end.

Latest revision as of 11:07, 5 July 2011

Definition

procedure RGBToHSL(R, G, B: Integer; var H, S, L: Extended);

Availability

SCAR Divi 3.00 > Current

Description

Converts RGB values specified by R, G and B to color components within the HSL color space and returns them in H, S and L. The HSL values are defined as percentages within the range 0..100. The resulting values can be converted back to RGB values using HSLToRGB.

Example

var
  H, S, L: Extended;

begin
  RGBToHSL(0, 255, 0, H, S, L);
  WriteLn(FloatToStr(H) + ';' + FloatToStr(S) + ';' + FloatToStr(L));
end.

Output:

33,3333343267441;100;50

See Also