Subversion Repositories wimsdev

Rev

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

  1. !read dialog/$lang/names
  2.  
  3. <hr style="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><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. </td></tr>
  44. !set wims_formselect_switch=
  45. <tr><td align="center">$name_oneserie</td><td>
  46. !set qnum=1
  47. !formselect qnum from 1 to $qcnt
  48. $name_exercises.
  49. </td></tr>
  50. <tr><td align="center">$name_levelseverity</td><td>
  51. !set qcmlevel=3
  52. !formselect qcmlevel from 1 to 8
  53. !read introhook.phtml
  54. </td></tr></table> <p>
  55. <input type="submit" value="$wims_name_work"/>
  56. </center>
  57. </form>
  58. $name_remarkintro1
  59. <p>
  60. !if * isin $titlelist
  61.  <p>$name_remarkintro2
  62. !endif
  63.  
  64.