Subversion Repositories wimsdev

Rev

Rev 13793 | Rev 13805 | 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. !if $error!=$empty
  12.   !changeto oef/msg.phtml
  13. !endif
  14.  
  15. !if ($wims_developer!= or $wims_user=supervisor) and $latex_exists=1
  16.   <div class="wimscenter">
  17.   !read oef/latex.proc print
  18.   </div>
  19. !endif
  20. !for i=1 to $n
  21.   <h3>
  22.   !href target=wims_light module=$module&exo=$(name_$i)&cmd=new <span class="bold">$name_exo</span> $i.
  23.   <span id="title_$i">$(title_$i)</span>
  24.   </h3>
  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.       !!!!FIXME 5
  31.       !readproc oef/imagedir.proc
  32.       !for k=1 to $(varcnt_$i)+5
  33.         !set val$k=!line $k of $(var_$i)
  34.       !next k
  35.       <div id="exo_$i">
  36.       !read $(class_header)def/$(name_$i).def question
  37.       </div>
  38.     !else
  39.       <div id="exo_$i">
  40.       $(question_$i)
  41.       </div>
  42.     !endif
  43.     $(chce_$i)
  44.   !endif
  45.   <br class="clearall" />
  46.   !if $i__>=$(cnt_$i) and $prompt___!=$empty
  47.       <div class="spacer">$prompt___</div>
  48.   !endif
  49. !next i
  50.  
  51. !if $wims_user!=$empty and $wims_user!=supervisor
  52.   !goto noans
  53. !endif
  54.  
  55. !if $test_print=1
  56.   <div class="wims_solution">
  57.   <h3 class="wimscenter">$name_answers</h3>
  58.   !for i=1 to $n
  59.     !set t=!linecnt $(ans_$i)
  60.     !if $t>0
  61.       <div id="answer_$i">
  62.       <br class="spacer" />
  63.       <span class="bold">$name_answer_i.</span>
  64.       !if $t>1
  65.         <ol style="list-style-type:square;">
  66.       !endif
  67.       !for k=1 to $t
  68.         !set l__=!line $k of $(ans_$i)
  69.         !if $l__ !=
  70.           !if $t>1
  71.             <li style="counter-reset:$k">
  72.           !endif
  73.             $l__
  74.           !if $t>1
  75.             </li>
  76.           !endif
  77.           !reset l__
  78.         !endif
  79.       !next k
  80.       </ol>
  81.       </div>
  82.     !endif
  83.   !next i
  84.   </div><!--end of wims_solution-->
  85. !endif
  86.  
  87. :noans
  88.  
  89. !set wims_menu_items=!append line renew,1,cmd=reply&print=yes\
  90. back2,1,module=$module&cmd=intro\
  91. to $wims_menu_items
  92. !tail
  93.