Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
2088 bpr 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