Subversion Repositories wimsdev

Rev

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

  1. !read dialog/$lang/names
  2.  
  3. <p><hr width="35%">
  4.  
  5. !read Exindex
  6. !set exocnt=!itemcnt $exolist
  7. !set qcnt=8
  8. !if $qcnt>$exocnt
  9.  !set qcnt=$exocnt
  10. !endif
  11. !if $exocnt<1
  12.  $name_noexercise
  13.  !exit
  14. !endif
  15. !if $exocnt=1
  16.  $name_oneexercise, <b>
  17.  !item 1 of $titlelist
  18.  </b>.
  19.  !set exoo=!item 1 of $exolist
  20.  !href cmd=new&module=$module&exo=$exoo $name_tryit.
  21.  !exit
  22. !endif
  23.  
  24. !form new
  25. <input type=hidden name=module value="$module">
  26. <center><table border=0><tr>
  27. <td align=center>$name_chooseexo:<td>
  28. !if $exocnt>6
  29.  !set selsize=6
  30. !else
  31.  !set selsize=$exocnt
  32. !endif
  33. !set wims_formselect_switch=multiple size=$selsize
  34. !set exo=$special_parm
  35. !if $exo!=$empty
  36.  !set exolist=!listuniq $exo,$exolist
  37.  !set exolist=!replace , by , $ in $exolist
  38.  !set dictionary=$module_dir/Extitles
  39.  !set translator_unknown=leave
  40.  !set titlelist=!exec translator $exolist
  41. !endif
  42. !formselect exo list $exolist prompt $titlelist
  43. !set wims_formselect_switch=
  44. <tr><td align=center>$name_oneserie<td>
  45. !set qnum=1
  46. !formselect qnum from 1 to $qcnt
  47. $name_exercises.
  48. <tr><td align=center>$name_levelseverity<td>
  49. !set qcmlevel=3
  50. !formselect qcmlevel from 1 to 8
  51. !read introhook.phtml
  52. </table> <p>
  53. <input type=submit value="$wims_name_work">
  54. </center>
  55. </form>
  56. $name_remarkintro1
  57. <p>
  58. !if * isin $titlelist
  59.  <p>$name_remarkintro2
  60. !endif
  61.  
  62.