<problem>
<displaytitle />
<parameter name="scoreformat" description="Format for display of score" type="string" />
<parameter name="handgrade" description="Hand Grade" default="yes" type="string_yesno" />
<script type="loncapa/perl">
$weight=&EXT('resource.0.weight');
if ((!defined($weight)) || ($weight eq '')) { $weight=1; }
$awarded=&EXT('user.resource.resource.0.awarded');
if (!defined($awarded)) { $awarded=0; }
$scoreformat=&EXT('resource.0.scoreformat');
if (!defined($scoreformat) || $scoreformat eq '') { $scoreformat="0f"; }
$comment=&EXT('user.resource.resource.0.comment');
if (!defined($comment) || $comment!~/\w/) {
$comment='';
} else {
$comment='<br /><table><tr><td bgcolor="#FFFFDD">'.$comment.'</td></tr></table>';
}
$gradeinfo=&EXT('user.resource.resource.0.gradeinfo');
if (!defined($gradeinfo) || $gradeinfo!~/\w/) {
$gradeinfo='';
} else {
$gradeinfo='<br /><table><tr><td bgcolor="#DDDDFF">'.$gradeinfo.'</td></tr></table>';
}
</script>
<startouttext />
You have <display>&format($awarded*$weight,$scoreformat)</display> out of $weight possible points.
<instructorcomment><span style="color:red">
<br />If non-integer points are used (e.g., 3.5), make sure to change the
display format in "Modify parameter settings for this resource" (clock symbol), or the result will be displayed in rounded form.
</span></instructorcomment>
$gradeinfo
$comment
<endouttext />
<block condition="0"><numericalresponse id="score" /></block>
</problem>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>