Что можно сделать, чтобы следующая функция работала быстрее?
Код:
#include <Color.au3>
Func Shade($Col1, $Col2, $Shade)
If $Col1 == $Col2 Then Return True
If $Shade==0 Then Return ($Col1==$Col2)
$Color1 = _ColorGetRGB(Execute("0x00"&$Col1))
$Color2 = _ColorGetRGB(Execute("0x00"&$Col2))
If Not (IsArray($Color1) AND IsArray($Color2)) Then
Return False
EndIf
For $i=0 To 2
If Not($Color1[$i]-$Shade < $Color2[$i] And $Color1[$i]+$Shade > $Color2[$i]) Then Return False
Next
Return True
EndFunc