Subversion Repositories wimsdev

Rev

Rev 546 | Blame | Last modification | View Log | RSS feed

  1. <p><hr width=35%>
  2.  
  3. !read Exindex
  4. !set exocnt=!itemcnt $exolist
  5. !set qcnt=8
  6. !if $qcnt>$exocnt
  7.  !set qcnt=$exocnt
  8. !endif
  9. !if $exocnt<1
  10.  Désolé, aucun exercice n'est disponible sous ce module pour l'instant.
  11.  Revenez plus tard!
  12.  !exit
  13. !endif
  14. !if $exocnt=1
  15.  Ce module contient en ce moment un seul exercice, <b>
  16.  !item 1 of $titlelist
  17.  </b>.
  18.  !set exoo=!item 1 of $exolist
  19.  !href cmd=new&module=$module&exo=$exoo Essayez-le.
  20.  !exit
  21. !endif
  22.  
  23. !form new
  24. <input type=hidden name=module value=$module>
  25. <center><table border=0><tr>
  26. <td align=center>Choisissez les exercices&nbsp;:<td>
  27. !if $exocnt>6
  28.  !set selsize=6
  29. !else
  30.  !set selsize=$exocnt
  31. !endif
  32. !set wims_formselect_switch=multiple size=$selsize
  33. !set exo=$special_parm
  34. !if $exo!=$empty
  35.  !set exolist=!listuniq $exo,$exolist
  36.  !set exolist=!replace , by , $ in $exolist
  37.  !set dictionary=$module_dir/Extitles
  38.  !set translator_unknown=leave
  39.  !set titlelist=!exec translator $exolist
  40. !endif
  41. !formselect exo list $exolist prompt $titlelist
  42. !set wims_formselect_switch=
  43. <tr><td align=center>Une séance aura<td>
  44. !set qnum=1
  45. !formselect qnum from 1 to $qcnt
  46. exercices.
  47. <tr><td align=center>Niveau de sévérité<td>
  48. !set qcmlevel=3
  49. !formselect qcmlevel from 1 to 8
  50. !read introhook.phtml
  51. </table> <p>
  52. <input type=submit value="Au travail">
  53. </center>
  54. </form>
  55. <b>Remarques</b>. Les exercices proposés seront pris aléatoirement dans la
  56. liste de votre choix. Si votre choix est vide, tous les exercices
  57. disponibles seront considérés.
  58. !if * isin $titlelist
  59.  <p>Les exercices marqués par un * sont en général plus difficiles que les
  60.  autres.
  61. !endif
  62.  
  63.