Subversion Repositories wimsdev

Rev

Rev 1336 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1336 Rev 1664
Line 1... Line -...
1
!!$wims_html_header
-
 
2
!!<body $wims_htmlbody>
-
 
3
!header1
-
 
4
<p><center><h3>
-
 
5
!href module=$module&cmd=intro WIMS
-
 
6
 $module_title<br>
-
 
7
<font size=-1>--- Version imprimable ---</font></h3></center> <p>
-
 
8
!!<div class=wimsbody>
-
 
9
 
-
 
10
!if $error!=$empty
-
 
11
 !changeto oef/msg.phtml
-
 
12
!endif
-
 
13
 
-
 
14
!for i=1 to $n
-
 
15
 <p>
-
 
16
 <b>Exercice</b> $i. (<u><em>$(title_$i)</em></u>)
-
 
17
 !if $(question_$i)=$empty
-
 
18
  (Non-imprimable)
-
 
19
 !else
-
 
20
  !if __EXECUTED_ isin $(question_$i) and _EXERCISE__ isin $(question_$i)
-
 
21
   !set thisexo=$(name_$i)
-
 
22
   !readproc oef/imagedir.proc
-
 
23
   !for k=1 to $(varcnt_$i)+5
-
 
24
    !set val$k=!line $k of $(var_$i)
-
 
25
   !next k
-
 
26
   !read $(class_header)def/$(name_$i).def question
-
 
27
  !else
-
 
28
   $(question_$i)
-
 
29
  !endif
-
 
30
  !!</a></tt></font></center>
-
 
31
 !! </h1></h2></h3></h4></b></i></em>
-
 
32
  $(chce_$i)
-
 
33
 !endif
-
 
34
!next i
-
 
35
 
-
 
36
!if $wims_user!=$empty and $wims_user!=supervisor
-
 
37
 !goto noans
-
 
38
!endif
-
 
39
 
-
 
40
!if $test_print=1
-
 
41
<p><hr>
-
 
42
<div class="wims_solution">
-
 
43
<center><h3>Réponses</h3></center>
-
 
44
!for i=1 to $n
-
 
45
 !set t=!linecnt $(ans_$i)
-
 
46
 !if $t>0
-
 
47
  <p><b>Réponse à l'exercice $i.</b><ul>
-
 
48
  !for k=1 to $t
-
 
49
  !set l__=!line $k of $(ans_$i)
-
 
50
  !if $l__ !=
-
 
51
   <li value=$k>
-
 
52
   !line $k of $(ans_$i)
-
 
53
   </li>
-
 
54
  !reset l__
-
 
55
  !endif
-
 
56
  !next k
-
 
57
  </ul>
-
 
58
 !endif
-
 
59
!next i
-
 
60
</div>
-
 
61
!endif
1
!exit
62
 
-
 
63
:noans
-
 
64
</div>
-
 
65
!!<div class="wims_noprint"><hr>
-
 
66
!!!href cmd=reply&print=yes Renouveler
-
 
67
!!&nbsp;&nbsp;
-
 
68
!!!href module=$module&cmd=intro Retour
-
 
69
!!</div>
-
 
70
!set wims_menu_items=!append line renew,1,cmd=reply&print=yes\
-
 
71
back2,1,module=$module&cmd=intro\
-
 
72
to $wims_menu_items
-
 
73
!tail
-
 
74
!tail
-