Subversion Repositories wimsdev

Rev

Rev 571 | Rev 5751 | 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.  Lo sentimos, este módulo no tiene ejercicios disponibles n este momento.
  10.  ¡Vuelva más tarde!
  11.  !exit
  12. !endif
  13. !if $exocnt=1
  14.  Este módulo contiene ahora mismo sólo un ejercicio,<b>
  15.  !item 1 of $titlelist
  16.  </b>.
  17.  !set exoo=!item 1 of $exolist
  18.  !href cmd=new&module=$module&exo=$exoo Intentarlo.
  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>Elija los escenarios:<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>Tipo de ejercicio:<td>
  43.  !formselect style list 1,2,3,4 prompt \
  44.         encontrar el primer paso erróneo,\
  45.         encontrar todos los pasos erróneos,\
  46.         paso a paso sin dar la razón,\
  47.         paso a paso dando la razón
  48.  <tr><td align=center>Nivel de severidad:<td>
  49.  !default level=2
  50.  !formselect level from 1 to 5
  51.  </table>
  52.  <p><center><input type=submit value="Al trabajo">
  53.  </center> <p>
  54.