![]() ![]() | ![]() |
version 1.62, 2003/06/23 16:06:11 | version 1.63, 2003/06/24 19:23:45 |
---|---|
Line 1500 sub StudentPerformanceOnSequence { | Line 1500 sub StudentPerformanceOnSequence { |
# | # |
$partscore = $weight*$awarded; | $partscore = $weight*$awarded; |
$score += $partscore; | $score += $partscore; |
$symbol = $weight; | $symbol = $partscore; |
if (length($symbol) > 1) { | if (length($symbol) > 1) { |
$symbol = '*'; | $symbol = '*'; |
} | } |