Return to examupload.problem CVS log

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

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

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.8       albertel   14: if (!defined($scoreformat) || $scoreformat eq '') { $scoreformat="0f"; }
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.6       www        43: <br />If non-integer points are used (e.g., 3.5), make sure to change the
1.11      www        44: display format in "Modify parameter settings for this resource" (clock symbol), or the result will be displayed in rounded form.
1.13    ! www        45: 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     46: </span></instructorcomment>
1.11      www        47: $gradeinfo
                     48: $comment
1.1       www        49: <endouttext />
1.10      bisitz     50: 
                     51: <block condition="0"><numericalresponse id="score" /></block>
                     52: 
1.1       www        53: </problem>