Subversion Repositories wimsdev

Rev

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

  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>--- Printbare versie ---</font></h3></center> <br>
  8. !!<div class=wimsbody>
  9.  
  10. !if $error!=$empty
  11.  !changeto oef/msg.phtml
  12. !endif
  13.  
  14. !for i=1 to $n
  15.  <br>
  16.  <b>Oefening</b> $i. (<u><em>$(title_$i)</em></u>)
  17.  !if $(question_$i)=$empty
  18.   (Niet Printbaar)
  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.     <br><hr>
  42.     <div class="wims_solution">
  43.     <center><h3>Antwoorden</h3></center> <br>
  44.     !for i=1 to $n
  45.         !set t=!linecnt $(ans_$i)
  46.         !if $t>0
  47.             <br>
  48.             <b>Antwoord op vraag $i.</b>
  49.             <ul>
  50.             !for k=1 to $t
  51.                 <li>
  52.                     !line $k of $(ans_$i)
  53.                 </li>
  54.             !next k
  55.             </ul>
  56.         !endif
  57.     !next i
  58.     </div>
  59. !endif
  60.  
  61. :noans
  62. </div>
  63. !!<div class="wims_print"><
  64. !!!href cmd=reply&print=yes Opnieuw
  65. !!&nbsp;&nbsp;
  66. !!!href module=$module&cmd=intro Terug
  67. !!</div>
  68. !!</body></html>
  69. !set wims_menu_tail=!append line renew,1,cmd=reply&print=yes\
  70. back2,1,module=$module&cmd=intro\
  71. to $wims_menu_tail
  72. !tail
  73.  
  74.  
  75.