Subversion Repositories wimsdev

Rev

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

  1. !set wims_html_header=!append line $oefcss to $wims_html_header
  2. !header1
  3. !read adm/title.phtml 2\
  4. $sheet_title
  5.  
  6. <div class="wims_sheet_desc">$sheet_desc</div>
  7.  
  8. $sheet_remark
  9.  
  10. !if $error!=$empty
  11.   !changeto lang/msg.phtml.$modu_lang
  12. !endif
  13.  
  14. !if ($wims_developer!= or $wims_supervisor!= or $wims_user=supervisor) and $latex_exists=1
  15.   <div class="wimscenter">
  16.   !read oef/latex.proc print
  17.   </div>
  18. !endif
  19. !for i=1 to $N
  20.   <br class="spacer" />
  21.   <span class="bold">$name_exo</span> $i - <span class="oefnameexo">$(title_$i)</span><br />
  22.   !if $(question_$i)=$empty
  23.     ($name_noprint)
  24.   !else
  25.     !if __EXECUTED_ isin $(question_$i) and _EXERCISE__ isin $(question_$i)
  26.       !set e_=$(e_$i)
  27.       !set thisexo=$e_
  28.       !set m_=$(module_$i)
  29.       !readproc imagedir.proc
  30.       !for k=1 to $(varcnt_$i)+5
  31.         !set val$k=!line $k of $(var_$i)
  32.       !next k
  33.       !set wims_prefix=
  34.       !read $(class_header)def/$(e_$i).def question
  35.       !set wims_prefix=$wims_prefix2
  36.     !else
  37.       $(question_$i)
  38.     !endif
  39.     <a></a>
  40.     $(chce_$i)
  41.   !endif
  42. !next i
  43.  
  44. !if $public!=P and $wims_user!=supervisor
  45.   !goto noans
  46. !endif
  47.  
  48. <br class="spacer" /><hr/>
  49. <div class="wims_solution">
  50. <h3 class="wimscenter">$wims_name_answer</h3>
  51. !for i=1 to $N
  52.   !set t=!linecnt $(ans_$i)
  53.   !if $t>0
  54.     <br class="spacer" />
  55.     <span class="bold">$name_answer $i.</span>
  56.     <ul style="list-style-type:square;">
  57.     !for k=1 to $t
  58.       !set l__=!line $k of $(ans_$i)
  59.       !if $l__ !=
  60.         <li value="$k">
  61.         !line $k of $(ans_$i)
  62.         </li>
  63.         !reset l__
  64.       !endif
  65.     !next k
  66.     </ul>
  67.   !endif
  68. !next i
  69. </div><!--end of wims_solution-->
  70.  
  71. :noans
  72.  
  73. !set wims_menu_items=!append line renew,1,cmd=reply\
  74. back2,1,cmd=reply&job=read\
  75. to $wims_menu_items
  76. !tail
  77.