Subversion Repositories wimsdev

Rev

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

  1. !nocache
  2. !set wims_html_header=!append line $oefcss to $wims_html_header
  3. !header1
  4. !set module_title=!module title_$lang $module
  5. !default module_title=!module title $module
  6. <h3 class="wimscenter">
  7. !href module=$module&cmd=intro WIMS
  8.  $module_title<br/>
  9. <span class="smaller">--- $name_print ---</span></h3>
  10.  
  11.  
  12. !if $error!=$empty
  13.  !changeto oef/msg.phtml
  14. !endif
  15.  
  16. !if ($wims_developer!= or $wims_user=supervisor) and $latex_exists=1
  17.   <div class="wimscenter">
  18.   !read oef/latex.proc print
  19.   </div>
  20. !endif
  21. !for i=1 to $n
  22.  <div class="emptyline">&nbsp;</div>
  23.  <span class="bold">$name_exo</span> $i.
  24.  (<span style="text-decoration:underline,font-style:italic">$(title_$i)</span>)
  25.  !if $(question_$i)=$empty
  26.   ($name_noprint)
  27.  !else
  28.   !if __EXECUTED_ isin $(question_$i) and _EXERCISE__ isin $(question_$i)
  29.    !set thisexo=$(name_$i)
  30.    !readproc oef/imagedir.proc
  31.    !for k=1 to $(varcnt_$i)+5
  32.     !set val$k=!line $k of $(var_$i)
  33.    !next k
  34.    !read $(class_header)def/$(name_$i).def question
  35.   !else
  36.    $(question_$i)
  37.   !endif
  38.   $(chce_$i)
  39.  !endif
  40. !next i
  41.  
  42. !if $wims_user!=$empty and $wims_user!=supervisor
  43.  !goto noans
  44. !endif
  45.  
  46. !if $test_print=1
  47. <div class="emptyline">&nbsp;</div><hr/>
  48. <div class="wims_solution">
  49. <h3 class="wimscenter">$name_answers</h3>
  50. !for i=1 to $n
  51.  !set t=!linecnt $(ans_$i)
  52.  !if $t>0
  53.   <div class="emptyline">&nbsp;</div>
  54.   <span class="bold">$name_answer_i.</span><ul>
  55.   !for k=1 to $t
  56.   !set l__=!line $k of $(ans_$i)
  57.   !if $l__ !=
  58.    <li value="$k">
  59.    !line $k of $(ans_$i)
  60.    </li>
  61.   !reset l__
  62.   !endif
  63.   !next k
  64.   </ul>
  65.  !endif
  66. !next i
  67. </div>
  68. !endif
  69.  
  70. :noans
  71. </div>
  72.  
  73. !set wims_menu_items=!append line renew,1,cmd=reply&print=yes\
  74. back2,1,module=$module&cmd=intro\
  75. to $wims_menu_items
  76. !tail
  77.  
  78.  
  79.