Subversion Repositories wimsdev

Rev

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

  1. <p><hr> <p>
  2. !read Exindex
  3. !set exocnt=!itemcnt $exolist
  4. !set qcnt=8
  5. !if $qcnt>$exocnt
  6.  !set qcnt=$exocnt
  7. !endif
  8. !if $exocnt<1
  9.  Désolé, aucun exercice n'est disponible sous ce module pour l'instant.
  10.  Revenez plus tard!
  11.  !exit
  12. !endif
  13. !if $exocnt=1
  14.  Ce module contient en ce moment un seul exercice, <b>
  15.  !item 1 of $titlelist
  16.  </b>.
  17.  !set exoo=!item 1 of $exolist
  18.  !href cmd=new&module=$module&exo=$exoo Essayez-le.
  19.  !exit
  20. !endif
  21.  
  22. !form new
  23. <input type=hidden name=module value=$module>
  24. <center><table border=0><tr>
  25. <td align=center>Choisissez les scénarios&nbsp;:<td>
  26. !if $exocnt>6
  27.  !set selsize=6
  28. !else
  29.  !set selsize=$exocnt
  30. !endif
  31. !set wims_formselect_switch=multiple size=$selsize
  32. !set exo=$special_parm
  33. !if $exo!=$empty
  34.  !set exolist=!listuniq $exo,$exolist
  35.  !set exolist=!replace , by , $ in $exolist
  36.  !set dictionary=$module_dir/Extitles
  37.  !set translator_unknown=leave
  38.  !set titlelist=!exec translator $exolist
  39. !endif
  40. !formselect exo list $exolist prompt $titlelist
  41. !set wims_formselect_switch=
  42.  <tr><td align=center>Style de l'exercice&nbsp;:<td>
  43. !formselect style list 1,2,3,4 prompt \
  44.         trouver la première mauvaise étape,\
  45.         trouver toutes les mauvaises étapes,\
  46.         étape par étape sans donner de raison,\
  47.         étape par étape en donnant une raison
  48. <tr><td align=center>Niveau de sévérité&nbsp;:<td>
  49. !default level=2
  50. !formselect level from 1 to 5
  51. </table>
  52. <p><input type=submit value="Au travail">
  53. </center></form> <p>
  54.  
  55.