Subversion Repositories wimsdev

Rev

Rev 17176 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !nocache
  2. !set wims_backslash_insmath=yes
  3. !set wims_html_header=!append line $oefcss to $wims_html_header
  4. !header1
  5. !set module_title=!module title_$lang $module
  6. !default module_title=!module title $module
  7. <h1 class="wimscenter">
  8. !href module=$module&cmd=intro WIMS
  9.  $module_title<br>
  10. <span class="smaller">--- $name_print ---</span></h1>
  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. !if $printlatex!=yes
  22.   <h2 class="wimscenter">$wims_name_Exercices</h2>
  23.   !for iii=1 to $n
  24.     <h3>
  25.     !href target=wims_light module=$module&exo=$(name_$iii)&cmd=new <span class="bold">$name_exo</span> $iii.
  26.     <span id="title_$iii">$(title_$iii)</span>
  27.     </h3>
  28.     !if $(question_$iii)=$empty
  29.       ($name_noprint)
  30.     !else
  31.       !set wims_parm_detag=label
  32.       !if __EXECUTED_ isin $(question_$iii) and _EXERCISE__ isin $(question_$iii)
  33.         !set thisexo=$(name_$iii)
  34.         !!!!FIXME 5
  35.         !readproc oef/imagedir.proc
  36.         !for k=1 to $(varcnt_$iii)+5
  37.           !set val$k=!line $k of $(var_$iii)
  38.         !next k
  39.         <div id="exo_$iii">
  40.         !read $(class_header)def/$(name_$iii).def question
  41.         </div>
  42.       !else
  43.         <div id="exo_$iii">
  44.         $(question_$iii)
  45.         </div>
  46.       !endif
  47.       !if $(chce_$iii)!=$empty
  48.         <div class="wims_answer">$(chce_$iii)</div>
  49.       !endif
  50.       !reset wims_parm_detag
  51.     !endif
  52.     <br class="clearall">
  53.     !if $i__>=$(cnt_$iii) and $prompt___!=$empty
  54.       <div class="spacer">$prompt___</div>
  55.       !reset prompt___
  56.     !endif
  57.     !if $(embedcnt$iii)=0 or $(embedcnt$iii)=$empty
  58.       !set tmp_cnt=!itemcnt $(Replyname$iii)
  59.       <ul>
  60.       !for k=1 to $tmp_cnt-1
  61.         <li>
  62.         !set tmp=!item $k of $(Replyname$iii)
  63.         !if $tmp!=$empty
  64.           <em>$tmp</em>:
  65.         !endif
  66.         !set tmp=!line $k of $(Rg$iii)
  67.         !set tmp=!nonempty items $tmp
  68.         !if $((Replytype$iii)[$k]) iswordof dragfill clickfill reorder compose
  69.           !replace internal , by </div>$ $<div class="drag_label" style="display:inline-block;"> \
  70. in <div class="drag_label" style="display:inline-block;">$tmp</div>
  71.         !else
  72.           !if $((Replytype$iii)[$k]) iswordof radio menu checkbox
  73.             !replace internal , by </li><li> in <ul><li>$tmp</li></ul>
  74.           !else
  75.             $tmp
  76.           !endif
  77.         !endif
  78.         !reset tmp
  79.         </li>
  80.       !next
  81.       </ul>
  82.     !endif
  83.   !next
  84.  
  85.   !if $wims_user!=$empty and $wims_user!=supervisor
  86.     !goto noans
  87.   !endif
  88.  
  89.   !if $test_print=1
  90.     <div class="wims_solution">
  91.     <h2 class="wimscenter">$name_answers</h2>
  92.     !for iii=1 to $n
  93.       !set t=!linecnt $(ans_$iii)
  94.       !if $t>0
  95.         <div id="answer_$iii">
  96.         <h3>$name_answer_i $iii.</h3>
  97.         !if $t>1
  98.           <ol style="list-style-type:square;">
  99.         !endif
  100.         !for k=1 to $t
  101.           !if $(Replytype$iii[$k]) iswordof coord clock jsxgraphcurve jsxgraph draw
  102.             !break
  103.           !endif
  104.           !set l__=!line $k of $(ans_$iii)
  105.           !if $l__ !=
  106.             !if $t>1
  107.               <li style="counter-reset:$k">
  108.             !endif
  109.               $l__
  110.             !if $t>1
  111.               </li>
  112.             !endif
  113.             !reset l__
  114.           !endif
  115.         !next k
  116.         !if $t>1
  117.           </ol>
  118.         !endif
  119.         </div>
  120.       !endif
  121.     !next iii
  122.     </div><!--end of wims_solution-->
  123.   !endif
  124. !endif
  125.  
  126. :noans
  127.  
  128. !set wims_menu_items=!append line renew,1,cmd=reply&print=yes\
  129.   to $wims_menu_items
  130. !if $latex_exists=1
  131.   !set wims_menu_items=!append line printlatex,1,cmd=reply&print=yes&printlatex=yes\
  132. to $wims_menu_items
  133. !endif
  134. !if $wims_user=$empty
  135.   !set wims_menu_items=!append line back2,1,module=$module&cmd=intro\
  136.     to $wims_menu_items
  137. !endif
  138. !tail
  139.