Think this is actually four chars shorter. Even with the redundancy ...
code:
function FadeToBlack($c, $)
$FadeToBlack =
iif($c/65536>$, $, $c/65536) * 65536 +
iif(($c & 65280) / 256>$, $, ($c & 65280) / 256) * 256 +
iif($c & 255>$, $, $c & 255)
endfunction
[ 03. November 2003, 18:29: Message edited by: Shawn ]
