Convertit RGB en HSL
#include <Color.au3>
_ColorConvertRGBtoHSL ( $aArray )
$aArray | Un tableau contenant les valeurs RVB dans leurs positions respectives |
Succès: | Retourne le tableau contenant les valeurs de HSL pour les valeurs RGB introduites |
Échec: | Définit @error <> 0. |
Consultez: 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