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>--- Printable version ---</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>Exercise</b> $i. (<u><em>$(title_$i)</em></u>)
 - 
 
17 
 !if $(question_$i)=$empty
 - 
 
18 
  (Non-printable)
 - 
 
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
 1 
!exit
39 
 
 - 
 
40 
<p><hr>
 - 
 
41 
<div class="wims_solution">
 - 
 
42 
<center><h3>Answers</h3></center> <p>
 - 
 
43 
!for i=1 to $n
 - 
 
44 
 !set t=!linecnt $(ans_$i)
 - 
 
45 
 !if $t>0
 - 
 
46 
  <p><b>Answer to exercise $i.</b><ul>
 - 
 
47 
  !for k=1 to $t
 - 
 
48 
   <li>
 - 
 
49 
   !line $k of $(ans_$i)
 - 
 
50 
  !next k
 - 
 
51 
  </ul>
 - 
 
52 
 !endif
 - 
 
53 
!next i
 - 
 
54 
</div>
 - 
 
55 
 
 - 
 
56 
:noans
 - 
 
57 
</div>
 - 
 
58 
!!<div class="wims_noprint"><hr>
 - 
 
59 
!!!href cmd=reply&print=yes Again
 - 
 
60 
!!&nbsp;&nbsp;
 - 
 
61 
!!!href module=$module&cmd=intro Back
 - 
 
62 
!!</div>
 - 
 
63 
!!</body></html>
 - 
 
64 
!set wims_menu_items=!append line renew,1,cmd=reply&print=yes  to $wims_menu_items
 - 
 
65 
!tail
 -