colourTip

# Färbt die Tipps entsprechend des Ergebnisses farbig ein.
#
# Argumente
#       1: ID des Spiels
#
# Return
#       HTML-String <span><font>FIRST_SCORE</font> : <font>SECOND_SCORE</font></span>
#
# Gibt es keinen Tipp für eine Begegnung, so wird ein Nullstring zurückgegeben.
# Ansonsten wird der Tipp des Spielers mit dem Ergebnis verglichen und je nach
# Ausgang farbig gefärbt.
sub colourTip {
        my $MatchID = shift;
        my $color = "black";

        if ( ! isGamerDataAvailable($MatchID) )
                return "";

        my $comp = compareTipAndResult($MatchID);
        switch ( $comp )
        {
                case 0:
                        # kein korrekter Tip
                        $color = "red";
                        break;
                case 1:
                        # Tendenz richtig
                        $color = "orange";
                        break;
                case 2:
                        # richtiger Tipp
                        $color = "green";
                        break;
        }

        return "<span> \
                <font style=\"color:".$color."\">$gd{FIRST_SCORE}</font> \
                : \
                <font style=\"color:".$color."\">$gd{SECOND_SCORE}</font> \
                </span>";
}