Converts RGB to HSL
#include <Color.au3>
_ColorConvertRGBtoHSL ( $aArray )
$aArray | An array containing RGB values in their respective positions |
Success: | the array containing the HSL values for the inputted RGB values |
Failure: | sets the @error flag to non-zero. |
See: EasyRGB - Color mathematics and conversion formulas.
#include <Color.au3>
#include <MsgBoxConstants.au3>
Example()
Func Example()
Local $aiInput[3] = [128, 255, 128], $aiHSL, $aiRGB, $sOutput
$aiHSL = _ColorConvertRGBtoHSL($aiInput)
$aiRGB = _ColorConvertHSLtoRGB($aiHSL)
$sOutput &= StringFormat("| R: %.3f" & @TAB & "| H: %.3f" & @TAB & "| R: %.3f" & @CRLF, $aiInput[0], $aiHSL[0], $aiRGB[0])
$sOutput &= StringFormat("| G: %.3f" & @TAB & "| S: %.3f" & @TAB & "| G: %.3f" & @CRLF, $aiInput[1], $aiHSL[1], $aiRGB[1])
$sOutput &= StringFormat("| B: %.3f" & @TAB & "| L: %.3f" & @TAB & "| B: %.3f" & @CRLF, $aiInput[2], $aiHSL[2], $aiRGB[2])
MsgBox($MB_SYSTEMMODAL, "AutoIt", $sOutput)
EndFunc ;==>Example