![[BACK]](/icons/back.gif){kind=icon}
Return to lonquickgrades.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonquickgrades.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.15, 2003/06/18 19:31:38 | version 1.16, 2003/06/23 20:01:20 |
|---|---|
| Line 241 sub mixColors { | Line 241 sub mixColors { |
| $a = $start->[2]; $b = $end->[2]; | $a = $start->[2]; $b = $end->[2]; |
| my $mix3 = POSIX::floor((1-$ratio)*$a + $ratio*$b); | my $mix3 = POSIX::floor((1-$ratio)*$a + $ratio*$b); |
| $final = sprintf "%2x%2x%2x", $mix1, $mix2, $mix3; | $final = sprintf "%02x%02x%02x", $mix1, $mix2, $mix3; |
| return "#" . $final; | return "#" . $final; |
| } | } |