Subversion Repositories wimsdev

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 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