Return to examupload.problem CVS log

Up to [LON-CAPA] / loncom / homework / templates

Annotation of loncom/homework/templates/examupload.problem, revision 1.14

1.1       www         1: <problem>
1.10      bisitz      2: 
1.1       www         3: <displaytitle />
1.10      bisitz      4: 
1.8       albertel    5: <parameter name="scoreformat" description="Format for display of score" type="string" />
1.7       albertel    6: <parameter name="handgrade" description="Hand Grade" default="yes" type="string_yesno" />
1.10      bisitz      7: 
1.1       www         8: <script type="loncapa/perl">
                      9: $weight=&EXT('resource.0.weight');
1.3       albertel   10: if ((!defined($weight)) || ($weight eq '')) { $weight=1; }
1.1       www        11: $awarded=&EXT('user.resource.resource.0.awarded');
                     12: if (!defined($awarded)) { $awarded=0; }
1.4       albertel   13: $scoreformat=&EXT('resource.0.scoreformat');
1.14    ! www        14: if (!defined($scoreformat) || $scoreformat eq '') { $scoreformat="2f"; }
1.13      www        15: $display='';
                     16: if (&EXT('resource.0.problemstatus')!~/^no/) {
                     17:    if (!defined($awarded)) {
                     18:       $display=$weight.' possible points.';
                     19:    } else {
                     20:       $display='You have '.&format($awarded*$weight,$scoreformat).' out of '.
                     21:             $weight.' possible points.';
                     22:    }
                     23: }
1.11      www        24: $comment=&EXT('user.resource.resource.0.comment');
                     25: if (!defined($comment) || $comment!~/\w/) {
                     26:    $comment='';
                     27: } else {
                     28:    $comment='<br /><table><tr><td bgcolor="#FFFFDD">'.$comment.'</td></tr></table>';
                     29: }
                     30: $gradeinfo=&EXT('user.resource.resource.0.gradeinfo');
                     31: if (!defined($gradeinfo) || $gradeinfo!~/\w/) {
                     32:    $gradeinfo='';
                     33: } else {
1.12      www        34:    $gradeinfo='<br /><table><tr><td bgcolor="#DDDDFF"><font size="+2">'.$gradeinfo.'</font></td></tr></table>';
1.11      www        35: }
                     36: 
                     37: 
1.1       www        38: </script>
1.10      bisitz     39: 
1.1       www        40: <startouttext />
1.13      www        41: $display
1.10      bisitz     42: <instructorcomment><span style="color:red">
1.14    ! www        43: <br />You can modify the rounding of the score display using the "scoreformat" setting.
1.13      www        44: You can upload comments and grade information with this resource when uploading CSV files. Feedback on grades can be controlled using the problemstatus parameter.
1.10      bisitz     45: </span></instructorcomment>
1.11      www        46: $gradeinfo
                     47: $comment
1.1       www        48: <endouttext />
1.10      bisitz     49: 
                     50: <block condition="0"><numericalresponse id="score" /></block>
                     51: 
1.1       www        52: </problem>