Subversion Repositories wimsdev

Rev

Rev 1158 | Rev 3060 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !set wims_texsize=$mytexsize
  2. !set n=$counter
  3. !if $showanswer=0
  4.     $finalresult
  5.     !! to ensure playback of the exam is possible
  6.     !if $wims_user=supervisor
  7.         <div align="center">
  8.             <font color="red">Alert: these results are only visible for the <em>supervisor</em></font>
  9.             <table summary="" bgcolor="$bgcolor2" cellpadding="10" cellspacing="$cellspacing" border="1">
  10.                 !for n=1 to $total_exos
  11.                     <tr>
  12.                     <td valign="top">
  13.                         <small>
  14.                             !if $total_exos >1
  15.                                 $questionnumber <b>$n</b>)
  16.                                 <br>
  17.                             !endif
  18.                             $(question$n)
  19.                             !if $(formula$n) !=$empty
  20.                                 <br>
  21.                                 !insmath $(formula$n)
  22.                             !endif
  23.                             !if $(texanswer$n) != $empty
  24.                                 <br>
  25.                                 !insmath $(texanswer$n)
  26.                             !endif
  27.                             !if $(textanswer$n) != $empty
  28.                                 <br>
  29.                                 <hr>
  30.                                 <font color="green">$(textanswer$n)</font>                                                                    
  31.                             !endif      
  32.                         </small>
  33.                     </td>
  34.                     <td  valign="top">
  35.                         <small>
  36.                             $youranswer
  37.                             !if $(reply$n) != $empty
  38.                                 <br>
  39.                                 !if $multiimage=1
  40.                                     !if $plot=1
  41.                                         !insplot $(reply$n)
  42.                                     !else
  43.                                         !if $draw=1
  44.                                             !insdraw $(reply$n)
  45.                                         !endif
  46.                                     !endif
  47.                                 !else  
  48.                                     !if $math=1
  49.                                         !insmath $(reply$n)
  50.                                     !else
  51.                                         $(reply$n)
  52.                                     !endif
  53.                                 !endif
  54.                             !endif
  55.                         </small>
  56.                     </td>
  57.                     </tr>
  58.                 !next n
  59.             </table>
  60.         </div>
  61.     !endif
  62. !else
  63.     <div align="center">
  64.         <table summary="" bgcolor="$bgcolor2" cellpadding="10" cellspacing="$cellspacing" border="1">
  65.             !for n=1 to $total_exos
  66.                 <tr>
  67.                 <td valign="top">
  68.                     <small>
  69.                         !if $total_exos >1
  70.                             $questionnumber <b>$n</b>)<br>
  71.                         !endif
  72.                         $(question$n)
  73.                         !if $(formula$n) !=$empty
  74.                             <br>
  75.                             !insmath $(formula$n)
  76.                         !endif
  77.                         !if $(texanswer$n) != $empty
  78.                             <br>
  79.                             !insmath $(texanswer$n)
  80.                         !endif
  81.                         !if $(textanswer$n) != $empty
  82.                             <br>
  83.                             <hr width="50%">
  84.                             <font color="green">$(textanswer$n)</font>  
  85.                         !endif  
  86.                     </small>
  87.                 </td>
  88.                 <td  valign="top">
  89.                     <p align="center">
  90.                         !if $(image$n) != $empty
  91.                             !if $plot=1
  92.                                 !set insplot_set=$(image_settings$n) ; size 0.5,0.5;
  93.                                 !insplot $(image$n)
  94.                             !else
  95.                                 !if $draw=1
  96.                                     !set insdraw_size=$(image_settings$n)
  97.                                     !insdraw $(image$n)
  98.                                 !endif
  99.                             !endif
  100.                         !else
  101.                             !if $(object$n)!= $empty
  102.                                 $(object$n)
  103.                             !endif
  104.                         !endif
  105.                     </p>
  106.                 </td>
  107.                 <td  valign="top">
  108.                     <small>
  109.                         $youranswer
  110.                     </small>
  111.                     !if $(reply$n) != $empty
  112.                         <br>
  113.                         !if $multiimage=1
  114.                             !if $plot=1
  115.                                 !insplot $(reply$n)
  116.                             !else
  117.                                 !if $draw=1
  118.                                     !insdraw $(reply$n)
  119.                                 !endif
  120.                             !endif
  121.                         !else  
  122.                             !if $math=1
  123.                                 !insmath $(reply$n)
  124.                             !else
  125.                                 $(reply$n)
  126.                             !endif
  127.                         !endif
  128.                         <hr>
  129.                     !endif
  130.                     !if $goodbadsign>0 
  131.                         <small>
  132.                             <em>
  133.                                 $(remark$n)
  134.                             </em>
  135.                         </small>
  136.                     !endif
  137.                 </td>
  138.                 </tr>
  139.             !next n
  140.         </table>
  141.     </div>
  142.     $finalresult
  143. !endif
  144. !ifval $try >0 and $module_score !=0
  145.     <br>
  146.     !set s=!record 87 of $remarkdir/commonremarks.$taal
  147.     <font size="-1" color="red">$s</font>
  148. !endif
  149. !exit
  150.  
  151.  
  152.  
  153.  
  154.  
  155.  
  156.  
  157.  
  158.  
  159.  
  160.