Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
20 reyssat 1
!nocache
2
!if $oef_test=yes
3
 !set renewlink=cmd=next&retest=again
1105 bpr 4
 !!$header_js
20 reyssat 5
 !goto tester
6
!else
7
 !set init_parm=!translate + to $ $ in $module_init_parm
1105 bpr 8
 !set init_parm=!replace internal $\
9
$ by ; in $init_parm
20 reyssat 10
 !set renewlink=cmd=renew&worksheet=$worksheet&$init_parm
11
!endif
12
 
13
!if $printing=yes
14
 !changeto oef/print.phtml
15
!endif
16
 
17
!if $title!=$empty
18
 !set module_title=$title
19
 !set module_author=$author
20
 !set module_address=$email
21
!endif
22
 
23
!if 0$delay2>0 and $status!=$empty
24
 !set now_=$wims_nowseconds
1060 bpr 25
 !read js/chrono.phtml $[max(0,$delay1-($now_-$starttime))]
20 reyssat 26
!endif
1060 bpr 27
!set wims_html_header=!append line $header_js to $wims_html_header
1105 bpr 28
!set wims_html_header=$oefcss\
29
$wims_html_header
20 reyssat 30
 
1105 bpr 31
!header1
32
<h1 class="oeftitle">$title</h1>
33
 
20 reyssat 34
!if $module_checkdata!=yes
1105 bpr 35
 !read oef/$module_language/nodata.phtml
20 reyssat 36
 !goto end
37
!endif
38
 
39
!if $title=$empty
40
 This module is a groupment of exercises. You have apparently requested it
41
 without precising which valid exercise you want to do. It is either because
42
 you clicked on a wrong link, or because of a software bug.
43
 <p><center>
44
 !href module=$module Try to restart your manipulation
45
 , or
46
 !href $ abandon
47
 . </center>
48
 !goto end
49
!endif
50
 
51
!if 0$delay1>0 and $status!=$empty
1060 bpr 52
 <p><form target="#" name=chrono><center>
1009 bpr 53
 <table border=2 bgcolor="$wims_ref_bgcolor"><tr><td>
20 reyssat 54
 &nbsp;<b><font color=red>Attention!</font></b>
55
 !if $qnum>1
56
  This series of exercises is limited in time.
57
 !else
58
  This exercise is limited in time.
59
 !endif
1060 bpr 60
 <input size=4 name=clock readonly onFocus="this.blur();">
20 reyssat 61
 </table>
62
 </center></form> <p>
63
!endif
64
 
65
:tester
66
!read oef/present.phtml
1006 bpr 67
<center><hr width="50%"></center>
20 reyssat 68
 
69
!if $cmd=hint
70
 !read oef/hint.phtml
71
 !goto end
72
!endif
73
 
74
!if $status=waiting
75
 !if $error!=$empty
76
  !read oef/msg.phtml
1006 bpr 77
  <center><hr width="50%"></center>
20 reyssat 78
 !endif
79
 !read oef/form.phtml
80
 <p>
81
 !if $hint!=$empty and $givehint>0
82
  !href cmd=hint Hint
83
.
84
 !endif
85
 !if $help!=$empty
86
  !href cmd=help Help
87
.
88
 !endif
89
 !if $qnum<=1
90
  !href $renewlink Renew the exercise
91
.
92
 !else
93
  This is exercise number $[$reply_cnt+1] in a series of $qnum exercises.
94
  !href $renewlink Abandon the series
95
.
96
 !endif
97
!else
98
 !if $error!=$empty
99
  !read oef/msg.phtml
1006 bpr 100
  <center><hr width="50%"></center>
20 reyssat 101
 !endif
102
 !read oef/answer.phtml
103
 <p>
104
 !if $status!=$empty
105
  This is exercise number $reply_cnt in a series of $qnum exercises. <p>
106
  !href cmd=next Continue the series with the next exercise
107
, or
108
  !href $renewlink abandon the series and ask for a new one
109
. (You must go through to the end of a series if you want a score.)
110
 !else
111
  !if $qnum>1
112
   You have finished a series of $qnum exercises, with a score of
113
   $module_score over 10.
114
   !ifval $module_score>9.8
115
    Congratulations!
116
   !endif
117
   !if $toolate!=$empty and $score>$module_score
118
    (You have been punished for exceeding the time limit.)
119
   !endif
120
   <p>
121
   !href $renewlink Once again
122
.
123
   !if $wims_sheet=$empty
124
    !href exo_Intro
125
.
126
   !endif
127
  !else
128
   You have obtained a score of $module_score over 10.
129
   !ifval $module_score>9.8
130
    Congratulations!
131
   !endif
132
   !if $toolate!=$empty and $score>$module_score
133
    (You have been punished for exceeding the time limit.)
134
   !endif
135
   <p>
136
   !href $renewlink Once again
137
.
138
   !if $wims_sheet=$empty and $oef_test!=yes
139
    !href exo_Intro
140
.
141
   !endif
142
  !endif
143
 !endif
144
!endif
145
 
146
!if $replydefaulted=yes
147
 <p> <small>Development mode:
148
 !if $oef_default=yes
149
  good replies inserted into reply fields as default.
150
 !else
151
  !href cmd=config&oef_default=yes insert good replies
152
  into reply fields.
153
 !endif
154
 </small>
155
!endif
156
 
157
!read ./endhook.phtml
158
!if $wims_user=supervisor and exam notin $session and \
159
        ..classes/ notin ..$module and ..adm/ notin ..$module and \
160
        ..devel/ notin ..$module and \
161
        GNU isin $module_copyright and \
162
        _check notin $session and \
163
        $class_importation!=no
164
 <p>
165
 !href module=adm/createxo&existing=$thisexo&catmodule=$module Import
166
 this exercise into your class (where you can modify it).
167
!endif
168
:end
169
 
170
!tail
171